時間:2022-05-28 16:15:01 | 來源:網絡營銷
時間:2022-05-28 16:15:01 來源:網絡營銷
IIS在運行的過程中日志會不停地增長,若IIS的網站被頻繁的調用或不當?shù)恼{用,則會產生很多日志,我在系統(tǒng)運維的時候曾出現(xiàn)過20G的系統(tǒng)盤,由于合作商開發(fā)的程序有問題,每幾百微秒調用一次web服務,短期內導致日志膨脹至8~9G,對于系統(tǒng)盤或者磁盤空間不夠的服務器來說,IIS日志自動清理則非常有必要。@echo offIIS日志清理VBS版代碼(DelIISLog.vbs)代碼如下:
title
::設置當前日期前多少天或后多少天
set/a beforedays=-3
::設置目錄所在位置
set dir="F:/log/"
::當前日期轉換為天數(shù)并進行計算
call :Date2Day %date:~0,10% days
set/a days=%days%%beforedays%
call :Day2Date %days% lastdate
::計算完畢,生成想要的字符組合
set okstr=ex%lastdate:~2,6%.log
::刪除這些文件
del del /f /s /q %dir%/%okstr%
cmd /k
:Date2Day
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (
set yy=%%a & set mm=%%b & set dd=%%c
)
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 %2=%j%&goto :EOF
:Day2Date
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+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%%mm%%dd%&goto :EOF
'IIS日志清理VBS版代碼(DelIISLog.vbs)總之,IIS在運行的過程中日志會不停地增長,若IIS的網站被頻繁的調用或不當?shù)恼{用,則會產生很多日志,對于系統(tǒng)盤或者磁盤空間不夠的服務器來說,IIS日志自動清理則非常有必要。
'調用方法:DelIISLog "IIS日志所在路徑",保留多少天的IIS日志
'遍歷IIS日志文件夾下的所有文件及子文件夾下的文件
Function DelIISLog(IISLogPath,KeepDays)
on error resume next
Set oFso = CreateObject("Scripting.FileSystemObject")
Set oFolder = oFso.GetFolder(IISLogPath)
Set oSubFolders = oFolder.SubFolders '得到該目錄下所有的文件夾的集合
Set oFiles = oFolder.Files '得到該目錄下所有的文件的集合
'第一步處理當前目錄下的所有文件
For Each oFile In oFiles '遍歷所有文件
if right(oFile.name,3)="log" then
oDate=cdate("20" & mid(oFile.name,3,2) & "-" & mid(oFile.name,5,2) & "-" & mid(oFile.name,7,2))
if date-oDate > KeepDays then oFile.delete '判斷是不是要處理的IIS日志文件,如果是的話直接刪除
end if
Next
'第二步處理當前目錄下的所有目錄,進行遞歸調用
For Each oSubFolder In oSubFolders
DelIISLog oSubFolder.Path,KeepDays '遞歸
Next
End Function
DelIISLog "D:/IISLogTest",20 '遍歷
關鍵詞:方法,技巧,文件