@echo off&setlocal enabledelayedexpansion
rem 计算删除日期
:: 文件的格式为yyyy-mm-dd.*
:: 以下 dz=备份文件的路径
:: ds=为预定要保留的天数 （可修改,但不要大于28）
set dz=E:\bak
set ds=2
::取当前系统日期的 年、月、日
set dy=%date:~,4%
set dm=%date:~5,2%
::处理月份带0的，比如08,09，去掉前面的0，不然
::会被认为是8进制，导致错误。
::echo 去0前的月份值=%dm%
:again
if "%dm:~0,1%"=="0" (
set dm=%dm:~1%
goto again
)
::echo 去0后的月份值=%dm%
set dd=%date:~8,2%
::处理日带0的，比如08,09，去掉前面的0，不然
::会被认为是8进制，导致错误。
::echo 去0前的day值=%dd%
:againc
if "%dd:~0,1%"=="0" (
set dd=%dd:~1%
goto againc
)
::echo 去0后的day值=%dd%
::echo 当前是 %dy%-%dm%-%dd%日
::计算应该删的文件的最新日期
set /a "feb=^!(%dy%%%4)+28"
if "%dy:~2,2%" equ "00" set/a "feb=!feb!-1+^!(%dy:~,2%%%4)"
set /a "dd-=%ds%"
if %dd% leq 0 (
set n=0
set/a dm-=1
if !dm! equ 0 set/a "dy=%dy%-1,dm=0+12"
for %%a in (31 %feb% 31 30 31 30 31 31 30 31 30 31) do (
set/a n=!n!+1
if !n! equ %dm% set/a "dd=!dd!+%%a"
)
)
set delDate=%dy%-%dm%-%dd%
至此delDate为计算出来的日期值。
本文转自 韬光星夜 51CTO博客，原文链接：http://blog.51cto.com/xfqxj/739878，如需转载请自行联系原作者
