Discussion :

[titi04]

Bonjour forum,

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

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

Voici le code du fichier .bat:

Code :

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

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 :

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

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?

[titi04]

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

Code :

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

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

[titi04]

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 :

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

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 :

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

1
2
3
cscript.exe "chemin\Test.vbs"
PAUSE

[sissouuuu]

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 :

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

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