IdHTTP1.Request.Username IdHTTP1.Request.Password

[newuser01]

Hallo Lukas

BasicAuthentication ist auf true eingestellt

Hier noch mal der genaue Ablauf wie ich das Gästebuch abschicke

Delphi-Quellcode:

//-------------------------------------------------------------------------------------------------------------------------
//Gästebuch abschicken ohne sich vorher einzuloggen also als (unregistered User) das funktioniert!

sl.Clear;
sl.Add('p=MakeGuestbookEntry798');
sl.Add('a=send');
sl.Add('text=' + RichEdit1.Text);
sl.Add('from='+ eUnregUser.Text); //eintrag von (unregistered User) spielt keine Rolle was für ein Name eingesetzt wird
sl.Add('submit=senden');

IdHTTP1.Post(sURL,sl); //abschicken
//--------------------------------------------------------------------------------------------------------------------------

//..........................................................................................................................
//Gästebuch abschicken eingeloggt als (registrierte User) das funktioniert leider nicht!

//Login
IdHTTP1.Request.Username := eUsername.Text;
IdHTTP1.Request.Password := ePasswort.Text;
IdHTTP1.Get(sLOGINurl); 

sl.Clear;
sl.Add('p=MakeGuestbookEntry798');
sl.Add('a=send');
sl.Add('text=' + RichEdit1.Text);
sl.Add('from='+ eUsername.Text); //eintrag von registrierte User) genauer Nickname festgelegt
sl.Add('submit=senden');

IdHTTP1.Post(sURL,sl); //abschicken
//..........................................................................................................................