[grib_aga]

Собственно, начал изучать работу с сетью в Дельфи и решил написать программу, проверяющую верно ли указаны данные для авторизации на одном из сайтов по IT.

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

idhttp1.HandleRedirects:=true;  idHttp1.AllowCookies:=True;  idhttp1.CookieManager:=IdCookieManager1;  IdHTTP1.Request.AcceptEncoding:='deflate';  IdHTTP1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 5.5; Windows 98)';  IdHTTP1.Request.AcceptLanguage := 'ru-RU,ru;q=0.9,en;q=0.8';  IdHTTP1.Request.Connection := 'keep-alive';  IdHTTP1.Request.AcceptEncoding:='deflate';      Data:=TstringList.Create;  Data.Add('actions=add');  Data.Add('logines=wormix');  Data.Add('passwdr=wormix1');  StrPage:=idhttp1.Post('http://excode.ru/aut.php', Data);    if Pos('accaunt', StrPage)<>0 then      Label3.Caption:='Good'    else Label3.Caption:='Bad'; Data.Free;

Программа выдаёт всё время бэд. Подозреваю дело в том, что после авторизации на aut.php идёт редирект на index.php, хотя редирект в инди вкл, в общем нз, прошу помощи.

Delphi 7, Indy предустановлена.