Hallo zusammen,
also ich programmiere gerade einen ganz simplen Browser, der ingesamt nur eine Seite aufrufen soll. Auf dem Webserver (lokal zum Testen) dieser Seite liegt erstmal eine HTACCESS-Datei, die eine Passwortabfrage macht. Wenn man nun seine Daten in die Passwortabfrage eingegeben hat und alles richtig war, folgt eine weitere Benutzerabfrage.
Dies ist der Login der Seite. Ich möchte, dass beide Abfragen, die HTACCESS-Abfrage, sowie die Login-Abfrage automatisch abgearbeitet werden ohne dass der Benutzer etwas davon mitbekommt. Dies soll alles mit der TWebBrowser-Komponente erledigt werden. Ich war schon soweit, dass ich den Login der Seite automatisch abarbeiten konnte, aber die HTACCESS-Abfrage funktioniert nicht richtig.
Folgender Inhalt hat die HTACCESS-Datei
Quelltext
1:
2:
3:
4:
5:
6:
7:
| AuthUserFile D:/Programme/xampp/htdocs/test/htpasswd
AuthName "test"
AuthType Basic
<Limit GET>
require user admin
</Limit>
Options +Indexes |
Hier der Code, womit ich die Seite aufrufe (ohne Login der Seite, nur für die HTACCESS-Abfrage)
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
| procedure TfrmMain.btnStartenClick(Sender: TObject);
var
URL, Headers : OleVariant;
CONST
USER = 'admin';
PASS = 'admin';
begin
URL := 'http://127.0.0.1/test/';
Headers :=
'WWW-Authenticate: Basic realm="test"' + sLineBreak +
'Authorization: Basic ' + MIME.Encode(USER + ':' + PASS) + sLineBreak;
wbMain.Navigate2(URL,EmptyParam,EmptyParam,EmptyParam,Headers);
end; |
So wenn ich jetzt den Button drücke, der die Seite aufruft, kommt trotzdem die HTACCESS-Abfrage und ich muss die Daten eingeben. Ist es nicht möglich beide Abfragen im Hintergrund abzuarbeiten, sodass der Benutzer direkt auf die Index-Seite kommt und eingeloggt ist? Ich bin für jede Antwort dankbar.
MfG silenCe
matze