HTML Code von Suchabfrage mit VBA abfragen
03.07.2008 10:49:00
Suchabfrage
Ich möchte per VBA den HTML-Code einer Suchabfrage in einer String-Variable abspeichern.
Im Browser wird zwar auch das Suchergebnis angezeigt, der in der String-Variable abgespeicherte Code ist jedoch der der ursprünglichen Suchmaske :-(
Sub IAPD()
Dim appie As Object
Dim sText As String
Set appie = CreateObject("InternetExplorer.Application")
appie.Visible = True
appie.Navigate "http://www.adviserinfo.sec.gov/IAPD/Content/Search/iapd_OrgSearch.aspx"
While Not appie.ReadyState = 4 'Warte auf Webseite
DoEvents
Wend
appie.Document.Search1.Name.Value = "Deutsche Bank"
appie.Document.all.Search1.go.Click
sText = appie.document.documentElement.outerHTML
End Sub
Schonmal vielen Dank für alle Antworten!
Stefan
Anzeige