c.rauf1986
Новичок
- Сообщения
- 14
- Репутация
- 0
Здравствйте Всем кто поможет заранее блогадарень.
Нужна авторизация за сайте www. seosprint точка net с помощью WinHTTP.WinHTTPRequest но к сожелению там стоит recaptcha гугловский.
Подумал такой вариант с помошью _IECreate авторизоваться вручную а затем брать куки и использовать в WinHTTP.WinHTTPRequest но все таки не получается.
Очень очень нужна помошь жду вашего ответа.
Нужна авторизация за сайте www. seosprint точка net с помощью WinHTTP.WinHTTPRequest но к сожелению там стоит recaptcha гугловский.
Подумал такой вариант с помошью _IECreate авторизоваться вручную а затем брать куки и использовать в WinHTTP.WinHTTPRequest но все таки не получается.
Очень очень нужна помошь жду вашего ответа.
Код:
#include <IE.au3>
Call(LoginSeo)
Func LoginSeo()
$oIE = _IECreate('http://seosprint.net/')
Sleep(30000)
$oDoc = _IEDocGetObj($oIE)
$iCookies = $oDoc.cookie
_IEQuit($oIE)
Global $oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
;******************************************************
$oHTTP.Open("GET", 'http://www.seosprint.net/index.php', true)
$oHTTP.SetRequestHeader("Accept", "text/html, application/xhtml+xml, image/jxr, */*")
$oHTTP.SetRequestHeader("Accept-Language", "en-US,en;q=0.8,ru;q=0.5,az-Latn;q=0.3")
$oHTTP.SetRequestHeader("Connection", "Keep-Alive")
$oHTTP.SetRequestHeader("Referer", "http://www.seosprint.net/")
$oHTTP.SetRequestHeader("Cookie", $iCookies)
$oHTTP.Send()
$oHTTP.WaitForResponse()
;******************************************************
If $oHTTP.Status = 200 Then
$sHTML = $oHTTP.ResponseText()
ConsoleWrite($sHTML)
Exit
EndIf
EndFunc