Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.60/70: Рейтинг темы: голосов - 70, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
VBS

Скрипт для перезагрузки роутера по значению внешнего IP

11.01.2021, 23:52. Показов 16228. Ответов 227
Метки vbs (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго времени суток! Ребята, нужен скрипт перезагрузки роутера, если первый октет внешнего адреса имеет значение 100. Перезагружать пока первый октет имеет значение 100 (или можно ограничиться 10 перезагрузок с проверкой и затем, если не изменился, то повторить перезагрузку через некоторое время).
Я не программист. Поискав, нашел некоторые намётки. Можно через TELNET организовать перезагрузку, кусочек скрипта уже опробовал, работает. А вот с проверкой условия труднее. Есть вроде бы вариант через IFCONFIG получить внешний ppp0 inet addr.
Не пинайте, если не в той теме обратился.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
11.01.2021, 23:52
Ответы с готовыми решениями:

Файл или скрипт для автоматической перезагрузки роутера
Ребята помогите написать исполняемый файл или рабочий скрипт для автоматической перезагрузки роутера в ОС Windows. Сам не могу. Как делую: ...

Скрипт перезагрузки роутера при разрыве коннекта
Доброго времени, уважаемые знатоки. Хочу отредактировать скрипт для ADSL QDSL-1040WU-FON, перезагрузки роутера при разрыве коннекта. ...

Батник для перезагрузки роутера
Добрый день подскажите как написать батник перегрузки роутера

227
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
30.01.2021, 22:36
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от KOHTAKT Посмотреть сообщение
Вобщем-то, изменения небольшие, а в остальном опять "каша" в окнах.
Хотелось бы узнать подробности.
Цитата Сообщение от KOHTAKT Посмотреть сообщение
до перезапуска роутера.
Так. Вероятно нужно какое-то время перед тем, как интернет пропадёт после выполнения reboot. Добавьте : WSH.Sleep 3000 в конец 31 строки.
0
Эксперт NIX
3308 / 935 / 202
Регистрация: 14.01.2013
Сообщений: 4,777
31.01.2021, 04:28
KOHTAKT, код из поста 116 не пробовали испытать? Ожидание нажатия Enter позволит отрегулировать таймаут ребута ручную. После 29 строки можете вставить Msgbox(a(0)), чтобы увидеть цифру первого октета, которую получил скрипт. А пока он висит на паузе (ждёт нажатия Enter), сходите на вебморду и выясните, какой там ip сидит.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 12:18  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
Хотелось бы узнать подробности.
Да такая же "каша", как и перед этим описывал: начинает беспорядочно закидывать логин, пароль, команды консоли в командную строку или просто без неё. Потом если вводимые данные попали в нужные места начинается работа скрипта по новой, ребутится роутер и в это время та же "каша" во всех открытых окнах: и в telnet, и в командной строке.
Попробую скрипт с изменениями и отпишусь.

Добавлено через 10 минут
Цитата Сообщение от FlasherX Посмотреть сообщение
: WSH.Sleep 3000 в конец 31 строки
Без пробела добавить к строке? И ещё, перед WSH не нужна "o"? Везде в коде перед такими операторами есть она.
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
31.01.2021, 12:20
Цитата Сообщение от KOHTAKT Посмотреть сообщение
или просто без неё.
Не понимаю. Перед каждым вводом активируется единственное cmd-окно, которое запустил сам скрипт (остальные должны игнорироваться).
Цитата Сообщение от KOHTAKT Посмотреть сообщение
во всех открытых окнах: и в telnet, и в командной строке.
В смысле? Окно только одно должно открываться. telnet с выводом выполняется в рамках cmd. Что-то какие-то странности у вас.
Допустим, вы выполнили
Visual Basic
1
CreateObject("WScript.Shell").Run "%ComSpec%"
, потом вручную вводите telnet 192.168.0.1 и Enter. Доп. окно появляется или нет?

Цитата Сообщение от KOHTAKT Посмотреть сообщение
Без пробела добавить к строке? И ещё, перед WSH не нужна "o"?
Делайте, как я пишу. Это разные объекты. Пробел неважен.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 12:28  [ТС]
Kubuntovod, ваши предложения я внимательно тоже рассматриваю. Извините, увлекся чтением ваших споров с коллегой и пролистал последний код. ) Обязательно попробую и отпишусь.
0
Эксперт NIX
3308 / 935 / 202
Регистрация: 14.01.2013
Сообщений: 4,777
31.01.2021, 12:40
Цитата Сообщение от KOHTAKT Посмотреть сообщение
Обязательно попробую и отпишусь.
От Вас требуется провести некую процедуру отладки. Т.е., скрипт своими путями получает данные, Вы, вручную, своими. Сравниваете результаты. Где-то там собака зарыта.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 12:42  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
Доп. окно появляется или нет?
Нет, не появляется. Но во время выполнения скрипта отдельное окно telnet появляется. Может это потому, что я изначально из командной строки запускаю код, а не напрямую? Напрямую мне как-то опасливо запускать, потому что всякое может происходить от его деятельности. )
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
31.01.2021, 12:57
Цитата Сообщение от KOHTAKT Посмотреть сообщение
Может это потому, что я изначально из командной строки запускаю код, а не напрямую?
В этом вообще нет смысла. Если вы про то, что к вручную вызванному окну добавляется ещё одно cmd, то это к делу не относится. Запускайте, как я уже писал ранее, стандартным способом. Ещё одна консоль только сбивает с толку.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 13:11  [ТС]
FlasherX, запустил скрипт с последними изменениями. Поставил в нем максимальное число перезагрузок роутера 10. Вначале работы было, как показано на скриншоте. Потом уже в окне telnet пробежало несколько строк из логина, пароля, ребута. И потом вроде бы работа наладилась в "чистом" виде: telnet ожидал соединения с роутером и потом ребутил его. Не посчитал точно, сколько раз перегрузился роутер (но меньше 10) и работа скрипта остановилась, окно осталось с ожиданием соединения, а роутер показывал "хороший" IP. Окно смены IP не появлялось.
Но после запуска скрипта ещё раз, для проверки, он отработал только один раз и остановился, при этом выдало окно смены IP (опять указал текущий перед перезагрузкой). А IP стал "плохим" с началом на 100.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 13:13  [ТС]
FlasherX, скриншот не добавил )
Миниатюры
Скрипт для перезагрузки роутера по значению внешнего IP  
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
31.01.2021, 13:32
KOHTAKT, ну вот, это уже что-то.

