OVH Cloud OVH Cloud

Chercher un évènement donné ds un log W2k3

1 réponse
Avatar
Dom
Bonsoir à tous,

Voici le contexte:
Je sauvegarde mes serveurs 2k3 via l'utilitaire NTBackUp. N'ayant pas le
temps de regarder ts les jours ds les logs si la sauvegarde s'est
correctement déroulée je compte dérouler un script qui traquerait
l'évènement (son ID) d'échec de sauvegarde juste après la fin de ladite
sauvegarde.
Mon script ressemble à ceci:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'System'")
For Each objEvent In colLoggedEvents
If objEvent.DateDeLevenement = Date Then 'la méthode objEvent.TimeWritten
retourne une date que je ne parviens pas à convertir au format jj/mm/aaaa
If objEvent.EventCode = "8032" Then
Je m'envoie un mail
End If
End If
Next

Je butte la dessus: comment convertir la date d'inscription de l'évènement
en une date comparable à la date du jour au format ramené par la variable
Date ???
Je ne comprends pas le format ramené par la méthode objEvent.TimeWritten
(l'EventCode en exemple ici n'est pas le code d'erreur d'un NTBackUp
déficient, c'est juste un exemple de code au hasard)

Merci de vos infos.

Dom

1 réponse

Avatar
Jacques Barathon [MS]
Une petite recherche sur le site MSDN te donne la réponse:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_ntlogevent.asp
-> la propriété .TimeWritten est au format datetype.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/date_and_time_format.asp
-> toutes les explications sur le format datetype en question.

Jacques

"Dom" wrote in message
news:
Bonsoir à tous,

Voici le contexte:
Je sauvegarde mes serveurs 2k3 via l'utilitaire NTBackUp. N'ayant pas le
temps de regarder ts les jours ds les logs si la sauvegarde s'est
correctement déroulée je compte dérouler un script qui traquerait
l'évènement (son ID) d'échec de sauvegarde juste après la fin de ladite
sauvegarde.
Mon script ressemble à ceci:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'System'")
For Each objEvent In colLoggedEvents
If objEvent.DateDeLevenement = Date Then 'la méthode objEvent.TimeWritten
retourne une date que je ne parviens pas à convertir au format jj/mm/aaaa
If objEvent.EventCode = "8032" Then
Je m'envoie un mail
End If
End If
Next

Je butte la dessus: comment convertir la date d'inscription de l'évènement
en une date comparable à la date du jour au format ramené par la variable
Date ???
Je ne comprends pas le format ramené par la méthode objEvent.TimeWritten
(l'EventCode en exemple ici n'est pas le code d'erreur d'un NTBackUp
déficient, c'est juste un exemple de code au hasard)

Merci de vos infos.

Dom