Собственно, начал изучать работу с сетью в Дельфи и решил написать программу, проверяющую верно ли указаны данные для авторизации на одном из сайтов по IT.
Код:
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 предустановлена.