Не проходит авторизация

[KREGI]

всем привет, я авторизуюсь на сайте http://forum.allnokia.ru/ но авторизация не проходит, менеджер куков на форме стоит, вот код ниже:

procedure TForm1.Button1Click(Sender: TObject); //сама авторизация
begin
params:=TStringList.Create;
responseres:=TStringList.Create;
try
params.Add('reg_key='+Edit1.Text);
params.Add('username='+Edit2.Text);
params.Add('password='+Edit3.Text);
responseres.Text:=IdHTTP1.Post('http://forum.allnokia.ru/login.php',params);
if pos ('<a href="notes.php" class="mainmenu">Заметки</a>', 'http://forum.allnokia.ru/index.php')>0
then
showmessage('ok')
else
showmessage('bad');
finally
params.free;
responseres.free;
end;


end;

procedure TForm1.FormCreate(Sender: TObject); // парсинг типа капчи
var S:string;
begin
 s:=IdHTTP1.Get('http://forum.allnokia.ru/login.php');
 Delete(s,1,Pos('<span class="gen">',s)+Length('<span class="gen">')-1);
 Delete(s,Pos('</span>', s),Length(s));
 Label4.Caption:=(s);
end;

Кстати, после авторизации генерируется страница не просто index.php, а еще и цифры, но если проверять страницу index.php то она такая же как и та что сгенерировалась

[JustKurt]

С Агентом согласовал? Думаю нет.

Если бы разрешил - то и код тебе дал бы.

[KREGI]

он знает что я делаю авторизацию. спрошу у него

[Пепел Феникса]

какой агент?

Креги, а ты просниффери запросы с браузера и со своей проги...сравнишь и узнаешь в чем прикол.

(можешь результат сниффа скинуть мне в асю)

[KREGI]

Агент - администратор сайта. Пепел Феникса я тебе в асю напишу