Что нового

Переменная в интернете

saraconor

Новичок
Сообщения
404
Репутация
3
Как создать переменную в интерене чтобы скрипт реагировал на ее изменение? Причем желательно чтобы за "аренду" места для этой переменной платить не нужно было ;D Есть ли такие возможности?
 

alex33

Скриптер
Сообщения
1,457
Репутация
186
Во-первых, не переменная, а хостинг;
Во-вторых, из бесплатных хороших хостингов могу посоветовать hostinger.ru, 2 года пользуюсь и проблем нет.
Ну а теперь, предположем, что у вас уже есть сайт на этом хостинге и вы туда загрузили какой-нибудь txt файлик и в AutoIt хотите отслеживать изменения. Пишем что-то типа такого:
Код:
Global $sURL = "http://site.ru/file.txt"; здесь ссылка на файл в интернете
Global $old_value, $new_value; переменные для сравнения
Global $iTimeout = 2000; интервал проверки (в МСекундах)

$old_value = InetRead($sURL, 1); загружаем файл в переменную
AdlibRegister("_TrackEvent", $iTimeout)
While 1
	Sleep(1000)
WEnd

Func _TrackEvent()
	$new_value = InetRead($sURL, 1); загружаем файл в переменную
	If $old_value <> $new_value Then
		AdlibUnRegister("_TrackEvent")
		_OnChange($old_value, $new_value)
		$old_value = $new_value
		AdlibRegister("_TrackEvent", $iTimeout)
	EndIf
EndFunc   ;==>_TrackEvent

Func _OnChange($s_old_value = "", $s_new_value = "")
	MsgBox(64, "Файл изменён", "Файл изменился!" & @CRLF & "Старое значение: " & BinaryToString($old_value) & @CRLF & "Новое значение: " & BinaryToString($new_value))
EndFunc   ;==>_OnChange



Добавлено:
Сообщение автоматически объединено:

Кстати для обычных файлов подойдёт и простое облако (типа Dropbox)...
 
Верх