Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Web Scraping
05.05.2015 13:50:11 Michael
NotSolved

Ansicht des Beitrags:
Von:
Michael
Datum:
05.05.2015 13:50:11
Views:
1383
Rating: Antwort:
  Ja
Thema:
VBA Web Scraping

Hallo zusammen,

 

ich bekomme es irgendwie nicht hin mittels VBA mich auf einer Seite mit Login Daten anzumelden. Excel spuckt jedes mal einen Error aus. 

Momentan benutze ich folgenden Code :

Public Sub FlightOPS()

    Dim objIEx As Object

    On Error GoTo Fin

    Set objIEx = CreateObject("InternetExplorer.Application")

    With objIEx

        .Visible = True

.Navigate ("http://fltopsie.air.ups.com/apps/UserLogin/UserLogin.cfm")

        Do

            If .ReadyState = 4 Then

                Exit Do

            Else

                DoEvents

            End If

        Loop

        .Document.forms(0).All("GemsID").Value = "xyz"

        .Document.forms(0).All("Password").Value = "xyz"

        .Document.forms(0).Submit

    End With

Fin:

    Set objIEx = Nothing

    If Err.Number <> 0 Then MsgBox "Error: " & _

        Err.Number & " " & Err.Description

End Sub

 

Ich bin mir aber nicht sicher ob ich die richtigen Felder zur Login Eingabe deklariert hab. Kann vielleicht jemand helfen und/oder einen entsprechenden Code posten.

Vielen Dank im voraus,

Michael


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 VBA Web Scraping
05.05.2015 13:50:11 Michael
NotSolved