IdHTTP Anmeldung

[newuser01]

Hallo

Ich habe mich bisher immer so an einer Webseite angemeldet

Delphi-Quellcode:

Webbrowser1.Navigate(sURL);
WebBrowser1.OleObject.Document.Forms.item(0).Elements.item('unickname').value := Edit3.Text;
WebBrowser1.OleObject.Document.Forms.item(0).Elements.item('password').value := Edit4.Text;


Element := WebBrowser1.OleObject.Document.forms.item(0).elements;

for i := 0 to (Element.Length - 1) do
begin

if (Element.Item(i).Value = 'login') then
begin

Element.Item(i).Click;
end;

end;   //for

jetzt möchte ich aber die Indykomponente "IdHTTP" oder ähnliches verwenden könnt ihr mir dazu Tipps geben welche Komponete würdet ihr empfehlen (freeware) und wie funktioniert dann die Anmeldung. Ich habe es schon mit 2 Varianten (siehe unten) versucht komme aber nicht wirklich weiter :mrgreen:

Delphi-Quellcode:

//1. Versuch
IdHTTP1.Get(sURL);
IdHTTP1.Request.Username := Edit3.Text;
IdHTTP1.Request.Password := Edit4.Text;

Delphi-Quellcode:

2. Versuch
slLogin := TStringList.Create;

with slLogin do
begin
  Add('unickname='+ Edit3.text);
  Add('password='+ Edit4.text);
end;

try
  IdHTTP1.Post(sURL, slLogin);
except
end;

slLogin.free;

[generic]

versuche das mal in dieser reihenfolge:

Delphi-Quellcode:

IdHTTP1.Request.Username := Edit3.Text;
IdHTTP1.Request.Password := Edit4.Text;

IdHTTP1.Get(sURL);

[newuser01]

dann kommt die Fehlermeldung "Socket-Fehler #10060 Zeitüberschreitung bei verbindung"

[newuser01]

dieser Fehler ist nun weg jetzt kommt aber ein neuer :mrgreen:

Delphi-Quellcode:

IdHTTP1.Host := (sURL);
IdHTTP1.Port := 80;
IdHTTP1.Request.Username := Edit3.Text;
IdHTTP1.Request.Password := Edit4.Text;
IdHTTP1.Get(sURL);

Fehler: "HTTP1.1/400 Bad Request