Einzelnen Beitrag anzeigen

Benutzerbild von o0o
o0o

Registriert seit: 20. Jul 2007
Ort: am...,da wo die sonne nicht scheint!
166 Beiträge
 
Delphi 2007 Enterprise
 
#1

problem mit button-klick emulieren

  Alt 16. Sep 2007, 10:16
hi leutz ich bekomms einfach nich gebacken...in der suche hab ich etliches gefunden nur nix davon ging einfach bei mir.
die url:
http://www.tmto.org/?category=main&page=search_md5
hier der html-source des buttons:
Code:
<input class="submit" type="submit" value="Search" title="Click to search." />            <input type="hidden" name="search" value="on" />            <input type="hidden" name="value" value="ff97545d64a5c5ac839eb4b8486f3a5c" />
mein bisheriger erfolgsversprechenderer delphi source:
Delphi-Quellcode:
procedure TForm2.Button2Click(Sender: TObject);
var
ovElements: OleVariant;
  i: Integer;
begin
  ovElements := EmbeddedWB1.OleObject.Document.forms.item(0).elements;
  for i := 0 to (ovElements.Length - 1) do
    if (ovElements.item(i).tagName = 'submit') and
      (ovElements.item(i).type = 'submit') and
      (ovElements.item(i).Value = 'Search') then
      ovElements.item(i).Click;

end;
also ich habs mal bei anderen websites probiert und dort ging es mit dem button emulieren nur hier bei der website iwi nich._.
ich hab es auch mal versucht per POST was hinzuschicken um mir das alles zu ersparen nur wurde weiss gott wieso iwi nich angenommen vom script

waere n1 wenn mir jemand helfen koennte....thx im vorraus


da o0o
  Mit Zitat antworten Zitat