Пройти авторизацию на сайте (Synapse)

@ApxaHGe1 · Регистрация: 21.07.2015

Author24 — интернет-сервис помощи студентам

Через синапс пытаюсь пройти авторизацию за сайте
Возвращает страницу с не пройденной авторизацией

Delphi

HTTP.Headers.Clear;
HTTP.Cookies.Clear;
login:=Copy(Form1.ListBox1.Items.Strings[i],0,Pos(':',Form1.ListBox1.Items.Strings[i])-1);
password:=Copy(Form1.ListBox1.Items.Strings[i],Pos(':',Form1.ListBox1.Items.Strings[i])+1,1000);
HTTP.HTTPMethod('GET','https://mmotop.ru/users/sign_in');
GETTOKEN:=TSTRINGSTREAM.Create('');
HTTP.Document.SaveToStream(GETTOKEN);
token:=COpy(GETTOKEN.DataString,Pos('<input name="authenticity_token" type="hidden"',GETTOKEN.DataString)+54,44);
DATA:=TStringStream.Create('');
DATA.WriteString('utf8=?');
DATA.WriteString('&authenticity_token='+token);
DATA.WriteString('&user[remember_me]=true');
DATA.WriteString('&user[email]='+login);
DATA.WriteString('&user[password]='+password);
DATA.WriteString('&sign_in=Войти');
HTTP.Document.LoadFromStream(DATA);
HTTP.Headers.Clear;
HTTP.HTTPMethod('POST','https://mmotop.ru/users/sign_in');

В ответ получаю

Код

HTTP/1.1 302 Found
Server: QRATOR
Date: Thu, 16 Jul 2015 12:52:55 GMT
Content-Type: text/html; charset=utf-8
Connection: close
Status: 302 Found
[COLOR="Red"]Location: https://mmotop.ru/users/sign_in[/COLOR] (при верно авторизации тут mmotop.ru)
X-UA-Compatible: IE=Edge,chrome=1
Cache-Control: no-cache
Set-Cookie: _mmotop_session=BAh7B0kiCmZsYXNoBjoGRVRvOiVBY3Rpb25EaXNwYXRjaDo6Rmxhc2g6OkZsYXNoSGFzaAk6CkB1c2VkbzoIU2V0BjoKQGhhc2h7ADoMQGNsb3NlZEY6DUBmbGFzaGVzewY6CmFsZXJ0SSJq0JLQsNC8INC90LXQvtCx0YXQvtC00LjQvNC%2BINCy0L7QudGC0Lgg0LIg0YHQuNGB0YLQtdC80YMg0LjQu9C4INC30LDRgNC10LPQuNGB0YLRgNC40YDQvtCy0LDRgtGM0YHRjy4GOwBUOglAbm93MEkiD3Nlc3Npb25faWQGOwBUSSIlMGM3MWE2NTM5OWU0MWQ4MTg1NjIyMjQzYzVhMjIzYTkGOwBU--711e28f14cb38759a006924a66ce0f2533525cc6; domain=.mmotop.ru; path=/; HttpOnly
X-Request-Id: efa8eb4f5533bbde03c258a93a4157bd
X-Runtime: 0.005058
X-Rack-Cache: invalidate, pass

@ApxaHGe1 · 24.07.2015, 08:20 **[ТС]**

Народ в куках приходит ответ постоянно, зашиврованный в Base 64 если декрипт сделать, то вот там что

Код

{I"
flash:ETo:%ActionDispatch::Flash::FlashHash	:
@usedo:Set:
@hash{:@closedF:
@flashes{:
alertI"jВам необходимжるB낧FBÂȃFBㆇFBׂㆌィBゟBÆBׂςㆇFFBㆃB낋BÆF3FF<蘬P襁齜d轍卍役}吘쁑$蔍Hѐ͐	䌁锜Ȅđ쥑䅄Ġ쁓}}sO㏽Ӟه巎zӽwmܻ힜

@ApxaHGe1 0 / 0 / 1 Регистрация: 21.07.2015 Сообщений: 6
	24.07.2015, 08:20 [ТС]	2
	Народ в куках приходит ответ постоянно, зашиврованный в Base 64 если декрипт сделать, то вот там что Код {I" flash:ETo:%ActionDispatch::Flash::FlashHash : @usedo:Set: @hash{:@closedF: @flashes{: alertI"jВам необходимжるB낧FBÂȃFBㆇFBׂㆌィBゟBÆBׂςㆇFFBㆃB낋BÆF3FF<蘬P襁齜d轍卍役}吘쁑$蔍Hѐ͐ 䌁锜Ȅđ쥑䅄Ġ쁓}}sO㏽Ӟه巎zӽwmܻ힜 0