Тема: vbs скрипт для перегрузки атс LDK300 и L|DK100

On Error Resume Next

strComputer = “.”

Set oShell = WScript.CreateObject(“WScript.Shell”)
oShell.Run “telnet.exe 192.168.15.240”
WScript.Sleep 1000
oShell.SendKeys chr(13)
WScript.Sleep 500
oShell.SendKeys “jannie” & chr(13)
WScript.Sleep 500
oShell.SendKeys “reboot” & chr(13)
WScript.Sleep 500
oShell.SendKeys “1111” & chr(13)
WScript.Sleep 500
oShell.SendKeys “1111” & chr(13)
WScript.Sleep 500

Сохраните с нужным name.vbs и запускайте через шедулер