Discussion :

[fabrice518]

Bonjour à tous,

je parcour le web depuis un ptit bout de temps et je ne trouve pas grand chose de valable...

Je cherche simplement à faire un runas qui comprend un mot de passe.

j'ai testé :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim oShell 
 
set oShell= Wscript.CreateObject("WScript.Shell")
 
oShell.Run "runas /user:administrateur "C:\test.EXE""
 
WScript.Sleep 100
 
oShell.Sendkeys "password"
 
Wscript.Quit

mais sans succès.

Ca m'a pas l'air si complexe !

Merci pour votre coup de pouce !

Fabrice

[SfJ5Rpw8]

c'est pas le runAS qui "comprends pas" le mot de passe c'est l'application ... ?test.exe..?

[fabrice518]

Merci pour ta réponse,
j'ai trouvé en me creusant la tete :
Il faut néamoins telechager psexec...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
on error resume next
 
Set WshShell = CreateObject("wscript.Shell")
 
strcmd = "cmd /k "
user = " -u " & chr (34) & "MonUser" & chr (34)
mdp = " -p " & chr (34) & "MonPassword" & chr (34)
soft = " " & chr (34) & "C:\toto.EXE" & chr (34)
 
strCmdLine = strcmd & "psexec" & user & mdp & soft
 
'wscript.echo strcmdline
 
'WshShell.Run strCmdLine, 9, False
WshShell.Run strCmdLine, 0, true

Voila une base....

Merci
___________________________________
PS bbil: comprend dans le sens contenir...