Что нового

http.ResponseText не получает данные с сайта

BuZZinga

Новичок
Сообщения
13
Репутация
0
Доброго времени суток!
Столкнулся с проблемой, перепробовано было всё от и до...
Имеется данный код для логина на сайт, и считывания инфы с него с подставлением переменной $Get которая берется с GUI
Код:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Trevco Downloader by Buzzinga", 381, 173, 192, 124)
$NM = GUICtrlCreateInput("Enter SKU", 96, 48, 185, 21)
$Download = GUICtrlCreateButton("Download", 152, 88, 81, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$sEmail="***"
$sPass="*****"
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST","https://www.trevcoinc.com/login")
$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
$oHTTP.SetRequestHeader("Accept", "image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*")
$oHTTP.SetRequestHeader("Accept-Language", "en-US")
$oHTTP.SetRequestHeader("Referer","https://www.trevcoinc.com/login")
$oHTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.87 Safari/537.36")
$oHTTP.SetRequestHeader("Host","www.trevcoinc.com")
$oHTTP.SetRequestHeader("Proxy-Connection", "Keep-alive")
$oHTTP.SetRequestHeader("Cookie", 'connect.sid=s%3AFpAiIepWQRQD2izgS_filfT6b7R-IMzM.Q0itZ%2B26goQaWGa718K9nkjgiFrsj4fDSiY5bUwFhl4; _ga=GA1.2.1160410173.1454138085; _gat=1; __ss=1458237364957; __ss_referrer=https%3A//www.trevcoinc.com/login; __ss_tk=201601%7C56ac62de6ef88e85378b5125')
$oHTTP.Send('username='&$sEmail&'&password='&$sPass&'&redirect')
$oHTTP.WaitForResponse
$arsds = $oHTTP.ResponseText
MsgBox (0, '',  $arsds)



While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Download
            $Get = GUICtrlRead($NM)

			$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
			$oHTTP.Open ("GET",'https://api.trevcoinc.com/items/'&$Get)
			;$oHTTP.SetRequestHeader("Cookie",$cookie)
			$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
			$oHTTP.SetRequestHeader("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8")
			$oHTTP.SetRequestHeader("Accept-Language", "en-US")
			;$oHTTP.SetRequestHeader("Referer","https://www.trevcoinc.com/login")
			$oHTTP.SetRequestHeader("Content-Type","application/json; charset=utf-8")
			$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.87 Safari/537.36")
			$oHTTP.SetRequestHeader("Host","api.trevcoinc.com")
			$oHTTP.SetRequestHeader("Proxy-Connection", "Keep-alive")
			$oHTTP.SetRequestHeader("Cookie", 'connect.sid=s%3AFpAiIepWQRQD2izgS_filfT6b7R-IMzM.Q0itZ%2B26goQaWGa718K9nkjgiFrsj4fDSiY5bUwFhl4; _ga=GA1.2.1160410173.1454138085')
			$oHTTP.WaitForResponse
			$oHTTP.Send()
			$response = $oHTTP.ResponseText
			MsgBox(0, '', $response)
  EndSwitch

WEnd

Ошибка выскакивает на 2м Request типа $oHTTP.WaitForResponse $oHTTP^ ERROR

Но тем не менее, такой же код, но без Gui работает вполне себе адекватно
Код:
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
			$oHTTP.Open ("GET",'https://api.trevcoinc.com/items/DCO262B')
			$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
			$oHTTP.SetRequestHeader("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8")
			$oHTTP.SetRequestHeader("Accept-Language", "en-US")
			$oHTTP.SetRequestHeader("Content-Type","application/json; charset=utf-8")
			$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.87 Safari/537.36")
			$oHTTP.SetRequestHeader("Host","api.trevcoinc.com")
			$oHTTP.SetRequestHeader("Proxy-Connection", "keep-alive")
			$oHTTP.SetRequestHeader("Cookie", 'connect.sid=s%3AFpAiIepWQRQD2izgS_filfT6b7R-IMzM.Q0itZ%2B26goQaWGa718K9nkjgiFrsj4fDSiY5bUwFhl4; _ga=GA1.2.1160410173.1454138085')
			$oHTTP.Send()
			$oHTTP.WaitForResponse
			$respons = $oHTTP.ResponseText
			MsgBox (0, '', $respons)


Подскажите, проблема находиться в GUI?
p.s. Если тема оформлена не в тот раздел, заранее извиняюсь
 
Верх