Hallo,
ich habe ein sehr komisches Problem. Ich arbeite seit Jahren mit einer Funktion, die Webseiten läd und bestimmte Werte speichert.
Das Problem ist, dass bestimmte Seiten kein DocumentCompleted Event mehr auslösen bzw. sich die Funktion danach aufhängt.
Mein Test Code:
'Test: diese Seite geht
Navigate(WebBrowser1, "http://www.finanzen.net/aktien/DAX-Realtimekurse")
'Test: diese Seite geht auch
Navigate(WebBrowser1, "https://wertpapiere.ing-diba.de/DE/Showpage.aspx?pageID=70")
'Test: diese Seite geht nicht
Navigate(WebBrowser1, "https://wertpapiere.ing-diba.de/DE/Showpage.aspx?pageID=71")
stop ' Das stop wird nie erreicht!
Das sind die Funktionen
Public bload As Boolean = False
Private Sub WebBrowser1_DocumentCompleted(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
bLoaded = True
End Sub
Function Navigate(Browser As WebBrowser, Url As String, Optional WaitSec As Integer = 5) As String
' Warten, bis Webseite vollständig geladen wurde
Dim ReturnTime As Date = DateAdd("S", WaitSec, Now)
bLoaded = False
Browser.Navigate(Url)
Do Until Browser.IsBusy = False And bLoaded = True Or Now > ReturnTime
System.Windows.Forms.Application.DoEvents()
Loop
End Function
Was mich an der Sache so verwundert ist, dass es mit manchen Seiten problemlos geht nur mit der letzten nicht. Ich konnte nicht Herausfinden warum nicht.
Hat jemand eine Idee für mich?
Joachim
Win7/64bit
Microsoft Visual Studio Express 2012 für Windows Desktop, Version 11.0.61030.00 Update 4, Microsoft .NET Framework Version 4.5.50709
Installierte Version: Desktop Express, Team Explorer für Visual Studio 2012 05695-004-0030004-02645, Microsoft Team Explorer für Visual Studio 2012
Visual Basic 2012 05695-004-0030004-02645, Microsoft Visual Basic 2012
Visual C# 2012 05695-004-0030004-02645,Microsoft Visual C# 2012
Visual C++ 2012 05695-004-0030004-02645, Microsoft Visual C++ 2012
