Aug 27 2007

Auslesen einer Web-Seite mit VBA

Kategorien: , , , ,  

Um den Inhalt einer Web-Seite auszulesen, benötigt man ein IE-Objekt, welches man etwa wie folgt verwendet:


Const url = "http://www.example.com"
Dim Response As String

' Zugriff aufs Web
Dim WebBrowser As Object
Set WebBrowser = CreateObject("InternetExplorer.Application")
WebBrowser.Navigate url

' Warten, bis die Seite geladen ist
Do While WebBrowser.busy
  DoEvents
Loop

Response = WebBrowser.Document.Body.InnerHtml

' Ressourcen freigeben
WebBrowser.Quit
Set WebBrowser = Nothing

In der Variablen ”Response” steht dann der HTML-Quelltext der Seite.

Ähnliche Beiträge

Kommentare

Kommentar abgeben