В чём может быть ошибка ?

Вот код авторизации для рутрекера

Code:

idhttp1.HandleRedirects:=true;
StrPage:=idhttp1.Get('http://rutracker.org/forum/index.php');
ssylka:='http://login.rutracker.org/forum/login.php';
Data:=TstringList.Create;
Data.Add('login_username='+Edit1.Text);
Data.Add('login_password='+Edit2.Text);
Data.Add('login=Вход');
StrPage:=idhttp1.Post(ssylka, Data);
if Pos('logout', StrPage)<>0 then
Label3.Caption:='Залогинились'
else Label3.Caption:='Не залогинились';
Data.Free;

Но суть в том что всегда пишет "Не залогинились".

 

И переменные

Code:

    var StrPage, ssylka:string;
    Data:TstringList;

 

возможно, нужно куки отправлять. проверь сниффером

 

предполагаю, что отправляя постом данные на http://login.rutracker.org/forum/login.php мы получаем редирект на http://rutracker.org/forum/index.php, который инди воспринимает как исключительную ситуацию и всё ломает.

вобщем сделай так

и да, не забудь про куки

 

1n0y, я бы даже сделал так

Code:

idhttp1.HandleRedirects:=[COLOR=Blue]false[/COLOR];

а потом после всего проверку на редирект...

Code:

 try
   StrPage:=idhttp1.Post(ssylka, Data);
 except 
   if idhttp1.responsecode=302 then
   StrPage:=idhttp1.get('http://rutracker.org'+Idhttp1.response.location);
 end;

 

Русские буковки... Ну и может быть хедер не нравится скрЯпту...