Send ne fonctionne pas avec Runas
Posté : mer. 13 déc. 2017 15:39
Bonjour à tous,
je souhaite automatiser une action dans une mmc, que je lance donc en tant qu'admin et je me heurte à ce pb.
J'ai appliqué mon pb avec Notepad qui réagit pareil.
En effet, avec Run, je peux lancer Notepad et envoyer un texte via Send, mais avec RunAs, je n'arrive pas à renvoyer de texte, ou de commande avec Send.
D'ailleurs la fermeture Winclose ne fonctionne pas non plus.
Est ce un pb de droit ???
Bref, merci de votre aide.
je souhaite automatiser une action dans une mmc, que je lance donc en tant qu'admin et je me heurte à ce pb.
J'ai appliqué mon pb avec Notepad qui réagit pareil.
En effet, avec Run, je peux lancer Notepad et envoyer un texte via Send, mais avec RunAs, je n'arrive pas à renvoyer de texte, ou de commande avec Send.
D'ailleurs la fermeture Winclose ne fonctionne pas non plus.
Est ce un pb de droit ???
Bref, merci de votre aide.
Code : Tout sélectionner
#include <AutoItConstants.au3>
Opt("WinTitleMatchMode", 2)
Opt("TrayIconDebug", 1)
Opt("GuiCloseOnEsc", 1)
Local $sUserName = "user"
Local $sPassword = "password"
Local $iPID = RunAs($sUserName, @ComputerName, $sPassword, 0, "notepad.exe", "", @SW_SHOWMAXIMIZED)
;Local $iPID = Run("notepad.exe")
WinActivate ($iPID) ;prend le focus
Send ("Ceci est un test")
Send ("!f") ;ALT F ;Fichier
Send ("{q}") ;Q ;Quitter
Send ("{n}") ;N ;Ne pas sauvegarder
MsgBox (64, "Information", "Fermeture de la fenetre de travail")
WinClose ($iPID)