ForEvErNoMe 发表于 2013-1-1 22:08:43

bat脚本、vbs脚本和perl脚本删除日志文件

<div id="cnblogs_post_body">脚本这个东东还是非常实用的,可以简化手动操作。下面这个脚本是删除前七天的日志文件。
bat脚本:
<div class="cnblogs_code">@echo offecho ------------Delete log file,develop by terry-------------echo Today date::%date%::Yearset yy=%date:~0,4%::Monthset mms=%date:~5,2%if %mms% GTR 10 (set mm=%mms%) else (set mm=%mms:~1,2%)::Dayset dds=%date:~8,2%if %dds% GTR 10 (set dd=%dds%) else (set dd=%dds:~1,2%)::Caluationset /a dt=%yy%*365+%mm%*31+%dd%echo Begin to delete the log file before seven days...echo ----------------------------------------------------------setlocal enabledelayedexpansionfor /f "tokens=* delims=" %%i in ('dir /s/b "D:\Exception\*txt"') do (            set ff=%%~ti      ::Year        set yf=!ff:~0,4!    ::Month    set mfs=!ff:~5,2!      if !mfs! GTR 10 (set mf=!mfs!) else (set mf=!mfs:~1,2!)    ::Day    set dfs=!ff:~8,2!    if !dfs! GTR 10 (set df=!dfs!) else (set df=!dfs:~1,2!)    ::Caluation    set /a ft=!yf!*365+!mf!*31+!df!    set /a res=%dt%-!ft!    ::Delete log file    if !res! GTR 7 (echo Delete log file %%i)&&(del %%i /f /q))Endlocalecho ----------------------------------------------------------echo Delete Completed.pause
页: [1]
查看完整版本: bat脚本、vbs脚本和perl脚本删除日志文件