ASP通过XMLDom在服务器端操作XML文件

对于小数据量，xml文件在检索更新上于ACCESS有很多优势。 

我曾经测试过不用数据库，把网站的会员信息，商品数据信息，交易信息，网站定制信息全部存放在三个xml文件中，运行结果十分正常，感觉上比数据库快多了，不过没有作测试，不能确定。 

下面说一下创建，查询，修改等对xml操作的主要方法 

’创建DOM对象 
set objDom=server.CreateObject("MicroSoft.XMLDom") 

’取得xml数据 
’方法1 取得xml文件的xml数据 
objDom.load("c:\test.xml") 
’方法2 取得xml数据串的数据 
objDom.loadxml("<people><man name="sd"/></people>") 

’创建一个节点对象 
Set Newnode=objDom.CreateElement("people") 
’给这个节点赴值 
Newnode.Text="人" 
’ 给这个节点添加属性 
Set NewAttribute=objDom.CreateNode("attribute","name","") 
NewAttribute.Text= "张三" 
Newnode.SetAttributeNode NewAttribute 
’给这个节点添加子节点 
Set NewnodeChild=objDom.CreateElement("address") 
Newnode.appendChild NewnodeChild 
’保存这个节点对象 
objDom.appendChild Newnode 
objDom.save("c:\test.xml") 

’查找一个节点对象 
set objtofind=objdom.documentElement.SelectSingleNode("//people/man") 
’取出这个节点对象的 节点名，节点值，某个属性值，和全部的xml 
nodename=objtofind.nodename 
nodevalue=objtofind.text 
objtofind.GetAttributeNode("name").Nodevalue ’属性名为name的属性值 

’取出一个属性节点对象 
set objattrtofind=objdom.documentElement.SelectSingleNode("//people/man"). GetAttributeNode("name") 
’取出这个节点的属性名，属性值 
nodeattrname=objattrtofind.nodename 
nodeattrvalue=objattrtofind.nodevalue 

’删除一个节点对象 
set objnode=objdom.documentElement.SelectSingleNode("//people/man") ’要删除的节点 
set objparentnode=objdom.documentElement.SelectSingleNode("//people") ’要删除的节点的父节点 
objparentnode.removeChild objnode 

’取出一个节点的字节点集合 
set objnodes=objdom.documentElement.SelectSingleNode("//people/man").ChildNodes 

遍历这个集合 
方法1 
for each element in objnodes 
response.write element.nodename 字节点名 
response.write element.text 字节点值 

next 
方法2 

domlength=objnodes.length 
for i = 0 to domlength-1 
response.write objnodes.childnodes(i).nodename 字节点名 
response.write objnodes.childnodes(i).text 字节点值 
next 

取出一个节点的属性集合 

set objnodes=objdom.documentElement.SelectSingleNode("//people/man").GetAttributeNode("name").attributes 

遍历这个集合 

for each element in objnodes 
response.write element.nodename 属性名 
response.write element.nodevalue 属性值 
next