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!Жаль, что не удается обойтись без записи файла. Лучше-б сразу в переменную загнать, но не знаю как.
]]>Извините! Я только сейчас обратил внимание, что это Форум по LangMF.
1.1. "Серый форум" - это добровольное сообщество людей, обсуждающих проблемы программирования на различных макроязыках и в скриптовых средах. Это сообщество людей, помогающих друг другу, сообщество профессионалов или пытающихся стать таковыми.
]]>Извините ещё раз, но, ведь, у Вас:
"Разработка AHK-скриптов:"
И в других темах просмотрел сообщения, упоминается AutoHotkey.
; 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
Специалисты помогите, Пожалуйста!
]]>