RedPlug's Tory


IIS_Log_Drop.vbs


해당 스크립트 파일을 윈도우 작업 스케줄러의 기본작업 만들기로 등록 하시면 사용이 가능합니다.


삭제할 파일이 들어있는 디렉토리와 삭제 일자를 는 상황에 따라 변경해주시면 되며, 

응용하시면 IIS뿐만아니라 다른 용도로도 사용이 가능합니다.



 VBS Script

Option Explicit

Const strRootPath = "C:\inetpub\logs\LogFiles\W3SVC1\" ' 삭제할 파일이 들어 있는 디렉토리

Const nDays = 7 '초과일수 : 7일 경과한 파일 삭제


Dim oFSO

Set oFSO = CreateObject("Scripting.FileSystemObject")


Dim oFolder, oSubFolder

Set oFolder = oFSO.GetFolder(strRootPath)


Dim oFile


' 지정한 루트 디렉토리의 파일 삭제

For Each oFile In oFolder.Files

If Int(Now() - oFile.DateLastModified) >= nDays Then

' WScript.Echo oFile.Name  & " Deleting"

oFile.Delete

End If

Next


' 지정한 루트 디렉토리에 포함된 서브 디렉토리의 파일 삭제

For Each oSubFolder In oFolder.SubFolders

WScript.Echo oFolder.name & " ??"

For Each oFile In oSubFolder.Files

If Int(Now() - oFile.DateLastAccessed) >= nDays Then

oFile.Delete

WScript.Echo oFile.Name  & " 'Deleted'"

End If

Next

Next