VBScript lancer une application à distance

Salut à tous !

Je travail donc sur une réseau possédant un Domaine. Etant administrateur réseau, pour les priviliège, j'ai ce qu'il faut!

Maintenant mon but est de lancer par exemple NotPad sur une machine distante, tel un serveur.

J'utilise le VBScript et j'ai donc effectuer des recherches sur le net et voila le code que j'obtient :

'Variable pour rendre la fenetre Affiché
Const HIDDEN_WINDOW = 1

'L'ordinateur cible
strComputer = "."

'Connexion au service WMI et initialisation de ProcessStartup
Set objStartup = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_ProcessStartup")

'Connexion au service WMI et initialisation de Process
Set objProcess = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_Process")

'Pour afficher la fenêtre
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW

errReturn = objProcess.Create("Notepad.exe", null, objConfig, intProcessID)

If Error = 0 Then
Wscript.Echo "Ok " _
& intProcessID & "."
Else
Wscript.Echo "No" & _
Error & "."
End If


Ce code en local marche trés trés bien ! Mais si j'indique un poste autre, il me dis bien que le processus à été lancé, avec le handle.... mais rien a l'écran ! Ce pendant il est bien lancé dans les processus en faisant CRTL+ALT+SUPPR.

Je me demande d'ailleur si il est Freezé ... ?
Donc mon but c'est de réussir à afficher la fenêtre à l'écran, qu'il ne soit pas en caché !


Je vous remerci de votre attention !

Mon site sur la xbox : http://www.vsxbox.com