@ECHO Off
SETLOCAL ENABLEDELAYEDEXPANSION
rem The following settings for the source directory and filename are names
rem that I use for testing and deliberately include names which include spaces to make sure
rem that the process works using such names. These will need to be changed to suit your situation.

SET "sourcedir=u:\your files"

FOR /f "delims=" %%e IN (
 'dir /b /s /a-d "%sourcedir%\*" '
 ) DO (
 SET "fullfilename=%%e"
 SET "filename=%%~ne"
 SET "fileext=%%~xe"
 CALL :findnewname
)

GOTO :EOF

:findnewname
FOR /L %%y IN (1980,1,2025) DO (
 IF "%filename%" neq "!filename:.%%y.=!" SET "newname=!filename:.%%y.=.:%%y:!"&FOR /f "tokens=1,2delims=:" %%b IN ("!newname:.= !") DO ECHO REN "%fullfilename%" "%%b(%%c)%fileext%"

)

GOTO :EOF

在用户变量中保存文件名和扩展名。
测试字符串.year.是否出现在名称中。如果是这样，用.:year:替换.year.（冒号不能出现在文件名中），然后标记结果字符串，利用这个机会用空格替换.，把碎片捡起来，把它们粘在一起，重新命名（只要被echo ed就可以解除）
[修订为扫描子目录]