Calcul du nombre d'enregistrement

[siocnarf]

Bonjour,

Avec une connexion WMI vers un observateur d'événement, est-il possible de savoir combien il y a d'inscription dans le journal "application "?

'Connexion à WMI
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & Q_strComputer & "\root\cimv2")
        
Set colEvents = objWMIService.ExecQuery _
    ("Select * from Win32_NTLogEvent Where Logfile = 'Application' And (Type='Avertissement' or Type='Erreur')")

Merci,

 

[tototiti2008]

Re : Calcul du nombre d'enregistrement

bonjour Siocnarf,

je ne connais rien en WMI mais peut-être en SQL :

'Connexion à WMI
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & Q_strComputer & "\root\cimv2")
        
Set colEvents = objWMIService.ExecQuery _
    ("Select * from Win32_NTLogEvent Where Logfile = 'Application' And (Type='Avertissement' or Type='Erreur')")
 
Set nbEvents = objWMIService.ExecQuery _
    ("Select COUNT(*) from Win32_NTLogEvent Where Logfile = 'Application' And (Type='Avertissement' or Type='Erreur')")