看代碼和注釋,先了解一下ASP是如何讀寫XML文件的。
'// 首先定義和創建XML對象
Dim oXML,oXMLRoot,oXMLItems,oXMLLinks,oXMLItem,iLength,i
Set oXML = CreateObject("Microsoft.XMLDOM") '// 或 MSXML2.DOMDocument
'// 然后加載XML文檔
oXML.load "XML文件地址" '// 或:oXML.loadXML "XML內容"
'// 內容加載完成后,現在來加載它的節點信息
'// 獲取XML所有節點
Set oXMLRoot = oXML.documentElement
'// 獲取節點
Set oXMLItems = oXMLRoot.selectNodes("ExampleNode")
'// 此時oXMLItems 變量中已經包含了所有ExampleNode節點的內容。
'// 如果要獲取它下面的ExampleSubNode節點的話,用以下語句
'// 獲取節點,設ExampleNode節點只有一個,那么0即是它的內容
oXMLLinks = oXMLItems(0).selectNodes("ExampleSubNode")
'// 獲取節點長度(個數)
iLength = oXMLLinks.length - 1
For i = 0 To iLength
Set oXMLItem = oXMLLinks.item(i)
'// 用 getAttribute 方法來獲取它的屬性值
oXMLItem.getAttribute("ID")
'// 用 selectSingleNode 方法來獲取它的節點值
oXMLItem.selectSingleNode("Name").text
Next
'// 釋放XML對象
Set oXMLItem = Nothing
Set oXMLLinks = Nothing
Set oXMLItems = Nothing
Set oXMLRoot = Nothing
Set oXML = Nothing
上面的代碼可以說是一個ASP讀取XML文件的基本流程,一般的用這個也就夠了。下面看一個例子來說明ASP如何讀寫XML文件以及ASP讀寫XML的具體用法,一篇從網上來的文章,原文如下:
在此之前,我寫了兩篇關于ASP結合XML的貼子,分別介紹了用XML取代數據庫和用XML整合數據庫這兩方面的技術,讓數據庫在某種情況下不再是我們的唯一選擇。而XML跟傳統數據庫相比,更有以下優點:更小的文件體積,更靈活的數據存貯,更方便的文件讀寫(因為XML是文本文件,所以無需專門的軟件制作和維護),而且XML技術也是網絡發展的大勢所趨(從.NET對XML全面的支持便可見一斑了)。如果有興趣的話,讓我們一起來寫一些自己的Function,來更方便和直觀地讀寫XML。
乍一看,XML跟HTML的格式非常相似,的確,因為它們都是衍生自SGML,基本數據也都是由首標簽,尾標簽,注釋標簽和一些普通文本組成。但XML在語法上比HTML要求更嚴格,稍有不慎,你的XML便會犯上語法錯誤,導致無法讀取其中數據。比如,在HTML中,我們把<a href="index.html">寫成<a href=index.html>是完全沒問題的,但XML中這樣就絕對不行,XML要求標記的屬性必須用單引號或雙引號引起來。至于如何寫一個合法的XML文件,我在前兩篇中都有敘說,大家可以搜索出來看幾眼,這里也就不多寫,下面給出一個合法的XML文件的例子,也是接下來我們要用到的。
================================================================= songlist.xml
<?xml version="1.0" encoding="gb2312"?>
<!-- 注釋:轉貼請注明作者 -->
<歌曲列表>
<歌曲 歌名="Yesterday" 時間="1:53" 分級="5"/>
<歌曲 歌名="Imagine" 時間="3:04" 分級="5"/>
<歌曲 歌名="All You Need Is Love" 時間="3:52" 分級="4"/>
<歌曲>
<歌名>Come Together</歌名>
<時間>4:18</時間>
<分級>4</分級>
</歌曲>
<歌曲 演唱者="約翰列儂">
<歌名>Oh My Love</歌名>
<時間>2:44</時間>
<分級>5</分級>
</歌曲>
<最后一次修改 修改人="" 時間="">無修改內容<最后一次修改>
</歌曲列表>
================================================================================
這個例子應該可以充分展現XML比數據庫更靈活的一面,雖然每一條記錄都是存貯一首歌的歌名,時間,分級這三項信息,但我們有多種存貯方法可選,既可以把數據放在標記的屬性里,也可以把數據放到下一級標記里顯示,像上例那樣,兩者共存也沒問題。同時,XML也沒有規定當你第一條記錄有多少列時,你第二條記錄也一定要有那么列,就上例而言,我們完全可以再加一條歌曲記錄,只指定歌名和時間而不分級。至于每一條記錄的標簽(如1-5條中的"歌曲"),可以重復也可以不同,你看,我就在最后加了一個完全與前面不同的"最后一次修改"標簽??傊?,XML在要求語法合法的同時也給了開發人員充足的自由,以前在數據庫里要用幾個表才能記錄的事,我們現在可以通通放在一個XML中了。下面,我一步一步來演示如何讀寫其中的任何一個元素。
首先,像打開數據庫一樣,我們也得打開我們的XML文件。像這樣:
Set rootXML = server.CreateObject("MSXML.DOMDocument")
rootXML.load server.MapPath("XML/config.xml")
“MSXML.DOMDocument是windows”的一個標準組件,每臺機器上都有的,請放心使用。
然后,為了能夠操作文件里的各項數據,我們再建一個類似游標的變量root,并把它指向XML文件的根標記(也就是<歌曲列表>):
Set root = rootXML.documentelement
如果我們把XML文檔看成是一個由一級一級的標記組成的樹型結構,那現在,我們的root對象表示的就是文檔的根標記,也就是第一級節點(一個XML文件中,根標記必須是唯一的)。所以我們設這么一個root對象就是為了更方便地訪問下一級節點,以實現對XML的控制。
就我們示例的這個XML文檔而言,它的根標記是<歌曲列表>,它的下一級標記有6個,前五個都是以<歌曲>命名,最后一個是<最后一次修改>,雖然名字不同,但是他們都是同一性質,我們可以把它們一起視為這個XML樹型結構的第二級節點。既然我們的root對象已經指向了第一級結點,好,現在
就讓我們站在第一級結點上來操作第二級結點。
比如,我們要得到下一級節點的某個標記的文本內容,像<最后一次修改>無修改內容<最后一次修改>中的"無修改內容"這段文本。我們可以如下操作:
先確定該標記是這一級節點中的第幾個,此例為6;好,確定后馬上行動:
text = root.childNodes.item(5).text
“root.childNodes.item(5).text”這一句代碼應該很好理解,用偽代碼翻譯過來就是“目錄.子目錄集合.集合中的第5個標記.標記的文本內容”,因為XML的元素索引是從0開始的,所以我們獲取某個位置的標記時,一點要記著把位置數減1再執行操作,否則就會越界。比如我們要獲取下一級節點的第一個標記的文本,我們就應該用“root.childNodes.item(0)”,而不是“root.childNodes.item(1)”
為了方便,我們將“獲取下一級標記的內容”這一操作寫成函數,以便重用:
Function getNodeText(ByVal nNode)
getNodeText = root.childNodes.item(nNode).text
End Function
有了這個函數后,我們再要得到“無修改內容”時就只需用如下代碼:
text = getNodeText(5)
既避免了出錯,也減輕了輸入工作。與之相反,修改下一級標記的內容的代碼是:
root.childNodes.item(nNode).text = 要修改成的字串,我們同樣寫成一個函數——
Function setNodeText(ByVal nNode, ByVal strNewNodeText)
root.childNodes.item(nNode).text = strNewNodeText
End Function
現在,我們要將“無修改內容”改成“第一條記錄已經更改”,就可以這樣:
setNodeText 5,"第一條記錄已經更改"
(修改后請用rootXML.Save(文件名)方法保存文件,以使修改生效。)
OK!我們已經可以方便地對下一級標記的進行讀取和修改了,好,下一個目標,標記的屬性。
我們先回顧一下我們的第二級節點中的第一個標記的內容:
<歌曲 歌名="Yesterday" 時間="1:53" 分級="5"/>
這是一種特殊表達方式,只有首標簽<歌曲>,而沒有尾標簽</歌曲>,更沒有夾在兩個標簽之間的文本內容,而直接以一個“/”結束。呵呵,我是個懶人,所以我比較偏向于這種省略尾標簽的寫法。但我們用這種省略寫法的時候,我們就沒法在首尾標簽中添加數據了,更沒法使用我們上面定義的兩個函數。這時候,標記的屬性給我們提供了存貯數據的唯一容器,上面這個標記中就存貯著3組屬性,下面讓我們來試著訪問它:
text = root.childNodes.item(0).attributes.item(0).value
這段代碼讓text變量被賦予了"Yesterday"這個字串,不信你打印一下。用偽代碼解釋之:
“目錄.下一級目錄.第0個標記.標記的屬性集合.集合中的第0個屬性.屬性對應的值”
廢話少說,寫成函數
Function getAttValue(ByVal nNode, ByVal nAtt)
getAttValue=root.childNodes.item(nNode).attributes.item(nAtt).value
End Function
以后就可以很方便地用text = getAttValue(0,0)得到下一級節點中第0個標記的第0個屬性值了,
屬性也是從0開始索引,切記。
至于修改屬性,很簡單,直接賦值既可,寫成函數表示:
Function setAttValue(ByVal nNode, ByVal nAtt, ByVal strNewAttValue)
root.childNodes.item(nNode).attributes.item(nAtt).value=strNewAttValue
End Function
好,一旦我們發現“All You Need Is Love”這首歌太好聽了,想把它的等級升成5,就可以這樣做
setAttValue 2,2,"5"
最后,記得使修改生效,也就是在操作后使用rootXML.Save(文件名)這一方法。
當能夠讀寫一個XML文件的文本內容和屬性值后,我想您也應該基本上能夠用ASP熟練地操作XML文檔元素了,趕快將這一技術用在你的ASP中吧!好,今天就寫到這里,下次再寫時我再附上刪除屬性、創建標記、添加標記、刪除標記、復制標記、替換標記、按條件查詢 等一些沒講完的操作。