Problème vbscript avec SendKeys

Bonjour à tous,
J'ai un petit problème : j'ai crée un code VBscript permettant d'ouvrir cmd.exe en administrateur avec la commande RUNAS et de déplacer un fichier dans le répertoire windows mais le dernier SendKeys avec l'instruction move ne marche pas. Voici mon

Code:

---

1 2 3 4 5 6 7 8 9

set WshShell = WScript.CreateObject("WScript.Shell" ) WshShell.SendKeys "{ENTER}" WshShell.run "runas /user:nom-ordi\blabla cmd.exe" WScript.Sleep 1000 WshShell.SendKeys "truc" WshShell.SendKeys "{ENTER}" WScript.Sleep 1000 WshShell.SendKeys "move /-y C:\Users\blabla2\Desktop\netdom.exe c:\Windows" WSCript.Quit

---

Merci d'avance.

:salut:
Dans ce genre de script je vous déconseille d'utiliser Sendkeys
pour savoir ou ça bloque je vous conseille de construire votre commande puis l'afficher avec un MsgBox puis si elle est correcte vous l'exécuter ;)
Exemple :

Code:

---

1 2 3 4

set WshShell = WScript.CreateObject("WScript.Shell" ) Commande = "cmd /k runas /user:nom-ordi\ move /-y C:\Users\blabla2\Desktop\netdom.exe" MsgBox Commande,64,"construction de la commande" WshShell.Run(Commande,1,True)

---

NB: ce script n'est pas testé. c'est juste à titre d'exemple pour voir la méthode qui vous explique comment vous déboguez plus simplement votre script :zoubi:

Dans mon cas je suis obligé d'utiliser SendKey, car à la fin du runas, une nouvel invité de commande s'ouvre et la seule façon de simuler des actions clavier pour écrire ma commande move, c'est avec SendKey et quand je fais ça, la commande ne s'affiche pas et le script se termine.
Si tu as une solution autre, je suis preneur.


Edit: J'ai utiliser tes MsgBox et toute mes commandes sont bonnes