is het mogelijk logfiles te laten verwijderen door IIS, na bijvoorbeeld 2mnd ?

[janwillem]

is het mogelijk logfiles te laten verwijderen door IIS, na bijvoorbeeld 2mnd ? Ik zou dat graag automatisch zien gebeuren..

of zitten daar nadelen in? Ik kan de optie namelijk niet vinden in IIS.

[bvankuik]

Is dit iets?

http://www.omegadm.co.uk/products/ur...dows-schematic

[Erikcreative]

Ik heb een VBS scriptje voor je... deze kun je gewoon in je "Scheduled Tasks" zetten. Je kan instellen tot hoeveel dagen je je logs wilt bewaren

suc6

'Determine the number of days for which you want to keep logs 
logDelDays = 5

'Main driver 
purgeIISLogs("W3SVC") 
purgeIISLogs("MSFTPSVC") 

'Purge IIS logs 
Sub purgeIISlogs(strService) 
   delCount   = 0 
   Set fso    = CreateObject("Scripting.FileSystemObject") 
   Set objIIS = GetObject("IIS://" & getComputer() & "/" & strService) 
   For Each objweb in objIIS 
      If lCase(objweb.Class) = "iiswebserver" _ 
      Or lCase(objweb.Class) = "iisftpserver" Then 
         fLogDirPath = objweb.LogFileDirectory & "\" & strService & objweb.name 
         If fso.FolderExists(fLogDirPath) Then 
            For Each fLog in fso.GetFolder(fLogDirPath).Files 
               If UCase(Left(fLog.Name,2)) = "EX" And UCase(Right(fLog.Name,4)) = ".LOG" Then 
                  fileDate = cDate(Mid(fLog.name,7,2) & " " & monthname(cint(Mid(fLog.name,5,2)),true) & " " & Mid(fLog.name,3,2)) 
                  If fileDate < DateAdd("d", now(), -logDelDays) Then 
                     delCount = delCount + 1 
                     fLog.Delete 
                  End If 
               End If 
            Next 
            Wscript.Echo "Purged " & delCount & " logs for " & objweb.ServerComment 
         End If 
      End If 
   Next 
   Set objIIS = nothing 
   Set fso    = nothing 
End Sub 

'Get computer name 
Function getComputer() 
   Set objNet = WScript.CreateObject("WScript.Network") 
   getComputer= objNet.ComputerName 
   Set objNet = Nothing 
End Function