VB如何調(diào)用DOM對象，去提取指定網(wǎng)址的內(nèi)容？包括讀取頁面上指定區(qū)域，指定id,指定class的內(nèi)容，如有多個class相同的對象，如何遍歷，一個完整的例程。

 

請看以下示例：
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET","http://localhost/xml.xml",False
http.send

Set xml=Server.CreateObject("Microsoft.XMLDOM")
xml.Async=False
xml.ValidateOnParse=False
xml.Load(http.ResponseXML)
If xml.ReadyState>2 Then
        Set item=xml.getElementsByTagName("item")'讀取頁面上指定區(qū)域(指定id,指定class的內(nèi)容與此同理)
        For i=0 To (item.Length-1)
        Set title=item.Item(i).getElementsByTagName("title")
        Set link=item.Item(i).getElementsByTagName("link")
        msgbox "網(wǎng)頁鏈接" & (i+1) & ":" & link.Item(0).Text
        Next
Else
        msgbox "文檔還未準備就緒。狀態(tài)："& xml.ReadyState & "。"
End If
Set http=Nothing
Set xml=Nothing

該文章在 2014/3/25 0:21:54 編輯過