Procédure – Log dans un fichier texte

Log les informations dans un fichier texte, le mieux est de mettre ce fichier dans le temp de Windows

Public Sub WriteLog(Message)
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.OpenTextFile("c:\LOG.txt", 8, True)
    f.WriteLine "[" &  Time & "] - " & Message
    f.Close  
End Sub