Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Цикл пингует ПК через промежуток времени

Ответить
Настройки темы
[решено] Цикл пингует ПК через промежуток времени

Пользователь


Сообщения: 144
Благодарности: 0

Профиль | Отправить PM | Цитировать


Добрый день!

Подскажите, где ошибка? Первый проход файл создается правильно, как только $i увеличивается на 1, цикл while не работает...

Код: Выделить весь код
#include <Date.au3>
$file = FileOpen("X:\pc1.txt", 0)

; Start

For $i = 50 To 59
   ConsoleWrite("i = " & $i & @CRLF)
   _ScheduleStart_Proc("11:" & $i & ":00")
   While 1
	  $line = FileReadLine($file)
	  If @error = -1 Then ExitLoop 
	  $P = Ping($line, 10) ; Провека доступности узла посредсвом ICMP запросов
		 If $P = 0 Then 
			$a = "Недоступен"
		 EndIf
		 If $P > 0 Then 
			$a = "Доступен  "
		 EndIf
	  FileWrite("X:\Ping\" & $i & "_ping_log.txt", $line & @TAB & "=" & @TAB & $a & @CRLF)
   Wend
Next


FileClose($file)


; Functions
Func _ScheduleStart_Proc($sStartTime)
   While 1
	  If _NowTime() = $sStartTime Then Return 1
	  ConsoleWrite(_NowTime() & @CRLF)
	  Sleep(1000)
   WEnd
EndFunc

Отправлено: 11:58, 21-08-2012

 

Пользователь


Сообщения: 144
Благодарности: 0

Профиль | Отправить PM | Цитировать


Ошибку понял.
Из-за того, что файл уже был открыт..

Отправлено: 14:32, 21-08-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Цикл пингует ПК через промежуток времени

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
VBA - [решено] Выполнение кода через определенный промежуток времени Dark_Timur Программирование и базы данных 2 03-07-2012 00:18
CMD/BAT - [решено] Батник на выключение с автоотменой в заданный промежуток времени Cashmar Скриптовые языки администрирования Windows 2 16-05-2012 17:35
[решено] скрипт для нажатия клавиши F2 через опр. промежуток времени Bushbasher AutoIt 2 13-01-2010 12:53
Помогите отключить интернет на короткий промежуток времени! minutka15 AutoIt 6 07-09-2009 10:52
[решено] Повторение кода через промежуток времени sashadeg AutoIt 11 06-05-2009 20:18




 
Переход