Тема: VBS: Закрыть полностью окно после Telnet
Начало и конец telnet.vbs скрипта по перезагрузке модема.
Set cloner = CreateObject("WScript.Shell")
cloner.run"cmd.exe"
.....
cloner.SendKeys"reset"
WScript.Sleep 1000
cloner.SendKeys("{Enter}")
WScript.Sleep 1000
WScript.Quit
WScript.Exit
Option explicit
Dim oShell
set oShell= Wscript.CreateObject("WScript.Shell")
oShell.Run "telnet"
WScript.Sleep 3000
oShell.Sendkeys "open 192.168.1.1~"
WScript.Sleep 3000
oShell.Sendkeys "admin~"
WScript.Sleep 3000
oShell.Sendkeys "mypassword~"
WScript.Sleep 3000
oShell.Sendkeys "system reboot~"
WScript.Sleep 3000
oShell.Sendkeys "~"
Wscript.Quit
Может случится и не фиксированое время перезагрузки модема. После его выполнения остаётся cmd окно.
1. Как закрыть польностью окно чтобы ничего не оставалось?
1.1 Также после перезагрузки нужно убить процесс rasauto.exe.
2. После перезагрузке модема, может быть случай вызова cmd rasdial, где после перезагрузки модема выполнить подключение rasdial через cmd, так чтобы переход с vbs на cmd автоматически и vbs не оставляло окон.