Accédez à une collection d'objets WMI à partir de VBScript Sans « Pour chaque » Enumération

Question

J'ai ce code, mais je suis à la perte à ce paramètre pour passer à la méthode d'objet:

Dim oWMISrvc, oProcCol 

Set oWMISrvc = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") 
Set oProcCol = oWMISrvc.ExecQuery("SELECT * FROM Win32_Process WHERE Name = 'wscript.exe'") 
If oProcCol.Count Then WScript.Echo oProcCol.Item(?).CommandLine 

Je veux interroger la première Win32_Process élément de la collection renvoyé par ExecQuery. Je sais que cela peut se faire grâce à un dénombrement «pour chaque», mais je cherche un moyen d'y accéder directement.

P.S .: J'interroge "wscript.exe" uniquement pour le test, donc je n'essaie pas de récupérer la ligne de commande de mon script en cours, mais plutôt pour un exécutable externe. Merci.

Answer 1

J'ai trouvé ma réponse here. Donc, cela semble fonctionner, mais pas sur XP ou des versions plus anciennes de Windows:

If oProcCol.Count Then WScript.Echo oProcCol.ItemIndex(0).CommandLine