請問怎樣定時刪除一個文件夾內的所有子文件夾和文件呢？同時又要保留那個父文件夾。比如我要刪除d:\test\ 內的所有子文件夾和文件，但保留test這個夾子，我是win2000的域，請問怎樣實現呢？bat可以嗎？
回答：在win9x的年代，用deltree這個外部命令就很容解決這個問題，不過從windows 2000 及windows xp之后，就取消了這個命令（真的是很奇怪），那么現在怎么解決呢？大家可能想到用 del+rd來解決這個問題。但有個問題，就是rd命令會刪除您指定的目錄。例如，當前目錄結構如下：
D:\>attrib /s /d d:\test\*.*
A R I D:\test\1.txt 此文件帶有只讀屬性
A H I D:\test\2.txt 此文件帶有隱藏屬性
A S I D:\test\3.txt 此文件帶有系統(tǒng)屬性
H I D:\test1\1 此目錄帶有隱藏屬性
A R I D:\test\1\4.txt 此文件帶有只讀屬性
S I D:\test1\2 此目錄帶有系統(tǒng)屬性
A R I D:\test1\2\5.txt 此文件帶有只讀屬性
批處理原理 如果您這么執(zhí)行命令 rd d:\test，那么rd會將test這個目錄連同其中的內容一起刪除掉，而我們要保留test這個目錄。那么怎么辦呢？我們可以先用del把d:\test目錄下的文件刪除掉，然后再用rd把子目錄刪除掉。這個批處理的內容如下，大家將如下內容保存為后綴名為.bat 或者.cmd的文本文件，例如就叫 deltree.bat吧。
---不包含此行－－－
attrib -s -h -r %1\*.* && del %1\*.* /q
dir %1 /ad /b /s >del.txt
for /f %%i in (del.txt) do rd %%i /s /q
－－－不包含此行－－－
那么當我們需要刪除test目錄的時候，就這么執(zhí)行 "deltree.bat d:\test"（不包含引號）。
批處理第一行 第一行批處理中的%1就會讀取批處理參數，變成這樣 attrib -s -h -r d:\test\*.* && del d:\test\*.* /q
先用attrib 去掉test目錄下所有文件的屬性，以保障后面的del順利執(zhí)行。
&& 是連接符號，當執(zhí)行完前面的命令后，執(zhí)行連接符后面的命令。
del刪除 test目錄下所有文件，因為rd命令是無法刪除test目錄下的文件的。好，test下的文件刪除完了，我們就開始刪除test目錄下的子目錄。
批處理第二行 批處理執(zhí)行到第二行，%1讀取批處理參數，就是我們在deltree后面輸入的的 d:\test，變成這樣 dir d:\test /ad /b /s >del.txt 這里dir命令后的各參數含義如下：
/AD 顯示具有指定屬性的目錄。從而讓后面的rd命令刪除這些目錄
/B 使用空格式(沒有標題信息或摘要)。避免后面的刪除命令出錯，因為dir命令還會輸出一些其它信息，例如“ 驅動器 C 中的卷沒有標簽。 卷的序列號是 EE5B-D3AF”，顯然這會導致rd命令出錯。
/S 顯示指定目錄和所有子目錄中的文件。輸出目錄及文件的完整路徑，便于后面rd命令刪除。
執(zhí)行完這一行批處理后，在當前目錄下會產生 del.txt文件，您執(zhí)行 type del.txt，會看到如下輸出：
d:\test1\1
d:\test1\2
為什么要輸出到文本文件呢？為什么不直接把dir的結果輸出給rd呢？因為dir的結果會有多行，如果一行一行寫，不是太麻煩了嗎？而且將來實際運用批處理的時候，我們也無法預測目標文件夾下會有多少個子目錄。將dir結果輸出到文本文件，然后讓rd去讀不是很方便嗎？
批處理第三行 好，我們已經將要刪除的子目錄列表輸出到文本文件del.txt中了，只要使用rd命令刪除這些目錄就好了。但實際上rd本身沒有讀取文本文件的功能，我們用for來解決這個問題。批處理執(zhí)行到了最后一行：for /f %%i in (del.txt) do rd %%i /s /q
%%i是在for語句中使用的循環(huán)變量，這個變量每使用一次，就從 del.txt中讀取一行，作為變量值，然后for負責將這個變量傳遞給后面 do執(zhí)行的命令中，那么for依次執(zhí)行循環(huán)所形成的命令就是這樣的：
第一次循環(huán) rd d:\test1\1 /s /q
第二次循環(huán) rd d:\test1\2 /s /q
gnaw0725注：關于for循環(huán)的更多解釋請參考 http://gnaw0725.blogbus.com/logs/4888698.html
這里的rd參數含義如下：
/S 除目錄本身外，還將刪除指定目錄下的所有子目錄和文件。用于刪除目錄樹。
/Q 安靜模式，帶 /S 刪除目錄樹時不要求確認
故障排查 好，到此位置，deltree.bat這個批處理就刪除了d:\test下的所有文件和文件夾，而無論它們帶什么屬性。如果大家在使用這個批處理的過程中出現了問題，例如沒有刪除掉文件，那么如何進行故障排查呢？我們可以有兩個check point：
批處理參數獲取 就是考察批處理是否正確獲取了參數，也就是我們輸入的目標文件夾，我們可以在批處理的最前面加一個echo %1 ，看看結果，就是這樣：
echo %1
attrib -s -h -r %1\*.* && del %1\*.* /q
gnaw0725注：批處理可以有9個參數，%0代表批處理自己，第一個參數%1，第二個%2，……依此類推
子目錄輸出列表 就是del.txt，您可以輸入 type del.txt，如果正常，輸出的內容應該是d:\test下的所有子目錄。
本文來自CSDN博客，轉載請標明出處：http://blog.csdn.net/ljc007/archive/2010/01/16/5198756.aspx
日期時間]批處理刪除指定天數日期之前的文件夾 收藏
【方案一】BAT + REG + VBS
view plaincopy to clipboardprint?
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了臨時VBS代碼進行日期計算
::本例為兼容不同的日期格式，調用reg命令（XP系統(tǒng)自帶）統(tǒng)一設置日期格式，
::處理完畢之后再把日期格式恢復成原來的狀態(tài)。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\Test
rem 指定天數
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%
for /d %%a in ("%SrcDir%\*.*") do (
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
pause
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了臨時VBS代碼進行日期計算
::本例為兼容不同的日期格式，調用reg命令（XP系統(tǒng)自帶）統(tǒng)一設置日期格式，
::處理完畢之后再把日期格式恢復成原來的狀態(tài)。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\Test
rem 指定天數
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%
for /d %%a in ("%SrcDir%\*.*") do (
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
pause
【方案二】BAT + REG + Ritchie Lawrence 日期函數
view plaincopy to clipboardprint?
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了 Ritchie Lawrence 的日期函數進行日期計算
::日期轉換的核心算法請參考http://bbs.bathome.cn/thread-3056-1-1.html
::本例為兼容不同的日期格式，調用reg命令（XP系統(tǒng)自帶）統(tǒng)一設置日期格式，
::處理完畢之后再把日期格式恢復成原來的狀態(tài)。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\Test
rem 指定天數
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
call :DateToDays %date:~0,4% %date:~5,2% %date:~8,2% PassDays
reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nul
set /a PassDays-=%DaysAgo%
call :DaysToDate %PassDays% DstYear DstMonth DstDay
set DstDate=%DstYear%%DstMonth%%DstDay%
set DstDate=%DstDate:~0,4%-%DstDate:~4,2%-%DstDate:~6,2%
for /d %%a in ("%SrcDir%\*.*") do (
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
pause
goto :eof
:DateToDays %yy% %mm% %dd% days
setlocal ENABLEEXTENSIONS
set yy=%1&set mm=%2&set dd=%3
if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %4=%j%&goto :EOF
:DaysToDate %days% yy mm dd
setlocal ENABLEEXTENSIONS
set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%&set %3=%mm%&set %4=%dd%&goto :EOF
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了 Ritchie Lawrence 的日期函數進行日期計算
::日期轉換的核心算法請參考http://bbs.bathome.cn/thread-3056-1-1.html
::本例為兼容不同的日期格式，調用reg命令（XP系統(tǒng)自帶）統(tǒng)一設置日期格式，
::處理完畢之后再把日期格式恢復成原來的狀態(tài)。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\Test
rem 指定天數
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
call :DateToDays %date:~0,4% %date:~5,2% %date:~8,2% PassDays
reg add "HKEY_CURRENT_USER\Control Panel\International" /v sShortDate /t REG_SZ /d %RegDateOld% /f>nul
set /a PassDays-=%DaysAgo%
call :DaysToDate %PassDays% DstYear DstMonth DstDay
set DstDate=%DstYear%%DstMonth%%DstDay%
set DstDate=%DstDate:~0,4%-%DstDate:~4,2%-%DstDate:~6,2%
for /d %%a in ("%SrcDir%\*.*") do (
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
pause
goto :eof
:DateToDays %yy% %mm% %dd% days
setlocal ENABLEEXTENSIONS
set yy=%1&set mm=%2&set dd=%3
if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %4=%j%&goto :EOF
:DaysToDate %days% yy mm dd
setlocal ENABLEEXTENSIONS
set /a a=%1+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%&set %3=%mm%&set %4=%dd%&goto :EOF
【方案三】BAT + VBS
view plaincopy to clipboardprint?
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了臨時VBS代碼進行日期計算，并統(tǒng)一設置系統(tǒng)日期格式，處理完畢
::之后再把日期格式恢復成原來的狀態(tài)。擺脫了對reg命令（XP系統(tǒng)自帶）的依賴。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\test
rem 指定天數
set DaysAgo=1
>"%temp%\BackupDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\BackupDate.vbs" echo WScript.Echo WshShell.RegRead ("HKEY_CURRENT_USER\Control Panel\International\sShortDate")
for /f %%a in ('cscript /nologo "%temp%\BackupDate.vbs"') do (
set "RegDateOld=%%a"
)
>"%temp%\UnifyDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\UnifyDate.vbs" echo WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\International\sShortDate", "yyyy-M-d", "REG_SZ"
cscript /nologo "%temp%\UnifyDate.vbs"
>"%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%
for /d %%a in ("%SrcDir%\*.*") do (
if "%%~ta" leq "%DstDate%" (
if exist "%%a\"
echo rd /s /q "%%a"
)
)
)
>"%temp%\RecoverDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\RecoverDate.vbs" echo WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\International\sShortDate", "%RegDateOld%", "REG_SZ"
cscript /nologo "%temp%\RecoverDate.vbs"
pause
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾的最后修改日期為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例調用了臨時VBS代碼進行日期計算，并統(tǒng)一設置系統(tǒng)日期格式，處理完畢
::之后再把日期格式恢復成原來的狀態(tài)。擺脫了對reg命令（XP系統(tǒng)自帶）的依賴。
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\test
rem 指定天數
set DaysAgo=1
>"%temp%\BackupDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\BackupDate.vbs" echo WScript.Echo WshShell.RegRead ("HKEY_CURRENT_USER\Control Panel\International\sShortDate")
for /f %%a in ('cscript /nologo "%temp%\BackupDate.vbs"') do (
set "RegDateOld=%%a"
)
>"%temp%\UnifyDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\UnifyDate.vbs" echo WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\International\sShortDate", "yyyy-M-d", "REG_SZ"
cscript /nologo "%temp%\UnifyDate.vbs"
>"%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%
for /d %%a in ("%SrcDir%\*.*") do (
if "%%~ta" leq "%DstDate%" (
if exist "%%a\"
echo rd /s /q "%%a"
)
)
)
>"%temp%\RecoverDate.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%temp%\RecoverDate.vbs" echo WshShell.RegWrite "HKEY_CURRENT_USER\Control Panel\International\sShortDate", "%RegDateOld%", "REG_SZ"
cscript /nologo "%temp%\RecoverDate.vbs"
pause
【方案四】字符串截取
view plaincopy to clipboardprint?
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾名中包含的日期字符串為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例假設文件夾名中包含的日期字符串（比如：Archive-2009-12-25）
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\test
rem 指定天數
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%
setlocal enabledelayedexpansion
for /d %%a in ("%SrcDir%\*.*") do (
if "%%~ta" leq "%DstDate%" (
set "FolderDate=%%~na"
set "FolderDate=!FolderDate:~8,10!"
if "!FolderDate!" leq "%DstDate%" (
if exist "%%a\" (
echo rd /s /q "%%a"
)
)
)
)
endlocal
pause
@echo off
::演示：刪除指定路徑下指定天數之前（以文件夾名中包含的日期字符串為準）的文件夾。
::如果演示結果無誤，把rd前面的echo去掉，即可實現真正刪除。
::本例假設文件夾名中包含的日期字符串（比如：Archive-2009-12-25）
rem 指定待刪除文件夾的存放路徑
set SrcDir=C:\test
rem 指定天數
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%
setlocal enabledelayedexpansion
for /d %%a in ("%SrcDir%\*.*") do (
if "%%~ta" leq "%DstDate%" (
set "FolderDate=%%~na"
set "FolderDate=!FolderDate:~8,10!"
if "!FolderDate!" leq "%DstDate%" (
if exist "%%a\" (
echo rd /s /q "%%a"
)
)
)
)
endlocal
pause
