Compter les items d'une collection WMI

siocnarf

XLDnaute Occasionnel
Bonjour,

J'essaie de compter les items d'une collection WMI pour la placer en Excel et j'échoue. Est-ce que quelqu'un a une idée??

Code:
strComputer = "172.30.23.202"

UserName = ""
Password = ""

strInformations = "(Type='Informations' and EventCode='500')"
strdatetime = "TimeWritten >= '20100101000000.000000-300' and TimeWritten < '20100121000000.000000-300'"
strcritere = "(Logfile = 'Application')"

Set SWBemlocator = CreateObject("WbemScripting.SWbemLocator")
Set objWMIService = SWBemlocator.ConnectServer(strComputer,"root\CIMV2",UserName,Password)
Set colItems = objWMIService.ExecQuery("Select * from Win32_NTLogEvent Where " & strcritere,,48)

WScript.Echo "Services Started: " & colItems.Count

La requête en tant que tel fonctionne et je l'ai testé mais c'est le count...

Merci,
 

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 611
Messages
2 090 226
Membres
104 453
dernier inscrit
benjiii88