Microsoft.XMLDOM 遍历xml所有节点实现代码

microsoft.xmldom 遍历xml所有节点实现代码
所有microsoft xml parser函数得到w3c xml dom的正式推荐，除了load和loadxml函数（正式的dom不包括标准函数loading xml文档）。有13个节点类型被microsoft xml parser支持

文档对象模型（dom）
　　 　　dom是html和xml文档的编程基础，它定义了处理执行文档的途径。编程者可以使用dom增加文档、定位文档结构、填加修改删除文档元素。w3c的重要目标是把利用dom提供一个使用于多个平台的编程接口。w3c dom被设计成适合多个平台，可使用任意编程语言实现的方法。

<%
    dim xml,objnode,objatr,ncntchd,ncntatr
    set xml=server.createobject("microsoft.xmldom")

    xml.async=false
    xml.load(server.mappath("data.xml"))
    set objnode=xml.documentelement

    ncntchd=objnode.childnodes.length-1
    for i=0 to ncntchd

        set objatr=objnode.childnodes.item(i)
        ncntatr=objatr.attributes.length-1

        for j=0 to ncntatr
            response.write objatr.attributes.item(j).text&"
"
        next

        response.write "
"
    next

    response.write "
"

    set objatr=nothing
    set objnode=nothing
    set xml=nothing
%>
data.xml文档
 
 

看一款利用xml dom采集数据的代码

用xmldom方法打开xml文件，如果是本地的没有问题，就是用server.mappath("xml.xml")的方法，这时能正常分析出内容，但是直接用url却不显示出xml内容（在xmldom里表示是支持url方式的），后来研究一下发现可以用xmlhttp的方法获取xml后再分析，代码如下：

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
response.write("文档已经准备就绪。状态："& xml.readystate &"
")
set item=xml.getelementsbytagname("item")
for i=0 to (item.length-1)
set title=item.item(i).getelementsbytagname("title")
set link=item.item(i).getelementsbytagname("link")
response.write(""& title.item(0).text &"
")
next
else
response.write("文档还未准备就绪。状态："& xml.readystate &"
")
end if
set http=nothing
set xml=nothing

xml.xml文档的内容如下：

http://localhost/



http://localhostindex.asp教程