對於小數據量，xml文件在檢索更新上於ACCESS有很多優勢。
我曾經測試過不用數據庫，把網站的會員信息，商品數據信息，交易信息，網站定制信息全部存放在三個xml文件中，運行結果十分正常，感覺上比數據庫快多了，不過沒有作測試，不能確定。
下面說一下創建，查詢，修改等對xml操作的主要方法
程序代碼
NO.1--建立一個XML數據庫data.xml
復制代碼 代碼如下:
<?xml version="1.0"?>
<records>
<record>
<name>caca</name>
<qq>154222225</qq>
<email>
[email protected]</email>
</record>
<records>
NO.2--建立對象CreateObject
建立data.xml的對象先
set xmldoc=server.createobjcet("microsoft.xmldom")
xmldoc.load(server.mappath("data.xml")
NO.3--選定節點SelectNode
你想操作哪個Node,必須定位到這個節點是不是,先看看這個data.xml有幾個Node??
用一個遞歸函數搞定:
復制代碼 代碼如下:
getnodes(xmldoc)
sub getnodes(node)
dim i
response.write("<br><b>NodeName:</b>"&node.nodename&"<br><b>NodeTypeString:</b>"&node.nodetypestring&"<br><b>NodeValue:</b>"&node.nodevalue&"<br><b>Text:</b>"&node.text&"<br><b>node.childnodes.length:</b>"&node.childnodes.length&"<p>")
if node.childnodes.length<>0 then
for i=0 to node.childnodes.length-1
getnodes(node.childnodes(i))
next
end if
end sub
用這個函數後,可以看到這個data.xml有10個Node
這些Node可以很簡單的定位:
xmldoc
xmldoc.childnodes(0)
xmldoc.childnodes(1)
xmldoc.childnodes(1).childnodes(0)
xmldoc.childnodes(1).childnodes(0).childnodes(0)
xmldoc.childnodes(1).childnodes(0).childnodes(0).text
xmldoc.childnodes(1).childnodes(0).childnodes(1)
xmldoc.childnodes(1).childnodes(0).childnodes(1).text
xmldoc.childnodes(1).childnodes(0).childnodes(2)
xmldoc.childnodes(1).childnodes(0).childnodes(2).text
是不是定位很簡單呀,還有個方法,比如定位<name>
xmldoc.selectsinglenode("//name")
NO.4--給節點賦值(修改節點的值)
學會了定位節點,利用其屬性,就可以修改或者賦值了
例如,把<name>的值caca改為wawa
xmldoc.selectsinglenode("//name").text="wawa"
xmldoc.save(server.mappath("data.xml"))
搞定!
NO.5--創建新的節點CreatenewNode
用createelement或者createnode("","","")
例如:在record下新建個<age>,只需要一句就搞定:
xmldoc.selectsinglenode("//record").appendchild(xmldoc.createelement("<age>"))
給<age>賦值
xmldoc.selectsinglenode("//age").text="20"
xmldoc.save(server.mappath("data.xml"))
搞定!
NO.6--刪除一個節點DeleteNode
你必須明確你想刪除的這個節點的父節點,以及這個節點的特征
例如:刪除<qq>節點
xmldoc.selectsinglenode("//record").removechild(xmldoc.selectsinglenode("//qq"))
例如:刪除那個<name>=caca的<record>
xmldoc.selectsinglenode("//records").removechild(xmldoc.selectsinglenode("//record[name='caca']))
xmldoc.save(server.mappath("data.xml"))
搞定!
只有能熟練這6條code,用asp控制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
等能夠熟練的運用xmldom對象來操作xml文件了，就可以享受xmlhttp對象來實現asp下的許多功能了。
------------------------------------------------------------------------------------------
雖然asp只能簡單的操作XML文件，可是對於一般程序開發者來說就已經足夠。
之前，XML語言非常的少接觸，後來慢慢的，發覺XML在存儲數據上有很多的方便。雖然安全性不好（個人認為），可是對於一般的數據存儲的確 是一個非常不錯的選擇。
今天因為在一個網站上需要用到XML，我在這裡就做一些總結（後期將會用到）：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝
首先，先整理ASP讀取XML文件
default.asp的代碼
<%
dim node,i,nodecount
set Doc = CreateObject("Microsoft.XMLDOM")
Doc.async = false
Doc.load(Server.MapPath("data.xml"))
set root = Doc.documentElement
set nodeLis = root.childNodes
nodeCount = nodeLis.length
For i=1 to nodeCount
set node = nodeLis.nextNode()
set cost = node.attributes.getNamedItem("cost")
%>
第 <%=i%> 條記錄：
<table width="50%" border="1">
<tr>
<td width="43" rowspan="2"><img src="<%=node.selectSingleNode("img").text%>"/></td>
<td width="46">書名</td>
<td width="48">出版社</td>
<td width="42">價格</td>
</tr>
<tr>
<td>
<%=node.selectSingleNode("name").text%>
</td>
<td>
<%=node.selectSingleNode("publisher").text%>
</td>
<td>
<%= cost.text%>
</td>
</tr>
</table>
<%
Next
%>
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
接下來就是Data.xml數據內容
<?xml version="1.0" encoding="UTF-8"?>
<data>
<book cost="56">
<name>Dreamweaver</name>
<publisher>中國鐵路出版社</publisher>
<img>img/dw.jpg</img>
</book>
<book cost="62">
<name>Flash</name>
<publisher>中國鐵路出版社</publisher>
<img>img/flash.jpg</img>
</book>
<book cost="48">
<name>Firweorks</name>
<publisher>中國鐵路出版社</publisher>
<img>img/fw.jpg</img>
</book>
</data>
