| auteur : cedric600 |
En utilisant la classe Win32_Service :
VBS |
strComputer = " . "
Set objWMIService = GetObject (" winmgmts:\\ " & strComputer & " \root\CIMV2 " )
Set colItems = objWMIService. ExecQuery (" SELECT * FROM Win32_Service " ,,48 )
For Each objItem in colItems
Wscript. Echo " Service : " & objItem. Name & " : " & objItem. State
Next
Set colItems = Nothing
Set objWMIService = Nothing
|
|
lien : Microsoft Win32 Service class
|
Consultez les autres F.A.Q's
Les sources présentés sur cette pages sont libre de droits,
et vous pouvez les utiliser à votre convenance. Par contre cette page de présentation de ces sources constitue une oeuvre intellectuelle protégée par les droits d'auteurs.
Copyright ©2008
Developpez LLC. Tout droits réservés Developpez LLC.
Aucune reproduction, même partielle, ne peut être faite de ce site et de
l'ensemble de son contenu : textes, documents et images sans l'autorisation
expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à 3 ans
de prison et jusqu'à 300 000 E de dommages et intérets.
Cette page est déposée à la SACD.
|