• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

Ошибка В Скрипте

  • Автор темы Автор темы alekssgor
  • Дата начала Дата начала
A

alekssgor

Подскажите кто занает! Скачал скрипт к роултору с сайта производителя для добавления задачи по расписанию
для перезагрузки роултера по расписанию. В XP работает а в 7 вообще не работает!!! В чём проблема???

Скрипт в первоначальном виде:
Код:
set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.run "telnet.exe"

WScript.Sleep 5000
WshShell.SendKeys"o 192.168.1.1" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"1234" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"sys reboot" & chr(13)

WScript.Sleep 3500
ProcessClose("cmd.exe")
ProcessClose("telnet.exe") 
Function ProcessClose(sProcName) 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & sProcName & "'") 
For Each objProcess in colProcessList 
objProcess.Terminate() 
Next 
End Function
Данный скрипт вообще не устонавливает соединение с роултером
Изминил скрипт на
Код:
set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.run "telnet.exe 192.168.1.1"

WScript.Sleep 5000
WshShell.SendKeys"1234" & chr(13)

WScript.Sleep 5000
WshShell.SendKeys"sys reboot" & chr(13) //команда не выполняется!!!

WScript.Sleep 3500
ProcessClose("cmd.exe")
ProcessClose("telnet.exe") 
Function ProcessClose(sProcName) 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & sProcName & "'") 
For Each objProcess in colProcessList 
objProcess.Terminate() 
Next 
End Function
Данный скрипт запускает telnet устанавливает связь с роултером принимает пароль но саму команду не выполняет!!!
Команда правильная руками выполняю через telnet всё работает!!!
При добавлении задачи ставил галочку выполнять с наибольшим приоритетом всё тоже самое!!!
 
что значит не работает? тихо ничего не делает?
 
Консоль запускается роултер выдаёт запрос пароля пароль принимается но вместо комнды sys reboot выводится //52 и пишит неправильная команда
Вобщем в скрипте ошибка!!! захожу в ручную набираю команду help выдаёт все команды к роултеру
Какую команду не поставлю в скрипт вместо sys reboot одно и тоже пишит неправильная команда а в ручную всё работает!!!
Сам скрипт лежит в Моих документах может в System32 закинуть???
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab