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

2024-05-04 11:01:59

字體：大中小

來源：轉載

供稿：網友

分別保存下面兩段代碼，一個保存為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。