@echo off&setlocal enabledelayedexpansion
set a=2000~2008 2009~2017 2018~2022
for /f "delims=" %%i in ('dir /b/s /a-d') do (
    for %%j in (%a%) do (
        if not exist "%%j" md "%%j"
        for /f "tokens=1,2 delims=~" %%k in ("%%j") do (
            set d=%%~ti
            set d=!d:~0,4!
            if !d! geq %%k if !d! leq %%l if not "%%i"==%0 move "%%i" "%%j"
        )
    )
)
pause
复制代码

@echo off
set NewFolders=2000~2008 2009~2017 2018~2022
md %NewFolders% 2>nul
setlocal enabledelayedexpansion
for %%a in (%NewFolders%) do (
    set str=%%a
    for /l %%b in (!str:~,4!,1,!str:~-4!) do set _%%b=%%a
)

for /f "delims=" %%i in ('dir /b /a-d') do (
    if not "%%i"=="%~nx0" (
        set n=%%~ti
        for %%j in (_!n:~,4!) do move "%%i" "!%%j!"
    )
)
pause
复制代码