Thema Datum  Von Nutzer Rating
Antwort
Rot Webseite ansteuern; enthält javascript
21.06.2012 08:03:22 patman
****
Solved
21.06.2012 08:04:33 Gast13022
NotSolved
21.06.2012 09:52:04 x
NotSolved
21.06.2012 11:45:08 Gast9040
Solved

Ansicht des Beitrags:
Von:
patman
Datum:
21.06.2012 08:03:22
Views:
2597
Rating: Antwort:
 Nein
Thema:
Webseite ansteuern; enthält javascript

Hallo,

zur Zeit schreibe ich ein Programm in VBA um eine Webseite anzusteuern. Es soll folgendes tun:

1.) Ein Textfeld ausfüllen.
2.) Der Cursor soll auf das Textfeld gesetzt werden.
3.) Die Enter Taste wird gedrückt.

Bei dem Feld in HTML handelt es sich um einen Tag mit javascript. Sieht so aus:
 

TextText<BR><INPUT style="WIDTH: 140px" onkeydown="if(window.event.keyCode == 13){location.replace('DispatchEmailLink.aspx?AnfoNr='+document.getElementById('theanfono').value);return false;}" id=theanfono size=5 type=text> 

 

Ich bin mit meinem VBA Code soweit, dass ich das Textfeld bereits ausfüllen kann (letzte Zeile im Code):
 

Dim IEApp As Object, frage As String
    Dim i As Integer, IEDoc As Object
    
    Set IEApp = CreateObject("InternetExplorer.Application")
    IEApp.Visible = False
    IEApp.Navigate "http://seite.aspx"
    Do: Loop Until IEApp.Busy = False
    Do: Loop Until IEApp.Busy = False
    Do: Loop Until IEApp.document.readyState = "complete"
    IEApp.Visible = True
    Set IEDoc = IEApp.document
    
    IEApp.document.getelementbyid("theanfono").Value = 11111

 

Wie geht es weiter? Ich vermute ich muss in der IEApp.document javascript ansteuern geht das vielleicht so?
execScript("???", "JavaScript")

Kann mir da jemand helfen?

 

 


 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Webseite ansteuern; enthält javascript
21.06.2012 08:03:22 patman
****
Solved
21.06.2012 08:04:33 Gast13022
NotSolved
21.06.2012 09:52:04 x
NotSolved
21.06.2012 11:45:08 Gast9040
Solved