![]() |
TIdHttp - Auf Internetseite einloggen und Daten auslesen
Hallo Leute! Vielleicht kennen einige von euch die Seite
![]() Ich möchte dafür ein kleines "Mail-Programm" schreiben. Unter anderem möchte ich eine Funktion zum "Mailcheck" integrieren. Das Programm soll sich mit gespeicherten Logindaten einloggen und nachschauen ob neue Mails vorhanden sind. Ich möchte dazu gern die IdHTTP-Komponente verwenden, denn der TWebBrowser lädt zu viel runter (Bilder usw. werden ja dazu nicht benötigt, sondern nur der Quelltext) Jetzt ist die Frage wie ich mit IdHTTP eine Seite anfordere, die ich nur erhalte wenn ich eingeloggt bin. Quasi wie logge ich mich über die IdHTTP in die Seite ein? (mit dem TWebBrowser hab ich schon einen "Formularausfüller wie etwas RoboForm geschrieben und er funktionierte, mit der Kompo wäre es also kein Problem, aber ich möchts halt mit der HTTP-Kompo machen) danke schonmal |
Re: TIdHttp - Auf Internetseite einloggen und Daten auslesen
Ok, also das hab ich jetzt druch rumprobieren hingekriegt (warum immer erst nachdem man im Forum geschreiben hat? :wall: )
Delphi-Quellcode:
Jetzt eine neue Frage (die aber immernoch passt):
var
Data: TIdMultiPartFormDataStream; Rep: TStream; begin Data := TIdMultiPartFormDataStream.Create; Rep := TStringStream.Create; try Data.AddFormField('user', Username); Data.AddFormField('pw', Passwort); HTTP.Post('www.snapscouts.de', Data, Rep); Memo1.Lines.AddStrings(HTTP.Request.RawHeaders); with TFileStream.Create('C:\Test.html', fmCreate) do begin CopyFrom(Rep, 0); Free; end; finally Data.Free; Rep.Free; end; end; Rechts am Rand gibts auch die "Direktsuche", wenn ich da suche, wird eine neue Seite geöffnet mit den Userdaten. Wie kann ich jetzt quasi den Klick auf den Button sumilieren? Ich brauche nur die Adresse die nachher in der Adresszeile des IExplorers steht (aber je nach Suchtext anders ist) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:13 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz