10.04.2009, 00:04
|
|
Новичок
Регистрация: 03.02.2006
Сообщений: 3
С нами:
10667080
Репутация:
0
|
|
Пишу типа парсера на Delphi (Indy), никак не могу залогиниться на этот сайт. Я так понимаю, эта программа тоже на Delphi?
PHP код:
var
IdHTTP: TIdHTTP;
IdCookieManager: TIdCookieManager;
Params: TStringList;
begin
IdHTTP := TIdHTTP.Create(Self);
IdCookieManager := TIdCookieManager.Create(Self);
Params := TStringList.Create;
try
IdHTTP.HandleRedirects := true;
IdHTTP.CookieManager := IdCookieManager;
Params.Add('login_username=username');
Params.Add('login_password=password');
Params.Add('login=');
s := IdHTTP.Post('http://torrents.ru/forum/login.php', Params);
finally
IdHTTP.Free;
IdCookieManager.Free;
Params.Free;
end;
end;
Почему же не хочет логиниться? |
|
|