HTTPTimeout(5000) ; Разрешает 5 секунд для подключения к серверу

HttpRequest = HTTPRequest(#PB_HTTP_Get, "https://www.google.com")
If HttpRequest
    Debug "Код статуса: " + HTTPInfo(HTTPRequest, #PB_HTTP_StatusCode)
    Debug "Ответ: " + HTTPInfo(HTTPRequest, #PB_HTTP_Response)

    FinishHTTP(HTTPRequest)
Else
    Debug "Не удалось создать запрос"
EndIf