« F1レジェンズ | トップページ | インターネット ルール&マナー検定 »

2005年7月10日 (日)

indy 9.0.17 その5

今更なんだけど、IdHttp(9.0.17)の基本認証って変じゃない?一度パスワードエラーなどで認証に失敗すると、その後、正しいパスワードを送っても成功しないんですけど。

1.以下のようなプログラムを作り、
2.一度目は、わざと間違ったユーザ名(orパスワード)を入力し、ボタンをクリックする。
3.当然、401 Unauthorized エラーになる。
4.次に、ユーザ名(orパスワード)を訂正しボタンをクリックしても、
5.認証が成功しないんですけどぉ。

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdHttp1.Request.Clear;
  IdHttp1.Request.BasicAuthentication := true;
  IdHttp1.Request.Username := Edit1.Text;
  IdHttp1.Request.Password := Edit2.Text;
  Memo1.Lines.Text := IdHttp1.Get(Basic認証のかかったページ);
end;

以下のようにするとできたけど、そういうもんだっけ?なんか勘違いしているかな。

  if IdHttp1.Request.Authentication = nil
  then begin
    IdHttp1.Request.Username := Edit1.Text;
    IdHttp1.Request.Password := Edit2.Text;
  end else begin
    IdHttp1.Request.Authentication.Username := Edit1.Text;
    IdHttp1.Request.Authentication.Password := Edit2.Text;
  end;

« F1レジェンズ | トップページ | インターネット ルール&マナー検定 »

delphi」カテゴリの記事

パソコン・インターネット」カテゴリの記事

コメント

コメントを書く

(ウェブ上には掲載しません)

トラックバック

この記事のトラックバックURL:
http://app.f.cocolog-nifty.com/t/trackback/2574263/73806283

この記事へのトラックバック一覧です: indy 9.0.17 その5:

« F1レジェンズ | トップページ | インターネット ルール&マナー検定 »