Einzelnen Beitrag anzeigen

Benutzerbild von inzzi
inzzi

Registriert seit: 24. Jan 2003
Ort: Austria
50 Beiträge
 
Delphi 7 Enterprise
 
#1

Formular Submit funktioniert nicht mit TWebBrowser ?!

  Alt 14. Jul 2004, 22:57
Hi leute!

Hab ein problem mit dem Submit button eines Login Formulars.
Die Werte für username und passwort werden bereits richtig eingetragen und (ich denke) auch submitted...
aber sobald der submit befehl kommt wird die selbe seite wieder angezeigt! ..

kann mir da jemand helfen!?


Delphi Code:

Delphi-Quellcode:
procedure TForm1.MM_connectClick(Sender: TObject);
var WebForm: Variant;
begin
  WB_Game.Navigate('http://www.castleguard.de');
  while WB_Game.ReadyState <> READYSTATE_COMPLETE do
    begin
      Application.ProcessMessages;
    end;

  if WB_Game.OleObject.Document.all.tags('FORM').Length <> 0 then
    begin
      WebForm := Form1.WB_Game.OleObject.Document.Forms.item(0);
      WB_Game.OleObject.Document.forms.item(0).elements.item('username').value:='user';
      WB_Game.OleObject.Document.forms.item(0).elements.item('password').value:='pass';
      WB_Game.OleObject.Document.Forms.item(0).submit;
    end;
end;

HTML Code
Code:
<form method="post" action="user_login.php">
     <table id="nob" width="50%" align="center">
     <tr>
      <td id="nob" width="100%">
       Username


       <input type="text" name="username" size="15">


       Passwort


       <input type="password" name="password" size="15"><input type="submit" name="do_login" value="Login">
      </td>
      </tr>
    </table>
    </form>

keine ahnung warum das mit dem submitten bzw. einloggen nicht funtzt

plz help ... inzzi


(PS: Es wird kein Bot für ein Browsergame sondern nur ein Client (arbeit selbst am browsergame mit)...)
inzzi . deviantART . com • be creative
  Mit Zitat antworten Zitat