lakeparty.de einloggen und message senden !

[Xipe]

Hi !

auf http://Lakeparty.de kann man messages an andere User senden. dazu muss man allerdings angemelded sein.

nun hab ich einem Freund versprochen, bis morgen ein Programm zu schreiben, das sich dort automaitsch einloggt (passwort + name per edit senden) und mi dessen hilfe man aus dem programm heraus lakeparty nutzen kann, quasi fernsteuern.

das ganze ist 100 % erlaubt und es gib t auch keine Sicherheits-bild-Kontrolle.

ich hab das auch schon probiert mit dem TWebbrowser, aber irgendwie will es nicht klappen !

Ich brauche das dringend bis morgen.

kann mir bitte jemand helfen?

danke !

Gruß Xipe

[edit=Luckie]Läßtz du uns auch etwas Zeit auf deine Frage zu antworten? Ich finde es etwas unverschämt schon nach 30 Minuten zu pushen, weil keine Antwort gekommen ist. Desweiteren findet man schon recht viele Beiträge im Forum, wie man Felder im Browser ausfüllt. Mfg, Luckie[/edit]
[edit=Luckie]Das "Sorry"-Posting war auch überflüssig. Mfg, Luckie[/edit]

[sECuRE]

Hi,

"irgendwie will es nicht klappen" ist nicht grade die genauste Fehlerbeschreibung. Was genau geht denn nicht, wie sieht dein Quellcode aus, kommen Fehlermeldungen?

cu

[Xipe]

ich hab alle möglichen source codes verwendet, aber jedesmal passiert gar nix. könnte mir jemand vielleicht n beispiel geben?

Danke leudde !

[SirThornberry]

es passiert gar nix? also wird keine seite geladen, und nix? Wie hast du es bisher versucht? (source)

[Sprint]

Zitat von Xipe:

ich hab alle möglichen source codes verwendet, aber jedesmal passiert gar nix. könnte mir jemand vielleicht n beispiel geben?

TWebBrowser die Seite laden und die Felder Username und Password ausfüllen. Abschicken. Und schon bist du drin.
Weitere Hilfe leiste ich nur, wenn du zeigst was du bis jetzt gemacht hast.

[Xipe]

das hab ich bisher gemacht, aber da bringt er mir dauernd ne exception !

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin

WebBrowser1.Navigate('http://lakeparty.de');
sleep(1000);
try
WebBrowser1.OleObject.document.forms.item(0).elements.item('Username').value:=Edit1.Text;
except
end

end;

[SirThornberry]

das sleep(1000) bringt nix. Das Dokument wird erst beim nächsten repaint geladen. Also mach das ganze einfach im OnDocumentComplete (oder so ähnlich heißt das). Musst dir natürlich dann merken das du da schon was gemacht hast damit du nicht beim nächsten OnDocumentComplete das selbe machst..

[Xipe]

kannste mir en beispiel posten?

[Sprint]

Zitat von Xipe:

kannste mir en beispiel posten?

Hab mich da mal angemeldet und muss sagen, die haben sich ganz schön ins Zeug gelegt, das man die Login Daten nicht einfach so senden kann. Hab's zwar geschafft mich mit dem TWebBrowser einzuloggen, das ist aber keine schöne Lösung.

[Xipe]

wie hast du des mit TBrowser grschafft? könntest du mir densource mal bitte posten?

wär ech sau nett !

[edit=Luckie]Ich habe dir doch schon mal erklärt, dass es unerwünscht ist innerhalb von 24 Stunden zu pushen. Wenn Sprint das nächste mal online ist, wird er das schon sehen. Mfg, Luckie[/edit]