会員サイトへのログイン

take 2010-03-05 03:13:27 No: 37911

下記でログイン済のページを開けると思ったのですが
value is not valisと表示され手詰まり。
環境はw2k,del7,付属のindyです。

procedure TForm1.Button1Click(Sender: TObject);
var
  Params   : TStringList;
  Responce : TStringStream;
  Key : string;
begin
  Params := TStringList.Create;
  Responce := TStringStream.Create('');
  try
    Params.Add('ID=aaa');
    Params.Add('pass=0123');
    IdHTTP1.Post('https://xxx.xxx.jp/login',Params,Responce);
  finally
    FreeAndNil(Params);
    FreeAndNil(Responce);
  end;
  WebBrowser1.Navigate('http://xxx.xxx.jp/');
end;

何かお気付きの点ありましたらよろしくです。
IOHandlerはIdIOHandlerSocketです。

jazzin 2010-03-05 04:07:54 No: 37912

FirefoxでログインしたサイトのURLをIEで開いてるようなもので、
IndyとTWebBrowserは情報を共有していませんので当然ログイン状態も共有されません。
通信はすべてIndyで行い、得られたHTMLの表示にだけTWebBrowserを使うか、
もしくはログイン処理からすべてTWebBrowserで行う必要があると思います。