[Сеть, интернет] Функция возвращающая статус доступности

[avtoIT]

Есть ли функция, которая возвращает статус доступности того или иного сайта, распознающая ошибки 404, 502, 504 и выдающая ок (200) при нормальной загрузке?

 

[sngr]

$oRequest = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oRequest.Open('GET', 'http://autoit-script.ru/index.php?topic=21186.msg124862;topicseen#new')
$oRequest.Send('')
MsgBox(32, '', $oRequest.status)

 

[inververs]

Или вместо GET использовать HEAD, так только заголовки ответа придут, что быстрее.

$oRequest = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oRequest.Open('HEAD', 'http://yandex.ru/blabla')
$oRequest.Send()
MsgBox(32, 'Статус', $oRequest.Status)