白云岛资源网 Design By www.pvray.com
复制代码 代码如下:
@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
@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
白云岛资源网 Design By www.pvray.com
广告合作：本站广告合作请联系QQ：858582 申请时备注：广告合作（否则不回）
免责声明：本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除！
免责声明：本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除！
白云岛资源网 Design By www.pvray.com
暂无评论...
