1 Тема от aist51 (изменено: aist51, 2015-08-30 19:56:42)

  • aist51
  • Участник
  • Неактивен

Тема: Восстановление подключения Интернет при обрыве связи

При подключенном, через USB-модем, интернете, на столе присутствует окно "Коннект Менеджер", в котором имеется клавиша с текстом "Отключить".
При обрыве связи, интернет отключается, а эта клавиша становится с текстом "Подключить".
По ней я и щёлкаю мышкой для восстановления подключения интернета.
Можно ли эту процедуру выполнять автоматически с помощью скрипта АНК?

      ; Connect Checker 2
; Всё работает ПОЧТИ нормально!?
; Включает и отключает с интервалом 1 минута.
; Но, Как исключить отключение?
; Координаты клавиши не меняются.
; В окне на клавише текст изменяется,
; а где и как это обнаружить программно не понимаю!?

F10::
Loop
{
#WinActivateForce
WinActivate, Коннект Менеджер
ControlFocus, 435, 211, Коннект Менеджер
MouseClick, Left, 435, 211  ; это включает и отключает
Sleep 60000
}
Return

+F10::  ; Приостановка по Shift + F10.
If not Stop
{
  Stop := True
  Pause
}
Return

F12::  ; Возобновление по F12.

  If Stop
  {
   Stop := False
   Pause
  }
Return

Специалисты помогите, Пожалуйста!

2 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

aist51, если вопрос по AHK, зачем вы разместили его в этой ветке?

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

3 Ответ от aist51 (изменено: aist51, 2015-08-30 19:33:24)

  • aist51
  • Участник
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

Извините! Я только сейчас обратил внимание, что это Форум по LangMF.
Перенесите, Пожалуйста, куда положено, и где это находится!?
Я хотел, было, откорректировать свой, так называемый, скрипт.

Извините ещё раз, но, ведь, у Вас:
"Разработка AHK-скриптов:"
И в других темах просмотрел сообщения, упоминается AutoHotkey.

4 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

aist51 пишет:

Извините! Я только сейчас обратил внимание, что это Форум по LangMF.

1.1. "Серый форум" - это добровольное сообщество людей, обсуждающих проблемы программирования на различных макроязыках и в скриптовых средах. Это сообщество людей, помогающих друг другу, сообщество профессионалов или пытающихся стать таковыми.

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]

5 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

Перенёс, куда положено, теперь ознакомьтесь с этой темой, отредактируйте свой пост.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

6 Ответ от mixaenpcm (изменено: mixaenpcm, 2015-08-31 14:01:17)

  • mixaenpcm
  • Участник
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

Я делал подобную вещь (XP, 7) периодическим пингованием какого-либо общедоступного сервера или сайта (желательно максимально безотказный типа гугла, яндекса и т.п.):
1. Пингую с сохранением  результата во временном файле.
2. Считываю содержимое файла с результатами пинга.
3. Анализирую. Правильный пинг - значит интернет есть. Неправильный - нет.


Pinging ya.ru [93.158.134.3] with 32 bytes of data:
Reply from 93.158.134.3: bytes=32 time=6ms TTL=57
Reply from 93.158.134.3: bytes=32 time=6ms TTL=57
Reply from 93.158.134.3: bytes=32 time=6ms TTL=57
Reply from 93.158.134.3: bytes=32 time=8ms TTL=57

Считываю третью строку результатов пинга (первая - пустая).
Из нескольких методов определения есть ли пинг или нет у меня получился следующий: если в строке есть текст "bytes=", значит пинг успешен (интернет есть). Если же отсутствует, то нужно подключаться.


; Результирующий файл буду писать в папку со скриптом (A_WorkingDir)
fName:=A_WorkingDir . "\ping.txt"
; команду обязательно заключаем в кавычки
cmd:="""ping ya.ru > " . fName . """"
; запускаем с ожиданием завершения, скрывая окно пинга чтоб не надоедало
runwait,%comspec% /c %cmd%,,Hide 
; читаем 3-ю строку
FileReadLine, s, %fName%, 3
; ищем текст
n:=InStr(s, "bytes=")
MsgBox %s% %n%
if (n>0)
  MsgBox Yesss!!!
else
  MsgBox Check internet!

Жаль, что не удается обойтись без записи файла. Лучше-б сразу в переменную загнать, но не знаю как.

7 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

mixaenpcm, на будущее, ответы в темах до выполнения требований модератора запрещены. В следующий раз буду удалять.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder

8 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: Восстановление подключения Интернет при обрыве связи

aist51, сначала выполняем требования модератора, затем продолжаем пользоваться форумом.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Telegram jollycoder