bat自动删除指定文件夹下前几天的文件的代码
(编辑:jimmy 日期: 2024/12/24 浏览:3 次 )
复制代码 代码如下:
@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
下一篇:全盘搜索指定文件并拷贝到指定位置[自动重命名]的批处理