Discussion :

[goliath99]

Bonjour à tous,

j'ai un petit problème pour rebooter un ordi distant utilisant windows XP (sp2) en script vbs . J'ai pourtant les comptes d'admin sur les deux postes (ma machine et celle que je veux redémarrer).
Voila le script (on le trouve un peu partout):

Set OpSysSet = GetObject("winmgmts:{(Shutdown)}\\"pc_distant"\root\cimv2").ExecQuery("select * from Win32_OperatingSystem where Primary=true")

For Each Item in OpSysSet
Item.Reboot
Next

J'ai donc l'erreur suivante :
GetObject : permission refusée

Y'a t-il un service à activer sur la machine distante ou autre chose à faire ?

merci d'avance.

[Laurent Dardenne]

Il manque peut être la déclaration du privilége suivant avant Getobject :
objWMIServices.Security_.Privileges.Add wbemPrivilegeShutdown, True

[goliath99]

houla ... c de l'API tout ca ...
faut le temps de digéré ...

[Louis-Guillaume Morand]

moi je lance la commande shutdown -r -t 1 sur lordi distant. bon, ca affiche une seconde un popup sur lordi distant mais ca marche.

et stp, utilise les balises code , cest fait pour

[Soubi]

J'ai essayé pas mal de truc en VBS/WMI et j'ai souvent eu cette erreur sans trouver la cause... tiens moi au courant si tu réussi, sinon essaye la solution d'avant...

lance la commande shutdown -r -t 1 sur lordi distant

[Laurent Dardenne]

J'ai trouvé ceci :

Code :

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

1
2
3
4
5
6
7
8
9
Set objectLocator = CreateObject("WbemScripting.SWbemLocator")
Set objectWMIService = objectLocator.ConnectServer("Remote2003servername","root\cimv2","administrator","Password")
objectWMIService.Security_.AuthenticationLevel = 3
objectWMIService.Security_.ImpersonationLevel = 3
set OpSysSet = objectWMIService.ExecQuery("select * from Win32_OperatingSystem where Primary=true")
for each OpSys in OpSysSet
  OpSys.ShutDown(8+4)
next

"Make sure the user (in your case administrator) has permissions (remote enable) on all the remote 2003 servers root\cimv2 namespace."