Hallo Leute,
habe ein Problem bei dem ich einfach nicht weiterkomme und hoffe ihr könnt mir ein bischen weiterhelfen.
Möchte noch erwähnen das ich VB 2008 Anfänger bin.
Die Idee des Programms ist, das es sich automatisch auf einer Website einlogt und ich dann
diverse Informationen aus dieser Webseite auslesen kann. Das mache ich über den IE mit folgendem Code:
Public Class Form1
Dim IE As Object
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim test As String = "test"
Dim test1 As String = "test1"
Dim test2 As Long = "test2"
'Dim domain As String
IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("http:// gewünschte URL")
Call busy()
IE.Document.GetElementById("sld").Innertext = test
IE.Document.GetElementById("account").Innertext = test1
IE.Document.GetElementById("pwd").Innertext = test2
IE.Document.getElementById("_weiter").click()
Call busy()
End Sub
Sub busy()
Do While IE.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
Loop
End Sub
So, mein Problem ist nun, das nach dem Click ein weiteres IE Fenster geöffnet wird und ich an dieses nicht "ran" komme um den Quelltext auszulesen.
Kann die Adresse auch nicht ohne weiteres einfach in meinem ursprünglichen IE annavigieren, da sich diese bei jedem Login ändert und die sid nur in dem IE popup steht (an das ich nicht hin komme )
Habe mich auch schon durch das Forum gewühlt aber leider nichts gefunden was ich verwenden könnte.
Wäre echt super wenn mir jemand sagen könnte wie ich das zweite IE Fenster ansprechen kann.
Danke schon mal
Gruss
Ami
PS: ein allgemeines Lob ans Forum, sind echt super Beiträge.
habe ein Problem bei dem ich einfach nicht weiterkomme und hoffe ihr könnt mir ein bischen weiterhelfen.
Möchte noch erwähnen das ich VB 2008 Anfänger bin.
Die Idee des Programms ist, das es sich automatisch auf einer Website einlogt und ich dann
diverse Informationen aus dieser Webseite auslesen kann. Das mache ich über den IE mit folgendem Code:
Public Class Form1
Dim IE As Object
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim test As String = "test"
Dim test1 As String = "test1"
Dim test2 As Long = "test2"
'Dim domain As String
IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate("http:// gewünschte URL")
Call busy()
IE.Document.GetElementById("sld").Innertext = test
IE.Document.GetElementById("account").Innertext = test1
IE.Document.GetElementById("pwd").Innertext = test2
IE.Document.getElementById("_weiter").click()
Call busy()
End Sub
Sub busy()
Do While IE.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
Loop
End Sub
So, mein Problem ist nun, das nach dem Click ein weiteres IE Fenster geöffnet wird und ich an dieses nicht "ran" komme um den Quelltext auszulesen.
Kann die Adresse auch nicht ohne weiteres einfach in meinem ursprünglichen IE annavigieren, da sich diese bei jedem Login ändert und die sid nur in dem IE popup steht (an das ich nicht hin komme )
Habe mich auch schon durch das Forum gewühlt aber leider nichts gefunden was ich verwenden könnte.
Wäre echt super wenn mir jemand sagen könnte wie ich das zweite IE Fenster ansprechen kann.
Danke schon mal
Gruss
Ami
PS: ein allgemeines Lob ans Forum, sind echt super Beiträge.