Discussion :

[poulpedeouille]

est-ce que ce script fonctionne chez vous ? :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
strComputer = "."
strNameSpace = "root\cimv2"
strClass = "Win32_Service"
Set objClass = GetObject("winmgmts:\\" & strComputer & _
"\" & strNameSpace & ":" & strClass)
WScript.Echo strClass & " propriété de la classe"
WScript.Echo "------------------------------"
For Each objClassProperty In objClass.Properties
WScript.Echo objClassProperty.Name
Next

merci

Win32_Service propriété de la classe
------------------------------
C:\Users\pc\Desktop\scripting\10.vbs(8, 1) Erreur d'exécution Microsoft VBScript: Cet objet ne gère pas cette propriété ou cette méthode: 'objClass.Properties'

est-ce qu'un erratum est paru ?

2ème post :
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx
le bon script est là
https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

[ProgElecT]

Salut

est-ce que ce script fonctionne chez vous ?

OUI, en ajoutant le _ en fin de ligne 8, soit For Each objClassProperty In objClass.Properties_

[poulpedeouille]

de plus cà semble un piège, ici le _ n'est pas une instruction qui se continue sur la ligne suivante !?

[ProgElecT]

Re

Oui cela a tout du piège, perso moi je ne créerai pas ce style de nom de méthode ou propriété.
Par contre pour une instruction qui se continue sur la ligne suivante, il faut un espace avant cette dernière _, si non il y a déclenchement d'erreur au passage à la ligne.

[l_autodidacte]

de plus cà semble un piège, ici le _ n'est pas une instruction qui se continue sur la ligne suivante !?

Non car pour continuer sur la ligne suivante, le caractère _ doit être précédé d'un espace.

[EDIT] Décidément ProgElecT , je dois ouvrir une autre page pour vérifier si tu as répondu ou non