用ASP讀取XML文件的具體方法與示例

分別保存下面兩段代碼，一個保存為readxml.asp另一個保存為test.xml，放在同一個目錄下面，調試程序即可，在程序裡面我已經做了解釋，讀取代碼可以做成一個readxml的函數，通過使用輸入的參數而讀取xml不同數據記錄的不同的值。這段程序的改編來自互聯網，有什麼出入請見諒。
復制代碼 代碼如下:
<% 
dim xml,objNode,objAtr,nCntChd,nCntAtr 
Set xml=Server.CreateObject("Microsoft.XMLDOM")  
xml.Async=False 
xml.Load(Server.MapPath("test.xml"))  

Set objNode=xml.documentElement 
nCntChd=objNode.ChildNodes.length-1 

'這個可以定義asp讀取xml文件的那一個值，通過傳遞這個值來確定讀取的數據 

for i=0 to nCntChd 
set objAtr=objNode.ChildNodes.item(i) 
nCntAtr=objAtr.Attributes.length-1 

'歷遍一條記錄裡面的所有的記錄項，記錄是從0開始的
' http://www.knowsky.com/

for j=0 to nCntAtr 
response.write objAtr.Attributes.item(j).Text&"<br>" 
next 
response.write "<br>" 
next 

Set objAtr=Nothing 
Set objNode=Nothing  
Set xml=Nothing  
%>
xml文件
復制代碼 代碼如下:
以下為程序代碼：
<?xml version="1.0" encoding="utf-8" ?> 
<root> 
<row ID="1" COMPNAME="過橋軒" ADDR="廣東省廣州市越秀區北京路" 郵編="510000" TEL="8620-8333" PRODSERV="經營面" 經濟行業="粥粉面店" 省份="廣東省" 地市="廣州市" 區域="越秀區" visit="0" 優先級="9999999999" zhuangtai="最新"/> 
<row ID="2" COMPNAME="周仔" ADDR="廣東省廣州市" 郵編="510000" TEL="8620-8330" PRODSERV="經營快餐飲食" 經濟行業="快餐" 省份="廣東省" 地市="廣州市" 區域="越秀區" visit="0" 優先級="9999999999" zhuangtai="最新"/> 
<row ID="3" COMPNAME="香菜館" ADDR="廣東省廣州市越秀區" 郵編="510000" TEL="8620-837" PRODSERV="經營湘菜" 經濟行業="湘菜" 省份="廣東省" 地市="廣州市" 區域="越秀區" visit="0" 優先級="9999999999" zhuangtai="最新"/> 
</root> 

DOM的對象和方法的簡略說明：
documentElement 屬性 　　　　　確認XML 文件的根（Root）節點。 
selectSingleNode 　　　　　　　　傳回第一個符合樣式的節點。 
loadXML 方法 　　　　　　　　　　加載一個XML 文件或字符串的片斷。 
haschildnodes 方法 　　　　　　　如果指定的節點有一個或更多子節點，傳回值為true。 
createElement 方法 　　　　　　　建立一個指定名稱的元素。 
AppendChild 方法 　　　　　　　　加上一個節點當作指定節點最後的子節點。 
createCDATASection 方法 　　　　建立一個包含特定數據的CDATA。