复制代码 代码如下:

@echo off

set d=%date:~0,10%

mshta vbscript:createobject("scripting.filesystemobject").opentextfile("wind.txt",2,true).writeline(dateadd("d",-2,"%d%"))(window.close)

for /f %%m in (wind.txt) do (set tt=%%m)

set ph=D:Test

for /r "%ph%" %%i in (*) do (if %%~ti lss %tt% (@echo "%%~ti" del /a /f /s /q "%%i"))

pause

运行的时候去掉最后一个@echo 和 pause

这两个为测试输出用的

dateadd("d",-2,"%d%") 这里改变删除时间

注意：一定要改 区域语言 里的 时间格式 为 yyyy-mm-dd