Lancer .vbs via .bat (runas) (Windows XP)

Bonjour forum,

Je me casse la tête depuis qq jours avec cette histoire:scarymov:.

Je souhaite lancer un fichier .vbs depuis un fichier .bat avec la fonction runas.

Voici le code du fichier .bat:

Code:

---

1 2 3

runas /user:domain\admin "chemin\nom_fichier.vbs" PAUSE

---

Le dos me demande bien le password mais ne lance pas le fichier .vbs, l'erreur est la suivante:

Code:

---

1 2 3 4 5 6 7 8 9

chemin>runas /user:domain\admin "chemin\nom_fichier.vbs" Enter the password for domain\admin: Attempting to start chemin\nom_fichier.vbs as user "domain\admin" ... RUNAS ERROR: Unable to run - chemin\nom_fichier.vbs 193: chemin\nom_fichier.vbs is not a valid Win32 application. chemin>PAUSE Press any key to continue . . .

---

Comment puis-je lancer ce .vbs avec runas?

J'ai réussi à trouver comment lancer le .vbs:

Code:

---

1 2 3

runas /profile /user:domain\admin "cscript.exe \"chemin\nom_fichier.vbs"\" PAUSE

---

Ce code lance bien le .vbs.

Savez-vous comment ajouter le password de l'admin dans ce script au lieu de le demander sous DOS?

Merci

Je n'ai pas trouvé la solution avec le .bat. Donc, je lance un .vbs (runas) qui lance le .bat.

code pour le .vbs avec runas:

Code:

---

1 2 3 4 5 6 7 8

set WshShell = WScript.CreateObject("WScript.Shell" ) WshShell.run "runas /user:domain\admin ""chemin\Test.bat""" WScript.Sleep 1000 WshShell.SendKeys "pwd" WshShell.SendKeys "{ENTER}" WScript.Sleep 1000

---

code du .bat:

Code:

---

1 2 3

cscript.exe "chemin\Test.vbs" PAUSE

---

Merci pour cette solution,

Moi j'ai une petite question si je veux masquer le tout je rajoute ",0" mais du coup la sendkeys ne fonctionne pas et rien ne se lance....

Code:

---

1 2 3 4 5 6 7 8

set WshShell = WScript.CreateObject("WScript.Shell" ) WshShell.run "runas /user:domain\admin ""chemin\Test.bat""",0,true WScript.Sleep 1000 WshShell.SendKeys "pwd" WshShell.SendKeys "{ENTER}" WScript.Sleep 1000

---

Quelqu'un aurait une solution ?

Merci d'avance