删除N天前的M(天)个目录 、删除N天前最后修改的文件 ForFiles, dos command 批处理命令cmd/bat

@echo off
setlocal
set _DateOffsetStart_=%1
set _DateOffsetDays_=%2
set _StepDays_=-1
set _today_=%date%
set _yyyy_=%_today_:~0,4%
set _MM_=%_today_:~5,2%
set _dd_=%_today_:~8,2%
call :DateToDays %_yyyy_% %_MM_% %_dd_% _days_
rem echo %_days_%
set /a _DateOffsetEnd_=%_DateOffsetStart_%-%_DateOffsetDays_%+1
for /F %%i in (RootsDirectorysListForRemove.txt) do (
    setlocal
    For /L %%j in (%_DateOffsetStart_%, %_StepDays_%, %_DateOffsetEnd_%) do (
        setlocal ENABLEDELAYEDEXPANSION
        set /a _days_+=%%j
        rem echo !_days_!
        call :DaysToDate !_days_! _yyyy_ _MM_ _dd_
        set _DirectoryFullPathName_=%%i\!_yyyy_!-!_MM_!-!_dd_!\
        rem echo !_DirectoryFullPathName_!
        call :RemoveOneDirectory !_DirectoryFullPathName_!
        endlocal
    )
    endlocal
)
endlocal
goto :EOF
:RemoveOneDirectory %_DirectoryFullPathName_%
setlocal ENABLEEXTENSIONS
set _directory_=%_DirectoryFullPathName_%
if exist %_directory_% (
    echo RemoveOneDirectory: %_directory_%
    echo rmdir %_directory_% /s/q
) else (
    echo RemoveOneDirectory: Not Exist %_directory_%
)
goto :EOF
:DateToDays %yyyy% %MM% %dd% days
setlocal
set yyyy=%1&set MM=%2&set dd=%3
if 1%yyyy% LSS 200 (
    if 1%yyyy% LSS 170 (
        set yyyy=20%yyyy%
    ) else (
        set yyyy=19%yyyy%
    )
)
set /a dd=100%dd%%%100,MM=100%MM%%%100
set /a z=14-MM,z/=12,y=yyyy+4800-z,m=MM+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %4=%j%&goto :EOF
:DaysToDate %days% yyyy MM dd
setlocal ENABLEEXTENSIONS
set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,MM=-m/10,MM*=12,MM+=m+3,yyyy=b*100+d-4800+m/10
(if %MM% LSS 10 set MM=0%MM%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yyyy%&set %3=%MM%&set %4=%dd%&goto :EOF

---

RootsDirectorysListForRemove.txt

c:\aaa\
c:\bbb\
c:\ccc\

---

---

             @echo off
             setlocal ENABLEDELAYEDEXPANSION
             set _daysOffset_=-1
             For /f "delims=" %%i in (RootsDirectorysListForFilesDelete.txt) do (
             set _directory_=%%~dpi
             set _file_=%%~nxi
             if exist !_directory_! (
             rem echo FORFILES /P !_directory_! /S /D %_daysOffset_% /M !_file_! /C "cmd /c echo @path" 2>nul
             FORFILES /P !_directory_! /S /D %_daysOffset_% /M "!_file_!" /C "cmd /c echo @path" 2>nul
             )
             )
             endlocal
             
             

---

RootsDirectorysListForFilesDelete.txt

d:\temp6\*.eml
d:\temp6\*.txt