11мес
Программирование
+2vbs на Win11 работает криво.
Я не эксперт в скриптах. Хочу написать скрипт, чтобы отрубал/вырубал ВПН в Кинетике. Ручками если в Телнете писать, там всё работает. Vbs ведёт себя неадекватно, открывает различные приложения на рабочем столе и посылает туда нажатия клавиш.
Вот отрывок:
1234567891011121314
Dim WshShell
Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.run "cmd.exe"
WScript.Sleep 500
WshShell.SendKeys "telnet"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 500
WshShell.SendKeys "open 192.168.1.1"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 2000
WshShell.SendKeys "[admin]"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 100
Почему он вызывает Консоль, и в то же время открывает что попало на рабочем столе и шлёт туда нажатия, а не в консоль?
ДополненРазобрался. ПРосто паузы длиннее надо поставить. Видать консоль не успевала открываться, а нажатия уже летели куда попало. Отвечать не нужно
По дате
По рейтингу
нафиг эта городьба? напиши ватник с перенаправлением ввода и все.
или через curl http запрос сделать.