批处理如何删除指定日期之前的文件夹？

breeze_li · 发表于 2017-7-24 17:09:39

求助，怎样删除某个文件夹下，今天之前的所有文件夹（不是文件）。

Batcher · 发表于 2017-7-25 23:05:22

参考：http://bbs.bathome.net/thread-3503-1-1.html

breeze_li · 发表于 2017-7-26 18:35:06

本帖最后由 breeze_li 于 2017-7-26 18:36 编辑

回复 2# Batcher
E:\>rem 指定待删除文件夹的存放路径

E:\>set SrcDir=E:\asdf

E:\>rem 指定天数

E:\>set DaysAgo=1

E:\>for /F "skip=2 delims=" %a in ('reg query "HKEY_CURRENT_USER\Control Panel\I
nternational" /v sShortDate') do (set "RegDateOld=%a" )

E:\>(set "RegDateOld= sShortDate REG_SZ yyyy-M-d" )

E:\>set RegDateOld=yyyy-M-d

E:\>reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG
_SZ /d yyyy-M-d /f 1>nul

E:\>echo LastDate=date()-1 1>"C:\Users\Administrator\AppData\Local\Temp\DstDate.
vbs"

E:\>echo FmtDate=right(year(LastDate),4) & right("0" & month(LastDate),2) & righ
t("0" & day(LastDate),2) 1>>"C:\Users\Administrator\AppData\Local\Temp\DstDate.v
bs"

E:\>echo wscript.echo FmtDate 1>>"C:\Users\Administrator\AppData\Local\Temp\DstD
ate.vbs"

E:\>for /F %a in ('cscript /nologo "C:\Users\Administrator\AppData\Local\Temp\Ds
tDate.vbs"') do (set "DstDate=%a" )

E:\>(set "DstDate=20170725" )

E:\>set DstDate=2017-07-25
命令语法不正确。

E:\> if exist "%a\"

E:\>

请问，这是哪里有问题？

Batcher · 发表于 2017-7-27 22:37:26

回复 3# breeze_li

请把你测试用的bat文件压缩之后传上来我看看

breeze_li · 发表于 2017-7-28 09:03:06

回复 4# Batcher 这个是测试文件

Batcher · 发表于 2017-7-28 11:36:10

回复 5# breeze_li

3楼的报错信息看不出具体哪个命令在报错，单独执行这段有问题吗？

>"%temp%\DstDate.vbs" echo LastDate=date()-%DaysAgo%
>>"%temp%\DstDate.vbs" echo FmtDate=right(year(LastDate),4) ^& right("0" ^& month(LastDate),2) ^& right("0" ^& day(LastDate),2)
>>"%temp%\DstDate.vbs" echo wscript.echo FmtDate
for /f %%a in ('cscript /nologo "%temp%\DstDate.vbs"') do (
set "DstDate=%%a"
)
set DstDate=%DstDate:~0,4%-%DstDate:~4,2%-%DstDate:~6,2%
echo %DstDate%

复制代码

breeze_li · 发表于 2017-7-28 15:09:01

回复 6# Batcher

C:\>test.bat

C:\>echo LastDate=date()- 1>"C:\Users\Administrator\AppData\Local\Temp\DstDate.v
bs"

C:\>echo FmtDate=right(year(LastDate),4) & right("0" & month(LastDate),2) & righ
t("0" & day(LastDate),2) 1>>"C:\Users\Administrator\AppData\Local\Temp\DstDate.v
bs"

C:\>echo wscript.echo FmtDate 1>>"C:\Users\Administrator\AppData\Local\Temp\DstD
ate.vbs"

C:\>for /F %a in ('cscript /nologo "C:\Users\Administrator\AppData\Local\Temp\Ds
tDate.vbs"') do (set "DstDate=%a" )
C:\Users\Administrator\AppData\Local\Temp\DstDate.vbs(1, 17) Microsoft VBScript
编译器错误: 语法错误

C:\>set DstDate=~0,4DstDate:~4,2DstDate:~6,2

C:\>echo ~0,4DstDate:~4,2DstDate:~6,2
~0,4DstDate:~4,2DstDate:~6,2

Batcher · 发表于 2017-7-28 15:59:02

回复 7# breeze_li

C:\Users\Administrator\AppData\Local\Temp\DstDate.vbs
把这个文件压缩传上来我看看
你用的什么版本的操作系统？

breeze_li · 发表于 2017-7-28 16:12:50

回复 8# Batcher

Batcher · 发表于 2017-7-28 21:59:44

回复 9# breeze_li

set DaysAgo=1
>"%temp%\DstDate.vbs" echo LastDate=date()-%DaysAgo%
>>"%temp%\DstDate.vbs" echo FmtDate=right(year(LastDate),4) ^& right("0" ^& month(LastDate),2) ^& right("0" ^& day(LastDate),2)
>>"%temp%\DstDate.vbs" echo wscript.echo FmtDate
for /f %%a in ('cscript /nologo "%temp%\DstDate.vbs"') do (
set "DstDate=%%a"
)
set DstDate=%DstDate:~0,4%-%DstDate:~4,2%-%DstDate:~6,2%
echo %DstDate%

复制代码

这样呢？

breeze_li · 发表于 2017-7-31 09:00:01

回复 10# Batcher
C:\>test2.bat

C:\>set DaysAgo=1

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

C:\>echo FmtDate=right(year(LastDate),4) & right("0" & month(LastDate),2) & righ
t("0" & day(LastDate),2) 1>>"C:\Users\Administrator\AppData\Local\Temp\DstDate.v
bs"

C:\>echo wscript.echo FmtDate 1>>"C:\Users\Administrator\AppData\Local\Temp\DstD
ate.vbs"

C:\>for /F %a in ('cscript /nologo "C:\Users\Administrator\AppData\Local\Temp\Ds
tDate.vbs"') do (set "DstDate=%a" )

C:\>(set "DstDate=20170730" )

C:\>set DstDate=2017-07-30

C:\>echo 2017-07-30
2017-07-30

C:\>
好像是没报错

Batcher · 发表于 2017-7-31 09:02:24

回复 11# breeze_li

其它代码慢慢往上加，看看加到哪句的时候会报错。

breeze_li · 发表于 2017-7-31 15:10:29

回复 12# Batcher

for /d %%a in ("%SrcDir%\*.*") do (
if "%%~ta" leq "%DstDate%" (
      if exist "%%a\"
         echo rd /s /q "%%a"
      )
)
)
加上这一句会报错，

命令语法不正确。

C:\>       if exist "%a\"

Batcher · 发表于 2017-7-31 15:51:04

回复 13# breeze_li

for /d %%a in ("%SrcDir%\*.*") do (
REM 看看这几个变量的值
echo %SrcDir%
echo %%a
echo %%~ta
echo %DstDate%
if "%%~ta" leq "%DstDate%" (
if exist "%%a"
echo rd /s /q "%%a"
)
)
)

复制代码

breeze_li · 发表于 2017-7-31 16:24:04

回复 14# Batcher
for /d %%a in ("%SrcDir%\*.*") do (
REM 看看这几个变量的值
echo %SrcDir%
echo %%a
echo %%~ta
echo %DstDate%
if "%%~ta" leq "%DstDate%" (
      if exist "%%a\"
         echo rd /s /q "%%a"
      )
)
)
运行这段会直接报错，如果去掉
if "%%~ta" leq "%DstDate%" (
      if exist "%%a\"
         echo rd /s /q "%%a"
      )
)
这段，那四个变量都能打印出来

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[日期时间] 批处理如何删除指定日期之前的文件夹？