Скрипт перезагрузки ADSL модема при потере связи

[Bedazzled]

искал как зделать чтобы мадем сам себя перезагружал когда связь обрывается, и вот нашол, думаю многим пригодится (особено у тех у кого д-линк чтоит

Собственно, скрипт (modem.vbs):


Код:

On Error Resume Next

strComputer = "."
strTarget = "turbo.uralcom.com" 'IP address or hostname
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colPings = objWMIService.ExecQuery _
("Select * From Win32_PingStatus where Address = '" & strTarget & "'")
If Err = 0 Then
Err.Clear
For Each objPing in colPings 'избавиться от форича
If Err = 0 Then
Err.Clear
If objPing.StatusCode = 0 Then
' если статус = 0, пустая строка - другое
Else
Set oShell = WScript.CreateObject("WScript.Shell")
oShell.Run "telnet.exe 192.168.1.1"
WScript.Sleep 1000
oShell.SendKeys "user" & chr(13)
WScript.Sleep 1000
oShell.SendKeys "password" & chr(13)
WScript.Sleep 1000
oShell.SendKeys "reboot" & chr(13)
End If
Else
Err.Clear
WScript.Echo "Unable to call Win32_PingStatus on " & strComputer & "."
End If
Next
Else
Err.Clear
WScript.Echo "Unable to call Win32_PingStatus on " & strComputer & "."
End If
Пояснения:
turbo.uralcom. com - сервер, при отсутсвии пинг-ответа которого считаем, что есть проблема или с модемом или с коннектом. нельзя использовать сервера microsoft, т.к. они на пинги не отвечают.
user - логин админа ADSL модема, указан в документации, для D-Link - админ
password - пароль админа модема, указан в документации или такой, как вы установили.

Использование:
сохранить в файл с расширением .vbs, добавить этот файл в Панель управления -> Назначенные задания -> Добавить задание
на периодичность запуска, скажем, в 30 минут.

ВЗЯТО http://club.2-u.ru/forum/index.php?action=printpage;topic=14761.0

ЕСЛИ НЕ БУДЕТ РАБОТАТЬ попробуйте в имени пользователя вписать ROOT

[Dima50]

Привет.
Я посмотрел на твой скрипт. И захотел тоже попробовать настроить через telnet пусть руками, поглядеть как это будет.
запустил telnet
Команду подключения к серверу запустил o 198.162.1.1
Но он мне не дает подключитсся. Говорит...облом батенька....
ты не в курсе из-за чего это?
может у меня в Интеркросс нет этой опции по 23 порту поключастья через telnet ? хотя в паспорте есть.
Дима

[Bedazzled]

а какой мадем?
я проверял программой D-Link Monitor.
http://zyxmon.streamclub.ru/other.php#ZtnBatch

а ругается при подключении на имя пользователя?


полистай тут http://club.2-u.ru/forum/index.php?action=printpage;topic=14761.0 возможно найдёшь чтото нужное.

[Crash_n]

[Kran]

Господа, я думаю что правильнее в этом случае использовать пинг до шлюза, а не до левого сайта)

[Crash_n]

[sergeyich]

А есть ли какая нить консольная команда для перезагрузки D-link2540U, а то не удобно постоянно через интерфейс заходить, интересно скрипт попробовать, поможет или нет, а то раз в несколько суток соединение лагает, нужно ребут делать. А с консольной коммандой пойдобней бы было #2

[Aquatarkus]

Блин, классная тема! :о)
Теперь хоть не будет утром настроение портиться из-за потерянной компьютероночи)))

Да, кстати, для хуавея 880 строку reboot надо исправить на set reboot.

[forumnetadsl]

После месячного поиска и перебора программ нашел очень неплохую программу MonConnInet. Несколько функций, разработчик помог подстроить перезагрузку под свой модем. Рекомендую всем, у кого аналогичние проблемы и скрипт не помогает!