performance - Internet Explorer XMLhttp 而不是 Internet 控件？

Question

我正在使用 vba 代码从网络上获取信息。一切都很好，但需要很长时间:(

我记得很清楚，还有另一种获取信息的方法，而不是创建一个 IE 对象。

我想我不需要 IE 控件。我只是从一张纸上一个接一个地加载一个链接。

另一种“方式”如何运作？它类似于 XMLHttp 吗？代码有区别吗？应该是，还是？

谢谢！

Answer 1

这就是我使用的：

Function getPage(URLStr As String) As MSHTML.HTMLDocument
    Dim oHttpRequest As MSXML2.XMLHTTP60
    Set oHttpRequest = New MSXML2.XMLHTTP60
    With oHttpRequest
        .Open "GET", URLStr, False
        .send
    End With
    Dim oHTMLDoc As MSHTML.HTMLDocument
    Set oHTMLDoc = New MSHTML.HTMLDocument
    oHTMLDoc.body.innerHTML = oHttpRequest.responseText
    Set getPage = oHTMLDoc
End Function

要调用该函数，请使用以下内容：

Dim oHTMLDoc as MSHTML.HTMLDocument
Set oHTMLDoc = getPage("http://www.example.com")

为此，您需要添加对“Microsoft XML, v6.0”和“Microsoft HTML 对象库”的引用，然后您可以根据需要使用 MSHTML 库解析代码。