Script des erreurs dans le générateur d'évènement

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Script des erreurs dans le générateur d'évènement

wooceans

Bonjour à tous! J'ai un script qui m'affiche touts ce qui se passe dans le générateur d'évènements. Mais je voudrais seulement les erreurs. Comment résoudre ce problème.

strComputer = "."

Set wbemServices = GetObject("winmgmts:\\" & strComputer)
Set wbemObjectSet = wbemServices.InstancesOf("Win32_NTLogEvent" )

Set wbemServices= wbemServices.ExecQuery("SELECT typename,timegenerated,sourcename,category,eventcode,user,computername FROM Win32_NTLogEvent WHERE Typename='Error'" )

For Each wbemObject In wbemObjectSet
WScript.Echo "Type: " & wbemObject.Type & vbCrLf & _
"Heure : " & wbemObject.Timegenerated & vbCrLf & _
"Source: " & wbemObject.SourceName & vbCrLf & _
"Catégorie: " & wbemObject.Category & vbCrLf & _
"Événement: " & wbemObject.EventCode & vbCrLf & _
"Utilisateur: " & wbemObject.User & vbCrLf & _
"Ordinateur: " & wbemObject.ComputerName & vbCrLf
Next

:bounce: Merci de bien vouloir me répondre!!!!

Publicité

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Script des erreurs dans le générateur d'évènement

Sujets relatifs
Script vbs sur mes dll	Pb pour intégrer un langage de script (Ch) avec C++
Code vb et script php, Possible ???	Script remplir des feuilles DIFFERENTES Excel
Envoyer un evenement KeyDown à un autre composant ?	générer un script sql
Script en php pour des pronostics sportifs ?	Information sur le langage script TSL ???
[shell] script pour recuperer le contenu d'une page web.	Script d'envoi de mail
Plus de sujets relatifs à : Script des erreurs dans le générateur d'évènement

Page générée en 0.057 secondes