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
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-07-06
Dim oNode As IXMLDOMNode
Dim oAttr As IXMLDOMAttribute
Dim oMap As IXMLDOMNamedNodeMap
Set oNode = oDocCfg.selectSingleNode("//User")
Set oMap = oNode.Attributes
Set oAttr = oDocCfg.createAttribute("Name")
oMap.setNamedItem oAttr
oMap.getNamedItem("Name").nodeTypedValue = "Fred"
第2个回答  2009-07-08
有几种方式:1.读写一个指定文件;2.读写注册表;3.使用DDE消息.
第3个回答  2009-07-11
如果说是网页中的内容的话 webbrowser和mshtml基本上都能给你搞定。

如果有vb搞不定的话,还可以在webbrowser打开网页之后插入js代码由js控制获取然后传递给vb进行处理。

一句话 只要js能读取设定的,全能做!
相似回答