madmasles сказал(а):havi,
Это не нативная функция, что она делает и как?
madmasles сказал(а):
#include-once
Global Const $HTTP_STATUS_OK = 200
Func HttpPost($sURL, $sData = "")
Local $oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST", $sURL, False)
If (@error) Then Return SetError(1, 0, 0)
$oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
$oHTTP.Send($sData)
If (@error) Then Return SetError(2, 0, 0)
If ($oHTTP.Status <> $HTTP_STATUS_OK) Then Return SetError(3, 0, 0)
Return SetError(0, 0, $oHTTP.ResponseText)
EndFunc
Func HttpGet($sURL, $sData = "")
Local $oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("GET", $sURL & "?" & $sData, False)
If (@error) Then Return SetError(1, 0, 0)
$oHTTP.Send()
If (@error) Then Return SetError(2, 0, 0)
If ($oHTTP.Status <> $HTTP_STATUS_OK) Then Return SetError(3, 0, 0)
Return SetError(0, 0, $oHTTP.ResponseText)
EndFunc
madmasles сказал(а):havi,
По-моему, Post запрос подразумевает отправку данных, а Вы ничего не отправляете.
HttpPost("http://gametop.pro/sauth.php/register/" & "/" & $aut)
Он есть, он через переменные. Сервер выдает то же самое(тоже строку), что и при первом запросе, только там все работает =\alex33 сказал(а):
Попробуйте или отправлять так через GET, или через Post, но $aut отправлять как $sData.Данные идут после последнего слэша.
madmasles сказал(а):havi [?]
Попробуйте или отправлять так через GET, или через Post, но $aut отправлять как $sData.Данные идут после последнего слэша.
Global $oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oHTTP.Open('GET', 'http://gametop.pro/sauth.php/check/FFE4C34B228C89AF61D5BA74F8C2ACA3/466150645BD2EACB4CFE55CB20A647A1')
$oHTTP.Send('')
ConsoleWrite('Status: ' & $oHTTP.Status & @LF)
ConsoleWrite('ResponseText: ' & $oHTTP.ResponseText & @LF)
ConsoleWrite('---' & @LF)
$oHTTP.Open('GET', 'http://gametop.pro/sauth.php/feature/C6F82AF6FC1E2F51B0D8847706E52B6A')
$oHTTP.Send('')
ConsoleWrite('Status: ' & $oHTTP.Status & @LF)
ConsoleWrite('ResponseText: ' & $oHTTP.ResponseText & @LF)