wie gesagt die selbe methode, nicht den selben code, so wie dus hast hab ichs im moment, allerdings geht die cpu auf 25% (bei 4 kernen) dh. ein kern hat 100% http://sollniss.1x.to/
Jolo_ Coder
Anmeldedatum: 20.03.2007 Beiträge: 210
Verfasst am: 17.02.2008, 20:09
Code:
' URL (Webseite) laden
Private Sub URL_Load(ByVal sURL As String)
Dim sQuelltext As String
With WebBrowser1
.Tag = "Load"
.Navigate sURL
' Warten bis Seite vollständig geladen ist
While .Tag <> ""
DoEvents
Wend
End With
End Sub