Entwickler-Ecke

Internet / Netzwerk - Formular ausfüllen und SUBMIT


crazywulf - So 07.05.06 16:36
Titel: Formular ausfüllen und SUBMIT
moin leute,
als aller erstes: Die Seite auf die zugegriffen wird gehört mir. ich habe nicht vor irgendwelche gästebücher vollzuspammen sondern mich mit der komponente vertraut zu machen um bots für irgendwelche online games zu machen.

jetzt zu meinem problem!
ich versuche ein formular auszufüllen was auch wunderbar funktioniert das problem ist jetzt das er das formular jetzt nicht submitten will sondern lieber einen error ausgibt.
was muss ich ändern das es klappt?


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
procedure TForm1.Button1Click(Sender: TObject);
var
  Webform: variant;
begin
  with browser do
  begin
    OleObject.document.forms.item(0).elements.item('name').value := 'Testbot';
    OleObject.document.forms.item(0).elements.item('com').value := 'ich bin ein BoT';
    Webform := form1.browser.OleObject.Document.Forms.item(0);
    Webform.submit;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  browser.Navigate('http://crazyplanet-online.de');
end;


Gruß crAzywuLf :D


Lannes - So 07.05.06 18:36

Hallo,

änder mal die Zeile:

Delphi-Quelltext
1:
Webform.submit.click;                    


Hack Gott - Mo 08.05.06 15:04

Find ich erlich gesagt zimlich interessant des Thema, deswegen:

Welche Komponenten benutzt du dazu?


crazywulf - Mo 08.05.06 16:33

Moin,
Danke nochmal!

ich benutze den TWebBrowser und TidHTTP

Gruß crAzywuLf :D


Schüler - Mo 23.10.06 21:09

wo hast du die her?


hui1991 - Mo 23.10.06 22:07

Bei Delphi 7 sind sie schon drauf.
TIdWebBrowser:
Findest du im Register: Internet
TIdHTTP:
Findest du im Register: Indy Clients

MfG
hui1991


Schüler - Di 24.10.06 08:16

hab nur Delphi 7 PE


Muratxiv - Mi 25.10.06 18:58

Hallo Schüler,

Indy gibt es hier: http://www.atozed.com/indy/plus/Files.de.aspx

TWebBrowser musst du in deiner Version unter Komponento-->AktivX importieren...-->Microsoft Internet Controls-->Installieren.


Ich habe aber auch ma eine Frage: Wie kann ich ein Formular abschicken, wenn es mit Submit nicht funktioniert? Seiteninformationen sehen so aus:
user defined image

Mfg. Tim