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

Batcher · 发表于 2017-7-31 19:19:03

回复 15# breeze_li

可能之前更新帖子的时候有过误操作，原始代码第26行少了一个左括号，已更新，你再试试。
http://bbs.bathome.net/thread-3503-1-1.html

breeze_li · 发表于 2017-8-8 16:34:28

回复 16# Batcher

set SrcDir=E:\asdf
set DaysAgo=1
for /f "skip=2 delims=" %%a in ('reg query "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate') do (
set "RegDateOld=%%a"
)
set RegDateOld=%RegDateOld:~-8%
reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d yyyy-M-d /f>nul
>"%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%
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"
)
)
)
reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nul

复制代码

括号加了，现在不抱错了，但是好像没有执行删除操作

Batcher · 发表于 2017-8-8 17:45:28

回复 17# breeze_li

我代码里面已经写明了，可能你没注意到：

复制代码

Nsqs · 发表于 2017-8-8 19:06:01

本帖最后由 Nsqs 于 2017-8-8 19:21 编辑

回复 18# Batcher
删除文件

PowerShell -c "Dir -File|ForEach{If(((Get-Date)-$_.LastWriteTime).Days -gt 30){Remove-Item $_.FullName}}"

复制代码

删除文件夹

PowerShell -c "Dir -Dir|ForEach{If(((Get-Date)-$_.LastWriteTime).Days -gt 30){Remove-Item $_.FullName}}"

复制代码

一行流，当前文件夹内删除30天前的文件

09年的帖子，方法太老了，嵌套VBS怎么写的这么复杂，请参见复制7天前的文件

Batcher · 发表于 2017-8-9 09:22:31

回复 19# Nsqs

是的，太老了，那时候混编的方法还没出现或者不流行。

breeze_li · 发表于 2017-8-10 08:47:57

回复 18# Batcher

谢谢耐心帮助，我用你帖子更新的 BAT + PowerShell 实现了

kingshui · 发表于 2017-8-16 17:15:36

forfiles也许更好？

Batcher · 发表于 2017-8-16 17:44:55

回复 22# kingshui

能否把完整代码发出来让楼主测试一下？

kingshui · 发表于 2017-8-18 12:42:57

本帖最后由 pcl_test 于 2017-8-18 12:49 编辑

回复 23# Batcher

楼主可参考，@isdir的值一定要大写。
详细用法forfiles /?

复制代码

复制代码

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

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

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