effacer des événements dans le journal d'événement de windows (script)

effacer des événements dans le journal d'événement de windows (script) - Win NT/2K/XP - Windows & Software

Marsh Posté le 14-06-2010 à 17:11:18    

Salut,
 
je dois effacer des événements dans le journal d'événements de windows xp. Pour cela on m'a proposer de le faire via vb Script.
 Je possede le modele de base. Es ce que vous pourriez me guider pour le modifier svp ?
 
 
Je ne sais pas quelles sont les valeurs que je dois mettre. Par exemple, mon ordinateur s'appele 'PC1" et j'aimerai supprimer l'evenement "DCOM", quels sont les parametres a modifier dans le script ci dessous svp ???
 
 
Function ClearEventLog(machineName, strType)
                strComputer = machineName
                Set objWMIService = GetObject("winmgmts:" _
                    & "{impersonationLevel=impersonate,(Backup)}!\\" & _
                        strComputer & "\root\cimv2" )
                Set colLogFiles = objWMIService.ExecQuery _
                    ("Select * LogFileName from Win32_NTEventLogFile " _
                    & "Where LogFileName='" & strType & "'" )
 
                For Each objLogfile in colLogFiles
                    objLogFile.ClearEventLog()
                Next
 
 
Merci d'avance

Reply

Marsh Posté le 14-06-2010 à 17:11:18   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed