@echo off
setlocal enabledelayedexpansion
cd /d "%~dp0"
set "Count=1000"
for /f "delims=" %%i in ('dir /b /ad ^| findstr "北京[0-9][0-9][0-9]冬奥会"') do (
    set "Folder=%%i"
    set "Left=!Folder:~0,2!"
    set /a Count+=1
    set "Middle=!Count:~-3!"
    set "Right=!Folder:~-3!"
    ren "%%i" "!Left!-!Middle!-!Right!"
)
复制代码

@echo off
for /f "delims=" %%a in ('more +7 "%~f0"') do (
md "%%a"
)
pause & exit /b

:需要生成的文件夹在下面:
北京001冬奥会
北京002冬奥会
北京005冬奥会
北京007冬奥会
北京009冬奥会
北京011冬奥会
北京013冬奥会
北京020冬奥会
北京021冬奥会
北京088冬奥会
复制代码

@if(0)==(0) echo off&setlocal enabledelayedexpansion
set n=1000
@for /f "delims=" %%i in ('dir /a:d /b^|cscript -nologo -e:jscript "%~f0"') do (
    set /a n+=1&set str=!n:~-3!&REN "%%i" "北京!str!冬奥会"
)
pause & exit /b
@end
WSH.echo(WScript.StdIn.ReadAll().match(/北京[0-9]+冬奥会/g).join('\r\n'))
复制代码

@echo off
set n=1000
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b /ad') do (
    set /a n+=1
    for /f "tokens=1* delims=0123456789" %%i in ("%%a") do ren "%%a" "%%i!n:~-3!%%j"
)
复制代码