Discussion :

[jekk]

Bonjour j'aimerais faire la même chose que dans cette discussion mais en exécutant le script sur un poste réseaux a distance.
chez moi j'exécute le remote que voici :

Code :

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

1
2
3
Set obj = CreateObject("Shell.Application")
obj.ShellExecute "\\totoUserReseau\temp\alarmes.vbs"
Set obj = Nothing

temp est un répertoire partagé de l'ordinateur "totoUserReseau" surlequel j'ai tout les droits et dans lequel j'ai le script alarme.vbs qui joue un fichier wav. (je le place a tout hasard);

Code :

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

1
2
3
4
dim strWavFile
chemson = "C:\temp\sondeclocher.wav"
Set objShell = CreateObject("WScript.Shell")
objShell.Run "Sndrec32 /play /close """ & chemson & """", SW_HIDE

Quand je l'exécute il me dit qu'il est impossible d'ouvrir "c:\temp\alarmes.vbs" je ne comprend pas car quand j'exécute "alarme.vbs" en local sur "totoUserReseau" tout ce passe correctement.

[jekk]

Bonjour je souhaite faire la même chose mais en exécutant le scritp sur une machine distante.

j'ai un script qui se nome alarme.vbs (situé sur la machine totoUserReseau) qui exécute un fichier wav :

Code :

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

1
2
3
4
dim strWavFile
chemson = "C:\temp\sondeclocher.wav"
Set objShell = CreateObject("WScript.Shell")
objShell.Run "Sndrec32 /play /close """ & chemson & """", SW_HIDE

Je souhaite pouvoir exécuter ce script d'une machine distante.

je place alarme.vbs sur "c:\temp\alarme.vbs" qui est un dossier partagé de la machine s'appelant "totoUserReseau" et de mon poste j'exécute ceci :

Code :

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

1
2
3
Set obj = CreateObject("Shell.Application")
obj.ShellExecute "\\totoUserReseau\temp\alarme.vbs"
Set obj = Nothing

Quand j'exécute ce script (remote.vbs) il m'affiche ce message d'erreur :

impossible d'ouvrir : "C:\temp\alarmes.vbs"

, ce qui est normal puisque qu'il n'est pas sur mon poste mais sur totoUserReseau.

PS j'ai tout les droit sur le dossier partagé et alarme.vbs s'exécute normalement en local sur totoUserReseau
j'ai aussi trouvé un autre moyen :

Code :

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

1
2
3
4
Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript(\\totoUserReseau\temp\alarmes.vbs)
RemoteScript.execute

Savez vous ce qui se passe? comment faire?

Les 2 messages ci-dessus ont été déplacé d'une discussion résolue (voir lien dans le premier).
AlainTech

[jekk]

arf désolé, j'ai réposté car j'ai cru a une erreur de ma part. La prochaine fois je cherche d'abord promis ^^.