• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

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

  • Автор темы 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 всё работает!!!
При добавлении задачи ставил галочку выполнять с наибольшим приоритетом всё тоже самое!!!
 
M

-master-

что значит не работает? тихо ничего не делает?
 
A

alekssgor

Консоль запускается роултер выдаёт запрос пароля пароль принимается но вместо комнды sys reboot выводится //52 и пишит неправильная команда
Вобщем в скрипте ошибка!!! захожу в ручную набираю команду help выдаёт все команды к роултеру
Какую команду не поставлю в скрипт вместо sys reboot одно и тоже пишит неправильная команда а в ручную всё работает!!!
Сам скрипт лежит в Моих документах может в System32 закинуть???
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!