Vbs : IIS script de rotation des logs

Contrairement à linux, Windows ne dispose de tâche pour la rotation des logs.

Ci dessous un script Vbs qui permet d’effectuer cette rotation.

En adaptant la variable sLogFolder, il est possible de faire exécuter ce script pour n’importe quel emplacement ou se trouve des fichiers de log.

'# source : https://docs.microsoft.com/en-us/iis/manage/provisioning-and-managing-iis/managing-iis-log-file-storage#delete-old-log-files-by-script
sLogFolder = "c:\inetpub\logs\LogFiles"    'Emplacement des logs
iMaxAge = 30   'Retention en jours
Set objFSO = CreateObject("Scripting.FileSystemObject")
set colFolder = objFSO.GetFolder(sLogFolder)
For Each colSubfolder in colFolder.SubFolders
        Set objFolder = objFSO.GetFolder(colSubfolder.Path)
        Set colFiles = objFolder.Files
        For Each objFile in colFiles
                iFileAge = now-objFile.DateCreated
                if iFileAge > (iMaxAge+1)  then
                        objFSO.deletefile objFile, True
                end if
        Next
Next