Bonjour à tous,
J'essaye de faire un script qui permet de lancer plusieurs programmes en tant qu'un autre utilisateur sans avoir à rentrer autant de fois le mot de passe qu'il y a de programmes. Pour cela j'utilise la commande runas, comme ceci:
Je n'ai pas de problèmes pour lancer les applications, par contre je ne sais pas comment faire pour récupérer les erreurs de la commande runas si les login/mot de passe ou le programme sont incorrects. Pourriez vous m'éclairer sur ce point?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Function runasadmin (user,passwd,pgm) Dim WshShell Set WshShell = WScript.CreateObject ("WScript.shell") WshShell.run("%SYSTEMROOT%\system32\runas.exe /noprofile /user:" & user & " """ & pgm & """") WScript.Sleep 100 WshShell.SendKeys passwd & "~" WScript.Sleep 100 Set WshShell = Nothing End Function
Merci par avance pour vos réponses
Partager