Delphi POST запросы / Авторизация сайта

ADR-007 · 2 Jul 2012

snookis said:
Бед оно определяет 302 и 200 а вот гуд оно тупо пробивает на 302 и все... итак куярит один запрос... я так понял что ответа 200 нет то оно себе и отправляет дальше!!! А вот почему его нет!!
Code:
          HTTP:=TIdHTTP.create(nil);
          HTTP.HandleRedirects:=True;
     Http.Request.Host:='auth.mail.ru';
     Http.Request.UserAgent:='Mozilla/5.0 (Windows NT 6.1; WOW64; rv:13.0) Gecko/20100101 Firefox/13.0.1';
     Http.Request.Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
     Http.Request.AcceptLanguage:='ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3';
     HTTP.Request.AcceptEncoding:='gzip, deflate';
     Http.Request.AcceptCharSet:='windows-1251,utf-8;q=0.7,*;q=0.7';
     Http.Request.Referer:='http://e.mail.ru/cgi-bin/login';
data:=TStringList.Create;

data.Add('Login='+Acc);
data.Add('Password='+Pas);

     try
Sri:=HTTP.Post('http://win.mail.ru/cgi-bin/auth', data);
Rez:=-1;
if Pos('logout', Sri)<>0 then
Click to expand...
ну я же говорил...
ПОСТ запрос, же не полньій...
не
Code:
data.Add('Login='+Acc);
data.Add('Password='+Pas);
а
Code:
ddata.Add('Domain=mail.ru');
ata.Add('Login='+Acc);
data.Add('Password='+Pas);
data.Add('level=0');

snookis · 2 Jul 2012

ADR-007 said:
ну я же говорил...
ПОСТ запрос, же не полньій...
не
Code:
data.Add('Login='+Acc);
data.Add('Password='+Pas);
а
Code:
ddata.Add('Domain=mail.ru');
ata.Add('Login='+Acc);
data.Add('Password='+Pas);
data.Add('level=0');
Click to expand...
Да я і так пробував, всерівно нефіга не працює!!!

M_script · 2 Jul 2012

ADR-007, для авторизации достаточно Login и Password, можно даже GET-запросом

Kandi · 2 Jul 2012

snookis said:

Привет всем вот сижу уже много времени и немогу некак разобратся почему не проходит авторизация? Помогите пожалуйста .....
Click to expand...

Чтобы не сидеть попусту, просто нужно прочитать пару глав книги на тему "Отладка приложений", затем ставим бряк, и смотрим, что происходит в программе.

А проще конечно же вот так
Code:
http://win.mail.ru/cgi-bin/auth?Login=' + Login + '&Password=' + Pass + '&Domain=' + Domen + '&level=1
Работает на ура просто.

wind_ms · 3 Jul 2012

странно, вчера все работало нормально а теперь грузит только вот эти символы: ‹

_Logger_ · 5 Jul 2012

HTTP.HandleRedirects:=false;
вроде бы true должно быть

Delphi POST запросы / Авторизация сайта

ADR-007 Member

snookis New Member

M_script Members of Antichat

Kandi Member

wind_ms New Member

_Logger_ New Member

Useful Searches

Delphi POST запросы / Авторизация сайта

ADR-007 Member

snookis New Member

M_script Members of Antichat

Kandi Member

wind_ms New Member

_Logger_ New Member