1 Тема от wolya (изменено: wolya, 2011-10-26 10:37:44)

  • wolya
  • Гость

Тема: AHK: индикатор интернет (иконка работает/не работает в трее)

Скрипт запускает Ping, сохраняет результат в файл C:\check.txt
если Ping не проходит то в файле будет содержаться такой кусок текста:
"100% потерь"
если эта запись есть в файле то иконка красная, если нет - зелёная.

PS: Автор - не я. Авторский вариант у меня не работал. теперь скрипт работает.
Спасибо Gray за подсказку.

Рабочий скрипт:


; проверялка пинга
loop
{
RunWait, cmd /c ping 192.168.0.3 -n 4 >C:\check.txt,, hide ; вместо 192.168.0.3 впишите то, что надо проверять
FileRead, PingResult, C:\check.txt ; читаем файл
IfInString, PingResult, 100`%
{
Menu, Tray, Icon, c:\2.ico ; красная иконка. 
}
Else
{
Menu, Tray, Icon, c:\1.ico ; зелёная иконка.
}
sleep 3000
}

Вообще, после не прохождения пинга можно поставить любое действие. Иконки в трей - это было зделано просто для отслеживания работы скрипта.

2 Ответ от Grey (изменено: Grey, 2011-10-26 11:32:15)

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

Re: AHK: индикатор интернет (иконка работает/не работает в трее)

IconPath:="c:\"
FileRead, PingResult, C:\Check.txt
Menu, Tray, Icon, % IconPath.=InStr(PingResult, 100`%) ? "2.ico":"1.ico"
IconPath:="c:\", GreenIcon:="1.ico", RedIcon:="2.ico"
FileRead, PingResult, C:\Check.txt
Menu, Tray, Icon, % IconPath.=InStr(PingResult, 100`%) ? RedIcon:GreenIcon

3 Ответ от Valivan77777

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

Re: AHK: индикатор интернет (иконка работает/не работает в трее)

А можно дополнить этот скрипт звуковым сигналом? Пропал интернет - подался звук, появился интернет - тоже подался звук.

4 Ответ от ypppu

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

Re: AHK: индикатор интернет (иконка работает/не работает в трее)

Можно использовать пищалку - команда SoundBeep (начиная с Windows 7 вместо пищалки системника используется аудио-выход) или команду SoundPlay для проигрывания мелодии из файла.

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