DOS命令行删除N天以前的文件

DOS命令行删除N天以前的文件

DelOldFile.cmd

:: DelOldFile.cmd - 删除指定日期前的所有文件 :: Climbing - 2005-8-26 - CMD@WinXP @echo off if "%1"=="" goto _usage set dst=./. if not "%2"=="" if exist %2/. (set dst=%2/.) else (goto _err1) for /r %dst% %%f in (*.*) do if %%~tf LSS %1 del /f /q %%f && echo 删除 %%f goto _quit :_usage echo DelOldFile.cmd   －　删除指定目录指定日期以前的所有文件 echo Version 1.0 Copyleft by Climbing echo 语法： DelOldFile ^<日期^>  [目标目录] echo         ^<日期^> 　　必须指定的参数，日期格式为：%date%，该日期前的文件都会被删除（不含该日期） echo         [目标目录]　 可选参数，指定要删除文件的目录，默认为当前目录 goto _quit :_err1 echo 错误：指定的%2目录不存在！ :_quit set dst= :End

DateDel2_for_2k3.bat

:: DateDel2.bat - 删除指定路径下指定日数以前修改的文件 :: Will Sort - 2005-9-2 - CMD@WinXP :: 注意事项：参数%1指定日数，昨天为1，前天为2，依次类推 ::           参数%1指定文件路径，省略时将处理当前路径 :: 核心算法：Ritchie Lawrence, updated 2002-08-13. Version 1.1 :: @echo off & setlocal ENABLEEXTENSIONS call :Date2Day %date:~0,10% sdays set /a sdays-=%1 call :Day2Date %sdays% difdate echo 将删除 %cd% 下 %difdate% 前的修改的以下文件： for /r %2 %%f in (*.*) do if "%%~tf" LEQ "%difdate%" del /f /q %%f && echo 删除 %%f goto :EOF :Date2Day setlocal ENABLEEXTENSIONS for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (   set yy=%%a & set mm=%%b & set dd=%%c ) set /a dd=100%dd%%%100,mm=100%mm%%%100 set /a z=14-mm,z/=12,y=yy+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 %2=%j%&goto :EOF :Day2Date setlocal ENABLEEXTENSIONS set /a i=%1,a=i+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,yy=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=%yy%-%mm%-%dd%&goto :EOF

DateDel2_for_win2k.bat

:: DateDel2.bat - 删除指定路径下指定日数以前修改的文件 :: Will Sort - 2005-9-2 - CMD@WinXP :: 注意事项：参数%1指定日数，昨天为1，前天为2，依次类推 ::           参数%1指定文件路径，省略时将处理当前路径 :: 核心算法：Ritchie Lawrence, updated 2002-08-13. Version 1.1 :: @echo off & setlocal ENABLEEXTENSIONS call :Date2Day %date:~4,10% sdays set /a sdays-=%1 call :Day2Date %sdays% difdate echo 将删除 %cd% 下 %difdate% 前的修改的以下文件： for /r %2 %%f in (*.*) do if "%%~tf" LEQ "%difdate:~2,14%" del /f /q %%f && echo 删除 %%f goto :EOF :Date2Day setlocal ENABLEEXTENSIONS for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (   set yy=%%a & set mm=%%b & set dd=%%c ) set /a dd=100%dd%%%100,mm=100%mm%%%100 set /a z=14-mm,z/=12,y=yy+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 %2=%j%&goto :EOF :Day2Date setlocal ENABLEEXTENSIONS set /a i=%1,a=i+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,yy=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=%yy%-%mm%-%dd%&goto :EOF

使用方法
::DelOldFile.cmd
::删除固定日期前的文件
::Win2003语法
DelOldFile.cmd 2008-01-05 d:/conf
::Win2000语法
DelOldFile.cmd 08-01-05 d:/conf
::将变量扩展到文件的日期/时间
for /r d:/conf %i in (test.txt) do set tt=%~ti
::Win2003结果
tt=2008-01-10 00:33
::Win2000结果
tt=08-01-10 00:33

::DateDel2.bat
::统一语法
::删除指定路径下指定日数以前修改的文件
::set /a将日期与相对天数进行相互换算，以求得差值日期
::删除昨天前修改的文件（包含昨天）
DateDel2.bat 1 d:/conf
::注意根据不同系统修改相应的date扩展变量
DelOldFile.cmd 2008-01-05 d:/conf
::Win2003 date扩展变量
echo %date:~0,10%
2009-01-06
::Win2000 date扩展变量
echo %date:~4,10%
2009-01-06
::Win2000 下需要扩展这个difdate变量以适应FOR命令的文件日期时间扩展变量
%difdate:~2,14%
09-01-06