Цитата Сообщение от KOHTAKT Посмотреть сообщение
Вначале работы было, как показано на скриншоте.
О причинах сбоя соединения скрипт знать не может. Тут сходу предполагается положительный коннект.
Цитата Сообщение от KOHTAKT Посмотреть сообщение
но меньше 10
Как раз 10, иначе окно бы появилось. То, что хватило ровно 10-ти для "хорошего" IP, — просто совпадение.
Цитата Сообщение от KOHTAKT Посмотреть сообщение
И потом вроде бы работа наладилась в "чистом" виде
А сколько времени на всё ушло?
Цитата Сообщение от KOHTAKT Посмотреть сообщение
А IP стал "плохим" с началом на 100.
Так мы смотрим не 100, а 85. Окно не могло выдать 85, цикл бы продолжался.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 16:40  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
Так мы смотрим не 100, а 85
Извиняюсь, я с веб-панели роутера "плохой" указал на 100, для скрипта он соответственно на 85 от внешних источников.
Сейчас ещё раз запустил код, так же с 10 переагрузками. Но отработал он явно меньше, судя по коннектам в telnet 3-4 раза. У меня предроложение, что в скрипте считаются перезагрузками и неудавшиеся попытки подключения для проверки, это те, что я и раньше писал, которые проходят "мусором", т.е. где данные не попадают в нужные поля ввода. На скриншоте как раз постарался захватить эту ситуацию.
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 16:41  [ТС]
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 16:44  [ТС]
FlasherX, сейчас ещё раз загрузил скрипт, вроде бы он отработал, подключение осталось на IP с 46. Как-то не всегда скрипт срабатывает правильно что ли?
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 16:48  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
А сколько времени на всё ушло?
Ну как только правильно совпадет поле ввода и данные. Вот на скриншоте то, что перед "чистой" работой.
Предыдущий скриншот не тот, что хотел отправить. Вот этот нужно было
Миниатюры
Скрипт для перезагрузки роутера по значению внешнего IP  
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
31.01.2021, 16:52  [ТС]
FlasherX, сохранил скриншот новый не в том формате, а по названию опять старый влепил ))
Третья попытка скриншота, который в тему к последним постам, где выбрасывает "мусор" во время потери соединения.
Миниатюры
Скрипт для перезагрузки роутера по значению внешнего IP  
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
31.01.2021, 18:05
KOHTAKT, а вы обе тильды поставили, как я и советовал? Также в той же 28 строке советую повысить задержку до 200/300. Можно на больших значениях проверить. В общем, тестируйте, пока не взлетит.
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
31.01.2021, 23:17
Подумал, всё же стоит таки и ctel попробовать:
Windows Batch file
1
ctel /host:192.168.0.1 /port:23 /com:admin /ent /com:12345 /ent reboot /ent /ent
Вложения
Тип файла: zip ctel.zip (123.9 Кб, 8 просмотров)
0
0 / 0 / 0
Регистрация: 11.01.2021
Сообщений: 118
01.02.2021, 16:00  [ТС]
Цитата Сообщение от FlasherX Посмотреть сообщение
Подумал, всё же стоит таки и ctel попробовать
После запуска ничего не происходит, курсор мигает на новой строке.

