Text an verstecktes Fenster senden

[frank trabin]

Hi,
hab ein kleines VBScript geschrieben um ein befehl im Windows CMD als Admin ausführen zu können ohne das pw eintippen zu müssen.

Dim objhell
Set objShell = CreateObject ("WScript.Shell")
objShell.Run ("runas /savecred /user:PC666\Administrator cmd")
WScript.Sleep 20
objShell.SendKeys "pw~"
WScript.Quit

Funktioniert auch einwandfrei. Das Problem ist aber, dass immernoch ein cmd fenster kurz aufflackert.
Wenn ich es per

objShell.Run "runas /savecred /user:PC666\Administrator cmd", 0

verstecke kann ich mit der sendkey funktion kein text mehr hinein senden.

Meine Frage, wie kann ich an ein verstecktes Fenster Text senden?