VBA：使用wininet从网站获取源代码

Question

所以基本上我有以下代码：

Dim myIE As InternetExplorer: Set myIE = New InternetExplorer
myIE.Visible = True
myIE.Navigate URL:="http://www.google.com"
While myIE.Busy
    DoEvents  'wait until IE is done loading page.
Wend

我如何获取该页面的源代码？如果有人可以将我链接到相应的文档，那就太好了。通过MS的网站，我绝对没有希望。

干杯。

Answer 1

您可以使用以下方法检索源HTML：

strHTML = myIE.Document.body.innerHTML