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

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.

Is dit iets?

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

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

Code:

'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