Vbs etat d'un service windows
Résolu
bobo
-
bobo -
bobo -
Bonjour,
Je suis vraiment nul en développement et j'ai pas beaucoup le temps d"apprendre.
Peut ont m'écrire un petit programme en vbs qui test un service windows et qui renvoit :
- 1 pour service start
- 0 pour service stop
Bien cordialement.
Je suis vraiment nul en développement et j'ai pas beaucoup le temps d"apprendre.
Peut ont m'écrire un petit programme en vbs qui test un service windows et qui renvoit :
- 1 pour service start
- 0 pour service stop
Bien cordialement.
A voir également:
- Service.vbs
- Service spouleur - Guide
- Clé windows 8 - Guide
- Montage video gratuit windows - Guide
- Windows movie maker - Télécharger - Montage & Édition
- Windows ne démarre pas - Guide
Merci d'avance.
Un peu plus simple:
A vous de mettre le nom du service
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
'Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Service Where Name = 'aspnet_state'",,48)
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Service Where Name = 'Themes'",,48)
'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
Le programme renvoit: Stopped ou Running
Bonne suite
il faut modifier :
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Service Where Name = 'Telnet'",,48) par exemple ?
Merci de votre aide.
Je vous le fais.
A+