Автоматическая авторизация если присуствует компонент TWebBrowser

[eldar]

Вот код
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, SHDocVw, IdBaseComponent, IdComponent,
IdTCPConnection, IdTCPClient, IdHTTP;

type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
Button2: TButton;
Button3: TButton;
GroupBox1: TGroupBox;
GroupBox2: TGroupBox;
IdHTTP1: TIdHTTP;

procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);

private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}



procedure TForm1.Button2Click(Sender: TObject);
begin
Close;
end;

procedure TForm1.Button3Click(Sender: TObject);
var
tl:tstringlist;
begin
tl:=tstringlist.Create;
tl.Add('login=1111111');
tl.Add('password=xxxxxxx');
tl.Add('button.x=37');
tl.Add('button.y=16');
idhttp1.Post('http://www.ipweb.ru/cgi-bin/auth.cgi',tl);
WebBrowser1.Navigate('http://www.ipweb.ru/surf.php');
end;

end.

Выдаёт ошибку

Project Project1.exe raised exception class EIdHTTPProtocolException with message 'HTTP/1.1 302
Found'.Process stopped.Use Step or Run to continue.

В чём ошибка???

[Квэнди]

Выберите в свойствах компонента IdHttp Другую версию протокола

[eldar]

Квэнди
нет все равно такая же ошибка
мне кажеться вот в этом проблема (TIdHTTPRequest)

[eldar]

Вот запрос
POST /cgi-bin/auth.cgi HTTP/1.1
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, */*
Referer: http://www.ipweb.ru/
Accept-Language: ru
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)
Host: www.ipweb.ru
Content-Length: 50
Connection: Keep-Alive
Cache-Control: no-cache
Cookie: login=11111; hotlog=1

login=11111&password=хххххх&button. x=24&button.y=10HTTP/1.1 302 Found
Date: Tue, 19 Aug 2008 07:51:33 GMT
Server: Apache/1.3.36 (Unix) PHP/4.4.2 mod_ssl/2.8.27 OpenSSL/0.9.8a
Set-Cookie: session=ZDcqjgIAtudCp33; domain=ipweb.ru; path=/
Set-Cookie: login=11111; domain=ipweb.ru; path=/; expires=Wed, 19-Aug-2009 07:51:34 GMT
Location: http://www.ipweb.ru/cgi-bin/main.cgi
Keep-Alive: timeout=20, max=50
Connection: Keep-Alive
Transfer-Encoding: chunked
Content-Type: text/plain
X-Antivirus: avast! 4
X-Antivirus-Status: Clean

Мне кажеться нужно выставить Cookies ,а вот как это сделать не понимаю

[Квэнди]

не посмотрел сразу какая ошибка. вообще 302 ошибка это ошибка редиректа, поставьте в компоненте TidHttp свойство followredirect (или как- то так называется) в true

[eldar]

Сейчас ошибку не выводит, но авторизация все равно не происходит
мне например кажеться что дело в Cookies
в свойствах компонента IdHTTP в (TIdHTTPRequest) я выставил вот эти данные:
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, */*
Referer: http://www.ipweb.ru/
Accept-Language: ru
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)
Host: www.ipweb.ru
Content-Length: 50
Connection: Keep-Alive
Cache-Control: no-cache

по соотвествию запросу к этому сайту:

POST /cgi-bin/auth.cgi HTTP/1.1
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, */*
Referer: http://www.ipweb.ru/
Accept-Language: ru
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)
Host: www.ipweb.ru
Content-Length: 50
Connection: Keep-Alive
Cache-Control: no-cache
Cookie: login=11111; hotlog=1

login=11111&password=ххххх&button.x =24&button.y=10HTTP/1.1 302 Found
Date: Tue, 19 Aug 2008 07:51:33 GMT
Server: Apache/1.3.36 (Unix) PHP/4.4.2 mod_ssl/2.8.27 OpenSSL/0.9.8a
Set-Cookie: session=ZDcqjgIAtudCp33; domain=ipweb.ru; path=/
Set-Cookie: login=11111; domain=ipweb.ru; path=/; expires=Wed, 19-Aug-2009 07:51:34 GMT
Location: http://www.ipweb.ru/cgi-bin/main.cgi
Keep-Alive: timeout=20, max=50
Connection: Keep-Alive
Transfer-Encoding: chunked
Content-Type: text/plain
X-Antivirus: avast! 4
X-Antivirus-Status: Clean

А вот как Cookies выставить я не знаю
вот эти:
Cookie: login=11111; hotlog=1

login=11111&password=ххххх&button.x =24&button.y=10HTTP/1.1 302 Found
Date: Tue, 19 Aug 2008 07:51:33 GMT
Server: Apache/1.3.36 (Unix) PHP/4.4.2 mod_ssl/2.8.27 OpenSSL/0.9.8a
Set-Cookie: session=ZDcqjgIAtudCp33; domain=ipweb.ru; path=/
Set-Cookie: login=11111; domain=ipweb.ru; path=/; expires=Wed, 19-Aug-2009 07:51:34 GMT
Location: http://www.ipweb.ru/cgi-bin/main.cgi
Keep-Alive: timeout=20, max=50
Connection: Keep-Alive
Transfer-Encoding: chunked
Content-Type: text/plain
X-Antivirus: avast! 4
X-Antivirus-Status: Clean

[Квэнди]

киньте на форму менеджер куков (папка Indy/Misc) и привяжите его к IdHttp

[eldar]

все равно не хочет просит авторизацию
логин=fdser
пароль=wq1234

[jone]

у тебя WebBrowser1 ни чем ни связан с idhttp и куками у тебя всё отдельно происходит