@echo off
rem 格式化日期
rem date出來的日期是"2006-02-22 星期三"，不能直接拿來使用，所以應(yīng)該先格式化一下
rem 變成我們想要的。date:~0,4的意思是從0開始截取4個(gè)字符
set d=%date:~0,4%%date:~5,2%%date:~8,2%
rem 設(shè)定壓縮程序路徑，這里用的是WINRAR的rar.exe進(jìn)行打包的
set path=C:\Program Files\WinRAR
rem 設(shè)定要備份的目錄
set srcDir=D:\databasc
rem 設(shè)定備份文件所在目錄
set dstDir=E:\temp\backup
rem 設(shè)定備份文件的前綴,目前為temp,前綴為backup
set webPrefix=
rem 如果文件不存在,開始備份
if not exist %dstDir%%webPrefix%%d%.rar start Rar a -r %dstDir%%webPrefix%%d%.rar %srcDir%
@echo on

@echo off
rem ******************************
rem * 按時(shí)間刪除文件目錄的批處理 *
rem ******************************
rem 設(shè)置臨時(shí)目錄的路徑
set tempDir=%tmp%\remove_%date:~0,10%
if not exist %tempDir% md %tempDir%
rem 設(shè)置處理日期的腳本文件的路徑
set scriptFile=%tempDir%\get_date.vbs
rem 獲得要保留的天數(shù)
set days=%~1
if "%days%" == "" goto printUsage
rem 獲得目標(biāo)目錄的路徑
set dirPath=%~2
if "%dirPath%" == "" set dirPath=.
rem 獲得要操作的文件形式
set fileSpec=%~3
if "%fileSpec%" == "" set fileSpec=*.*
rem 生成計(jì)算日期的腳本文件并獲得刪除的截止日期
echo d=date()-%1 > %scriptFile%
echo s=right("0000" ^ year(d),4) ^ "-" ^ right("00" ^ month(d),2) ^ "-" ^ right("00" ^ day(d),2) >> %scriptFile%
echo wscript.echo s >> %scriptFile%
for /f %%i in ('cscript /nologo %scriptFile%') do set lastDate=%%i
rem 處理目標(biāo)目錄里的每個(gè)對(duì)象
for /f "tokens=1,2,3* delims=> " %%i in ('dir "%dirPath%\%fileSpec%" /a /-c /tc') do call :proc "%%i" "%%j" "%%k" "%%l"
goto :done
rem 處理目標(biāo)目錄里對(duì)象的過程
:proc
rem 獲得對(duì)象的創(chuàng)建日期并判斷是否為有效格式
set fileDate=%~1
echo %fileDate% | findstr "[0-9][0-9][0-9][0-9]-[0-9][0-9]-[0-9][0-9]" > nul
if errorlevel 1 goto end
rem 獲得對(duì)象的類型
set fileType=%~3
if "%fileType%" == "" goto end
rem 獲得對(duì)象的名稱
set fileName=%~4
if "%fileName%" == "" goto end
if "%fileName%" == "." goto end
if "%fileName%" == ".." goto end
if "%fileName%" == "字節(jié)" goto end
if "%fileName%" == "可用字節(jié)" goto end
rem 判斷對(duì)象日期是否小于或等于刪除的截止日期
if "%fileDate:~0,10%" leq "%lastDate%" (
echo deleting "%fileName%" ...
if "%fileType%" == "DIR" ( rd /s /q "%dirPath%\%fileName%" ) else ( del /q /f "%dirPath%\%fileName%" )
)
goto end
:error
echo An error occurred during backuping.
:done
rd /s /q %tempDir%
goto end
:printUsage
echo Usage: %0 ^Days^> [Work directory] [Target file specification (can include wildcards)]
goto end
:end