Discussion :

[yoyo-tns]

Bonjour

Nous possédons un serveur dans une DMZ ou nous devons faire l'arrêt et relance de 2 services a distance
ne connaissant pas VBS et après des recherches nous ne trouvons pas de script capable de faire cela
quelqu'un en aurait il un sous la main ?

Avec nos remerciements

[ericlm128]

La solution la plus viable serait d'en demander l'arrêt à distance via le WMI .
Encore fait il avoir les accès nécessaires sur le serveur pour ce faire.

Voici un exemple trouvé sur http://www.computerperformance.co.uk...i_services.htm

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
' VBScript Restart Service.vbs
' Sample script to Stop or Start a Service
' www.computerperformance.co.uk/
' Created by Guy Thomas December 2010 Version 2.4
' -------------------------------------------------------'
Option Explicit
Dim objWMIService, objItem, objService
Dim colListOfServices, strComputer, strService, intSleep
strComputer = "."
intSleep = 15000
WScript.Echo " Click OK, then wait " & intSleep & " milliseconds"
 
'On Error Resume Next
' NB strService is case sensitive.
strService = " 'Alerter' "
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.StopService()
WSCript.Sleep intSleep
objService.StartService()
Next
WScript.Echo "Your "& strService & " service has Started"
WScript.Quit
' End of Example WMI script to Start / Stop services

[yoyo-tns]

Merci