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

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

 

FireFof + HTTPFox + Coockies Manager +

1) стираешь куки
2) выключаешь JavaScript в настройках FF (не обязательно)
3) включаешь HTTPFox
4) нажимаем "авторизоваться"
5) смотришь что он отослал и отсылаешь то же
???
PROFIT!

 

Там же по https авторизация была?

 

POST:

Code:

Domain=mail.ru
Login=login
Password=password
level=0

 

Code:

HTTP.IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);

 

Я об этом, HTTP.Post('http://e.mail.ru/cgi-bin/login', data);

 

Через http тоже работает.

 

Этот вопрос я решил! Но теперь Гуды пишет в Беды ! По сниферу видно что авторизация проходит!!!


[/IMG]

 

if pos(AnsiToUTF8('Входящие -'),Sri)<>0 then

upd:
shadowrun, не на делфи, но с VCL

 

=( Всё ровно 6/6 в БЕД должно бить 5/6
Хелп плиззз!

 

Какой снифер используешь?

 

HttpAnalyzerStd

 

Сохрани в файл все запросы/ответы и выложи сюда

 

Вот залил.... TyT

 

У тебя в коде только 2 параметра пост запроса передаются, а должно быть 4.
З.Ы. это первое, что увидел... При входе с браузера и с твоей программы сниффер должен показывать идентичные данные. Пока этого не будет, секс обеспечен.

 

Я ж, писав що потрібно в POST кидати... А заголовки (HTTP.Request.*) не обов'язково заповнювати

 

Я так и сделал, теперь получается что записывает БЕД а когда доходит к ГУДУ тупо стоит на месте и всё....
Кто не буть поможет??

 

Бед оно определяет 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

 

Зачем смотреть тело ответа, заголовки, проверяй наличие куки которая ставиться при авторизации.