狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

VB如何調用DOM對象，去提取指定網址的內容？包括讀取頁面上指定區域，指定id,指定class的內容，如有多個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")'讀取頁面上指定區域(指定id,指定class的內容與此同理)
        For i=0 To (item.Length-1)
        Set title=item.Item(i).getElementsByTagName("title")
        Set link=item.Item(i).getElementsByTagName("link")
        msgbox "網頁鏈接" & (i+1) & ":" & link.Item(0).Text
        Next
Else
        msgbox "文檔還未準備就緒。狀態："& xml.ReadyState & "。"
End If
Set http=Nothing
Set xml=Nothing

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