|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Перезагрузить роутер
Как написать код, который будет посылать wi-fi роутеру команду перезагрузиться?
Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому |
#2
|
|||
|
|||
Руками, думаю через телнет... роутер поддерживает общение через телнет
|
#3
|
||||
|
||||
А если руки далеко?
Суть проблемы такая: Падает интернет, но модем-роутер об этом не догадывается и сам не переподключается. Я пишу прогу, которая будет через определённый интервал времени пинговать гугл, и если ответа нет, значит инет отрубился и надо рестартнуть модем. С пингом я разобрался. Пингует, возвращает результат. (Теперь разобраться бы с файрволом, а то блокирует, гад такой). Так что теперь мне нужен код, который пошлёт роутеру команду на перезагрузку. А то вот ведь геморой: закачку включаю, ухожу куда-нибудь, возвращаюсь, а там уже часа два, как ничего не качается. Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому |
#4
|
||||
|
||||
роутер имеет веб морду, а там, по идее, должна быть кнопка его перезагружающая, остается отправить роутеру по его ip команду такой кнопки
например такая Последний раз редактировалось cotseec, 09.04.2012 в 21:49. |
#5
|
||||
|
||||
у меня ADSL модем с Wi-Fi DLink DSL-2600. для смены сессии (переподключение+новый динамический IP) посылаю по telnet (после авторизации естественно):
Код:
echo 3 > /proc/var/fyi/wan/ppp_0_8_35_1/wanup^M Цитата:
8 и 35 это VPI/VCI Пишу программы за еду. __________________ |
#6
|
||||
|
||||
Отлично, но как это будет выглядеть в Delphi?
Какие-то компоненты нужны или есть системные функции? Я с telnet пока ещё не успел близко познакомиться. Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому Последний раз редактировалось Klassenas, 11.04.2012 в 10:37. |
#7
|
||||
|
||||
любой компонент для работы с telnet. но можно и программку tse.exe использовать:
Цитата:
пример скрипта от первоисточника: Цитата:
Пишу программы за еду. __________________ |
Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
Klassenas (12.04.2012)
|
#8
|
||||
|
||||
Вроде в моей голове начинает что-то проясняться.
Использую IdTelnet с вкладки Indy Clients. Делаю Connect. Роутер отвечает: Password: ****** Я ему в ответ: Код:
IdTelnet1.SendCh('a'); IdTelnet1.SendCh('d'); IdTelnet1.SendCh('m'); IdTelnet1.SendCh('i'); IdTelnet1.SendCh('n'); IdTelnet1.SendCh(#13); IdTelnet1.SendCh('a'); IdTelnet1.SendCh('d'); IdTelnet1.SendCh('m'); IdTelnet1.SendCh('i'); IdTelnet1.SendCh('n'); IdTelnet1.SendCh(#13); Password: ***** Copyright (c) 2001 - 2011 TP-LINK TECHNOLOGIES CO., LTD. TP-LINK> Значит, он принял и логин, и пароль. Авторизация удалась. Только вот пока не догоняю, как ему команду 'reboot' послать? Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому |
#9
|
|||
|
|||
Мануал почитай по роутеру )
|
#10
|
||||
|
||||
Как и ожидал, от мануала оказалось мало толку.
Немного подумав, решил обратиться в службу технической поддержки. Уж они-то знают, как перезагружаются их роутеры! Всё верно: команду reboot роутер не понимает. Зато он прекрасно понимает команду sys reboot. Теперь всё работает! Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому |
#11
|
||||
|
||||
кста, д-линкам можно команду help послать и ответят
Пишу программы за еду. __________________ |
#12
|
||||
|
||||
Как допишу прогу, выложу исходники. Авось кому-нибудь пригодится.
Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому |
#13
|
||||
|
||||
В принципе, прога готова.
Сразу хочу предупредить, что использовал компоненты, не входящие в стандартную комплектацию Delphi: компонент TPing из библиотеки компонентов Internet Component Suite v7, а также TCoolTrayIcon. Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому Последний раз редактировалось Klassenas, 14.04.2012 в 15:42. |
#14
|
||||
|
||||
Окончательная версия программы.
Больше переделывать уже не буду. Усовершенствовал. Функционально, красиво. Предположительно можно настроить под любой роутер. Редкий случай, когда сам доволен тем, что сделал. Но: из стандартных компонентов только форма. Очень уж я люблю поддержку красивых стильных скинов. Прошу простить мне эту слабость. Использованы компоненты из библиотек Internet Component Suite v7, Alpha Controls v 7.5, Indy. Если ты чего-то не знаешь, значит есть шанс научиться чему-то новому Последний раз редактировалось Klassenas, 14.04.2012 в 15:42. |
#15
|
|||
|
|||
Выложите пожалуйста саму прогу
|