批处理删除指定天数日期之前的文件夹（2023-10-08）

Batcher

回复 25# 一坑坑兔一


    第几行少了括号？

xksu

我这边XP测试可以用

但是放在windows2008 64位上就不行了

'cscript' is not recognized as an internal or external command, operable program or batch file

这是为什么阿，刚开始接触这个，还不懂，请指教

xksu

我这边XP测试可以用

但是放在windows2008 64位上就不行了

'cscript' is not recognized as an intern ...
xksu 发表于 2013-1-11 16:28

    嘎嘎，可以了，


for /f %%a in ('cscript /nologo "%temp%\DstDate.vbs"') do (
    set "DstDate=%%a"
)

在cscript前加上路径： C：\windows\system32\

lovehome

如果是w2k3的系统，可以直接用forfiles命令来查找指定日期的文件，然后再删除，
如：
forfiles /P "D:\root" /s /d -7 /c "cmd /C echo y|del /f @path"

Batcher

回复 29# lovehome


    顶楼讨论的是删文件夹，不是文件

manwxm

我用第三个，win7系统下，也是不行啊，求指导
D:\test>批删文件夹.bat

D:\test>rem 指定待删除文件夹的存放路径

D:\test>set SrcDir=D:\test

D:\test>rem 指定天数

D:\test>set DaysAgo=1

D:\test>echo Set WshShell = WScript.CreateObject("WScript.Shell") 1>"C:\Users\ADMINI~1\AppData\Local\Temp\BackupDate.vbs"

D:\test>echo WScript.Echo WshShell.RegRead ("HKEY_CURRENT_USER\Control Panel\International\sShortDate") 1>>"C:\Users\ADMINI~1\AppData\Local\Temp\BackupDate.vbs"

D:\test>for /F %a in ('cscript /nologo "C:\Users\ADMINI~1\AppData\Local\Temp\BackupDate.vbs"') do (set "RegDateOld=%a" )

D:\test>(set "RegDateOld=yyyy-M-d" )

D:\test>echo Set WshShell = WScript.CreateObject("WScript.Shell") 1>"C:\Users\ADMINI~1\AppData\Local\Temp\UnifyDate.vbs"

D:\test>echo WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\International\sShortDate", "yyyy-M-d", "REG_SZ" 1>>"C:\Users\ADMINI~1\AppData\Local\Temp\UnifyDate.vbs"

D:\test>cscript /nologo "C:\Users\ADMINI~1\AppData\Local\Temp\UnifyDate.vbs"

D:\test>echo LastDate=date()-1 1>"C:\Users\ADMINI~1\AppData\Local\Temp\DstDate.vbs"

D:\test>echo FmtDate=right(year(LastDate),4) & right("0" & month(LastDate),2) & right("0" & day(LastDate),2) 1>>"C:\Users\ADMINI~1\AppData\Local\Temp\DstDate.vbs"

D:\test>echo wscript.echo FmtDate 1>>"C:\Users\ADMINI~1\AppData\Local\Temp\DstDate.vbs"

D:\test>for /F %a in ('cscript /nologo "C:\Users\ADMINI~1\AppData\Local\Temp\DstDate.vbs"') do (set "DstDate=%a" )

D:\test>(set "DstDate=20130217" )

D:\test>set DstDate=2013-02-17
命令语法不正确。
D:\test>        if exist "%a\"
D:\test>

manwxm

搞定了。。 if exist "%%a\"
这个后面少了个 (

yhcfsr

以前用过forfliles，又学习了

wangxiaohe

这个厉害了，终于找到删除文件夹的了。

cctvhbo

这个BAT不错