Доброго времени суток.
Есть куча удалённых компов, к которым постоянно приходится коннектиться по RAdmin. На всех машинах логин и пароль одинаковые. Для того, чтобы постоянно не вводить одни и те же логин и пароль, написал скрипт:
Код:
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Exec ("""C:\Program Files (x86)\Radmin Viewer 3\Radmin.exe"" /connect:192.168.1.100:4899" )
WScript.Sleep 4000
WshShell.SendKeys "admin"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "admin"
WshShell.SendKeys "{ENTER}"
Подключение проходит и всё бы хорошо, но. Если на удалённом компе медленный интернет и окно ввода логина и пароля не появляется в течение времени(или не появляется вообще), указанного в Wscript.Sleep, то подключения не происходит, а почему-то открывается проводник.
И собственно вопрос. Можно ли переделать скрипт так, чтобы как только появлялось нужное окно, оно бралось в таргет и срабатывал SendKeys? Увеличивать Sleep не вариант, компьютеров очень много, и на большинстве из них скрипт работает, а ждать каждого подключения по 10-15 секунд не комильфо. Пробовал так:
Код:
set WshShell = WScript.CreateObject("WScript.Shell")
Set WshExec = WshShell.Exec ("""C:\Program Files (x86)\Radmin Viewer 3\Radmin.exe"" /connect:192.168.1.100:4899")
If WshExec.Status Then WshShell.AppActivate(WshExec.ProcessID)
WScript.Sleep 4000
WshShell.SendKeys "admin"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "admin"
WshShell.SendKeys "{ENTER}"
Скрипт работает точно так же, как и прежде. Подскажите, кто чем может :)