WEBサイトへログインするには

解決

自転車乗り 2005-10-02 21:54:24 No: 17816

My Yahooにログインし、各トピックの一覧を取ってくるソフトを作りたいと考え
ています。

動作は次のとおりです。
１．ログイン
２．トッピック一覧とURL取得
３．取得一覧表示

URLは次のとおりです。
https://login.yahoo.co.jp/config/login

いろいろ調べてみたのが次のコードです。

procedure TForm1.Button1Click(Sender: TObject);
var
Params: TStringStream;
aStreamOverview: string;
begin
Params := TStringStream.create('');
       with idhttp1 do
       begin
           Params.WriteString('login=TEST123&');
           Params.WriteString('passwd=Pass123');

           Request.ContentType := 'application/x-www-form-urlencoded';
           try
               Response.KeepAlive := False;

               aStreamOverview :=
Post('https://login.yahoo.co.jp/config/login', Params);
           except
               on E: Exception do
                   showmessage('Error encountered during POST: ' +
E.Message);
           end;
           end;
params.Free;
end;

上記のコードでは
『aStreamOverview := Post('https://login.yahoo.co.jp/config/login',
Params);
』の
所で『Error encountered during POST:IOHandler value is not valid』のエラ
ーになり
ます。

使用コンポーネント：IdHTTPとIdSSLIOHandlerSocket
Delphi7でIndyコンポーネントは標準のものを使用しています。

よろしくお願いします。

自転車乗り<charibianchi@mail.goo.ne.jp>

あのー 2005-10-02 22:12:46 No: 17817

マルチポストは止めて下さい。
先にDelphi MLで質問したのですから、MLの方で解決すべきだと思います。

えーと 2005-10-03 04:31:14 No: 17818

ちなみに上記コードを試して見た所
IdHttpのIOHandlerプロパティにIdSSLIOHandlerSocketを設定していない場合
そんなエラーが出ます。

それからlibeay32.dllとssleay32.dllもお忘れなく
http://indy.fulgan.com/SSL/