Есть ф-ция, однако не знаю как в ней задать время ожидания ответа, так к примеру если в течении 4-х секунд не было ответа, то происходит выход из ф-ции.
Код:
Func _ReadHTML($sUrl, $sProxy = '')
Local $oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
If $sProxy <> '' Then $oHTTP.SetProxy(2, $sProxy)
$oHTTP.Open('GET', $sUrl, False)
$oHTTP.Send('')
$oHTTP.setTimeouts(500, 500, 4000, 4000) ; - ?
$oHTTP.WaitForResponse()
Return $oHTTP.ResponseText
EndFunc ;==>_ReadHTML