vba抓取网页数据(我正在使用VBA从html文档中抓取数据的内容。)

　　vba抓取网页数据(我正在使用VBA从html文档中抓取数据的内容。)

　　我正在使用VBA从HTML文档中获取数据。此文档收录一个iframe。我可以使用网络浏览器的“检查元素”和查看文本；但是，我不能用VBA实现这一点。这就是我正在使用的代码，它可以很好地与其他元素配合使用

　　Sub NewMain()

Dim i As Integer

Dim IE As InternetExplorer

Dim sc As MSHTML.IHTMLElementCollection

Dim scObj As MSHTML.IHTMLGenericElement

Set objShell = CreateObject("Shell.Application")

IE_count = objShell.Windows.Count

Debug.Print "ie count " & IE_count

For x = 0 To (IE_count - 1)

On Error Resume Next

my_URL = objShell.Windows(x).Document.Location

my_title = objShell.Windows(x).Document.title

If my_URL like "http://www.loopnet.com/xNet/Mainsite/Report/Report.aspx?" & "*" Then

Debug.Print "You have the document"

Set IE = objShell.Windows(x)

Set mydoc = IE.Document

Set sc = mydoc.getElementsByTagName("script")

For Each scObj In sc

Debug.Print scObj.innerText

Next

End If

Next

End Sub

　　我尝试阅读的HTML如下。我尝试在body元素内的script标记中获取数据；尽管如此，我也认为我可以访问HTML class=“dj_ie je_ie10 dj_contentbox”id=“LN”项。但我不知道该怎么办。任何帮助都将不胜感激

...

...

　　主要是网站是开源的。他们列出了要出售和出租的房地产。在站点上，选择感兴趣的属性，然后单击“创建报告”。这个HTML片段和我想从中获取的数据是“列表比较报告”