2010-09-28 12 views

Répondre

2

Utilisez ce script pour démarrer un service:

'' Starts service 'strService' on computer named 'strComputer' 
'' 
Sub StartService(strService, strComputer) 
    Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" _ 
     & strComputer & "\root\cimv2") 
    Set colListOfServices = objWMIService.ExecQuery("Select * from Win32_Service Where Name ='" & strService & "'") 
    For Each objService in colListOfServices 
     objService.StartService 
    Next 
End Sub 

'' Start Windows CardSpace service on local host: 
StartService "idsvc", "." 

Au lieu de StartService, vous pouvez utiliser StopService pour arrêter le service. Voir this MSDN article pour d'autres méthodes utiles de Win32_Service.

+0

Cela m'a beaucoup aidé. Merci. Mais que faire s'il y a des services de dépendance? cela s'arrêtera-t-il et commencera-t-il? existe-t-il également un service "RestartService" comme le service de démarrage et d'arrêt? S'il vous plaît aider. Merci d'avance. –

+0

Consultez la documentation de la méthode StartService (http://msdn.microsoft.com/en-us/library/aa393660(VS.85).aspx). Tous les services dont dépend le service démarré seront démarrés automatiquement; les services qui dépendent du service démarré ne seront pas démarrés automatiquement. Si vous voulez faire ce dernier, vous pouvez utiliser l'un des exemples de scripts de http://www.activexperts.com/activmonitor/windowsmanagement/adminscripts/services/ (cherchez 'Win32_DependentService'). –