Hallo Forum,
ich möchte mein Programm automatisch an einer Website anmelden lassen.
Die Anmeldung produziert aber beim Aufruf in einem Webbrowser ein Login-Fenster vom Browser.
Mit der IdHTTP-Komp. wird das Ereignis OnAuthentication ausgelöst, aber bis jetzt konnte ich die Komp. noch nicht davon überzeugen, sich auch dort anzumelden.
Entweder es kommt ein Fehler (Handled = false) was mich nicht wundert,oder aber bei Handled = true bleibt die Komp. in einer Schleife hängen, obwohl die MaxAuthRetries auf 3 stehen???
Sehr seltsam ...
Delphi-Quellcode:
procedure TForm4.Button1Click(Sender: TObject);
begin
IdHTTP1.Get('
http://{eine ip}/config');
IdHTTP1.Disconnect;
end;
procedure TForm4.IdHTTP1Authorization(Sender: TObject; Authentication: TIdAuthentication;
var Handled: Boolean);
begin
Authentication.Username := '
';
Authentication.Password := '
{password}';
Handled := true;
end;
Das der Benutzername leer ist, hat so seine Richtigkeit, die Website benötigt nur ein Kennwort.