Добавлено через 4 минуты
Цитата Сообщение от FlasherX Посмотреть сообщение
вы обе тильды поставили, как я и советовал?
Да, всё делю, как вы направляете.

Добавлено через 25 минут
FlasherX, так же в работе скрипта не проявляются диалоговые окна, которые в нем обозначены.
0
7001 / 2885 / 1110
Регистрация: 06.06.2017
Сообщений: 9,810
01.02.2021, 18:33
Цитата Сообщение от KOHTAKT Посмотреть сообщение
После запуска ничего не происходит
Роутер не перезапускается?
Цитата Сообщение от KOHTAKT Посмотреть сообщение
всё делю
Не понял. Я не предлагал ничего делить. )
Цитата Сообщение от KOHTAKT Посмотреть сообщение
не проявляются диалоговые окна, которые в нем обозначены.
Какие такие диалоговые окна? Вся работа ведётся в рамках консоли.
Вы с бо́льшими задержками в 28-й тестировали, как я писал?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
01.02.2021, 18:33

Файл для автоматической перезагрузки роутера
Ребята помогите написать исполняемый файл для автоматической перезагрузки роутера. Сам не могу. Как делую: комадная строка-telnet...

Файл для автоматической перезагрузки роутера
Ребята помогите написать исполняемый файл или рабочий скрипт для автоматической перезагрузки роутера в ОС Windows. Сам не могу. Как делую: ...

Батник для перезагрузки роутера через Telnet
Подскажите как написать или ссылочку на готовый батник для перезагрузки роутера dlink. последовательность проста: подключится по айпи ...

VBS скрипт для перезагрузки ALTUSEN
Доброго всем вечера. Толковые люди данного форума подскажите кто чем может. Ни как не могу разобратся с вопросом. Предисловие: Есть...

Как написать скрипт для автоматического входа на сайт роутера?
Возможно ли на PHP написать какой-нибудь скрипт для входа на сайт роутера (192.168.1.1), ввод логина и пароля: admin, и нажатие...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
160
Ответ Создать тему
Новые блоги и статьи
После бана на Пикабу не работает авторизация аккаунта с Яндекса.
Hrethgir 09.07.2026
В частности https:/ / auto. ru/ logbook/ zapret-na-vozhdenie-posle-65-let_1cf28789-07b4-4c75-a2f7-4cd4edf9deeb тут хотел оставить комментарий такой Зрите в корень - монополизация на разработку программ. . .
GitDOS: Когда я решил скрестить MS-DOS, GitHub и Claude
MaGz GoLd 08.07.2026
Привет, Киберфорум! Хочу поделиться своим проектом, который, надеюсь, вас заинтересует. GitDOS — это веб-приложение, которое позволяет запускать DOS в браузере с тремя крутыми фичами: диски живут в. . .
Учебный мини "цифровой двойник" = (Сервер = Java + Flask_питон )+(3D = Гугловскаая 4T nvideo + google colab) +( WMS = Odoo на Docker)
anaschu 07.07.2026
Увидел в требованиях к вакансии создателя имитационных моделей связку (REst + Api + WMS + Anylogic + питон + 3D Nvideo), и решил посмотреть, что это такое. Из этого всего я работал более менее. . .
Море в объективе
kumehtar 06.07.2026
Хотел написать много проникновенных слов, но передумал. Оно само - говорит. Кто слышит тот слышит.
Doom для терминала без стрельбы и монстров. 3D Raycasting на ascii.
dcc0 05.07.2026
Попросил нейронную сеть deepai. org написать рейкастинг 3D с библиотекой ncurses для Linux. Чтобы можно было ходить на стрелочки. Чтобы стены были отрисованы символами. Справилась. Первый вариант. . .
Установка статуса документа по условию
Maks 05.07.2026
Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2. Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус. . .
Сезонность и суточность закисления почв
anaschu 04.07.2026
200 часов это все равно моловато. Есть ситуации, но нестандартные, когда смена происходит за 5 лет. Но обычно это 50 лет и более. Наверное, закисление почвы происходит сезонно в средней. . .
В чем ценность человеческого опыта в глобальном смысле?
kumehtar 03.07.2026
Возможно, ценность человека не в том, что он однажды достигает мудрости, а в том, что он становится носителем карты пути. Он знает не только истину, но и последовательность внутренних изменений,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru