shutdown poste distant

shutdown poste distant - VB/VBA/VBS - Programmation

Marsh Posté le 21-10-2008 à 11:34:25    

Bonjour
 
Je suis newbies en scripting :pt1cable: et j'aurais souhaité avoir un script qui me redémarre un serveur à distance.J'essaye celui-ci mais ça ne marche pas...... :cry:  
je pense que ça viens d'un pb d'authentification sur le poste distant ? :heink:  
Si un pro pouvait m'aider :hello:  
 
"' Windows Script Host
' Shutdown.vbs
'force la déclaration des variables  
Option Explicit  
 
'variables  
Dim objShell, strComputer, strInput  
Dim strShutdown  
Do  
'choix du serveur  
strComputer = (InputBox(" ComputerName to shutdown", "Computer Name";))  
'si choix serveur ok  
If strComputer <> "" Then  
strInput = True  
End if  
'boucle jusqu'à entrer nom serveur  
Loop until strInput = True  
'commande à lancer  
strShutdown ="shutdown /r /f /m " & strComputer  
'creation de l'instance shell
set objShell = CreateObject("WScript.Shell";)
'execution  
objShell.Run strShutdown  
Wscript.Quit


Message édité par buck94 le 21-10-2008 à 11:35:03

---------------
mon feedback
Reply

Marsh Posté le 21-10-2008 à 11:34:25   

Reply

Marsh Posté le 21-10-2008 à 12:02:26    

J'ai pas assez chercher  
ça marche....


---------------
mon feedback
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed