互聯網瀏覽器XMLhttp而不是互聯網controlls？

Question

我正在使用vba代碼從網上獲取信息。 一切都很好，但SOOOO需要多長時間:(

我記得重水復疑無路，還有另一種方式來獲得信息，而不是創建一個IE瀏覽器對象。

我想我不需要的IE Con​​trolls。我我只是樣之後，對方一個環節出片的。

如何被其他的「辦法」的工作？它類似的XMLHTTP？ 是否有代碼有區別嗎？shoudnt是，還是？

感謝！

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") 

對於這一點，你需要將引用添加到兩個「微軟XML，V6。 0「和」Microsoft HTML Object Library「，那麼你可以使用MSHTML庫來根據需要解析代碼。