日韩黑丝制服一区视频播放|日韩欧美人妻丝袜视频在线观看|九九影院一级蜜桃|亚洲中文在线导航|青草草视频在线观看|婷婷五月色伊人网站|日本一区二区在线|国产AV一二三四区毛片|正在播放久草视频|亚洲色图精品一区

分享

用XML文件存儲(chǔ)數(shù)據(jù)

 yiyiyicz 2012-06-16

1:XML缺少數(shù)據(jù)庫(kù)具備的特性:高效的存儲(chǔ)(即使是數(shù)據(jù)庫(kù)內(nèi)XML字段還是沒(méi)有傳統(tǒng)字段的速度快)、索引和數(shù)據(jù)修改機(jī)制(DB2等數(shù)據(jù)庫(kù)產(chǎn)品對(duì)XML內(nèi)的元素和屬性可以加索引,內(nèi)建在數(shù)據(jù)庫(kù)中的XML字段享受了數(shù)據(jù)庫(kù)帶來(lái)的一些好處);嚴(yán)格的數(shù)據(jù)安全訪問(wèn)控制;完整的事務(wù)和數(shù)據(jù)一致性控制;多用戶訪問(wèn)機(jī)制;觸發(fā)器、完善的并發(fā)控制等因此,用戶量大、數(shù)據(jù)集成度高以及性能要求高的數(shù)據(jù)環(huán)境中還是需要數(shù)據(jù)庫(kù)來(lái)完成任務(wù),IBM的DB2工程師也在討論時(shí)建議我們統(tǒng)計(jì)類(lèi)數(shù)據(jù)還是用傳統(tǒng)字段為好。

2:說(shuō)說(shuō) XSL,XSLT文件是用來(lái)做XML轉(zhuǎn)換,一般是轉(zhuǎn)換為HTML(XHTML),只是轉(zhuǎn)換的話 XSL 代碼與XML的結(jié)構(gòu)復(fù)雜度有關(guān),與 XML本身有多少數(shù)據(jù)量無(wú)關(guān), 為什么會(huì)有幾千萬(wàn)行的數(shù)據(jù)?你恐怕把 XML 寫(xiě)成 XSL 了吧,數(shù)據(jù)有幾千萬(wàn)行才對(duì)吧,XSL 不會(huì)很大。

3:真的數(shù)據(jù)源有 幾千萬(wàn)行的話,是否應(yīng)該存在 XML 文檔中?你可以計(jì)算一下,XML文檔是文本模式存放,一行存放最少算平均20個(gè)字節(jié)有吧(就算10個(gè)漢字),那 1000萬(wàn)行已經(jīng) 200M 大,不要說(shuō) 200M,就是20M的文本文件用編輯器打開(kāi)都會(huì)非常吃力,像死機(jī)一樣,這么大的數(shù)據(jù)量我認(rèn)為不應(yīng)該存在 XML 文件中,應(yīng)存在數(shù)據(jù)庫(kù)表中,如果是文件系統(tǒng)應(yīng)該用二進(jìn)制文件存放或根據(jù)用途和管理方案對(duì)其分割。XML只適合保存少量數(shù)據(jù),最多不能超過(guò)1w

4:數(shù)據(jù)庫(kù)中XML數(shù)據(jù)(表轉(zhuǎn)換或通過(guò)源生XML字段)讀出通過(guò) XSL 顯示頁(yè)面的方式由于沒(méi)有了SQL,可以保證頁(yè)面代碼與各類(lèi)數(shù)據(jù)庫(kù)產(chǎn)品的無(wú)關(guān)性,由于大數(shù)據(jù)量顯示一般都有分頁(yè)控制讀取和顯示,性能問(wèn)題不大。
 
5,現(xiàn)代的數(shù)據(jù)庫(kù)大部分都有 XML 字段,可以直接存儲(chǔ) XML, 不需要經(jīng)過(guò) 表 -> XML 的轉(zhuǎn)換,即使沒(méi)有 XML 字段,由于XML本身的文本特性,也可以將其作為字符串 或 CLOB 存儲(chǔ),只有數(shù)據(jù)本身不是XML,而是用二維表格存在數(shù)據(jù)庫(kù)中時(shí),才需要 表 -> XML 轉(zhuǎn)換
 
 

把數(shù)據(jù)存儲(chǔ)到 XML 文件

創(chuàng)建并保存 XML 文件

如果數(shù)據(jù)要被傳送到非 Windows 平臺(tái)上的應(yīng)用程序,那么把數(shù)據(jù)保存在 XML 文件中是有好處的。請(qǐng)記住,XML 有很強(qiáng)的跨平臺(tái)可移植性,并且數(shù)據(jù)無(wú)需轉(zhuǎn)換!

首先,我們將學(xué)習(xí)如何創(chuàng)建并保存一個(gè) XML 文件。下面的這個(gè) XML 文件將被命名為 "test.xml",并被保存在服務(wù)器上的 c 目錄中。我們將使用 ASP 和微軟的 XMLDOM 對(duì)象來(lái)創(chuàng)建并保存這個(gè) XML 文件:

<%
Dim xmlDoc, rootEl, child1, child2, p

'創(chuàng)建XML文檔
Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")

'創(chuàng)建根元素并將之加入文檔
Set rootEl = xmlDoc.createElement("root")
xmlDoc.appendChild rootEl

'創(chuàng)建并加入子元素
Set child1 = xmlDoc.createElement("child1")
Set child2 = xmlDoc.createElement("child2")
rootEl.appendChild child1
rootEl.appendChild child2

'創(chuàng)建 XML processing instruction
'并把它加到根元素之前
Set p=xmlDoc.createProcessingInstruction("xml","version='1.0'")
xmlDoc.insertBefore p,xmlDoc.childNodes(0)

'把文件保存到 C 目錄
xmlDoc.Save "c:\test.xml"
%>

如果您打開(kāi)這個(gè)被保存的文件,它會(huì)使這個(gè)樣子 ("test.xml"):

<?xml version="1.0"?>
<root>
  <child1 />
  <child2 />
</root>

真實(shí)的表單例子

現(xiàn)在,我們看一個(gè)真實(shí)的表單例子。

我們首先看一下這個(gè)被用在例子中的 HTML 表單:下面的HTML表單要求用戶輸入他們的名字、國(guó)籍以及電子郵件地址。隨后這些信息會(huì)被寫(xiě)到一個(gè) XML 文件,以便存儲(chǔ)。

"customers.htm":

<html>

<body>
<form action="saveForm.asp" method="post">
<h1>請(qǐng)輸入您的聯(lián)系信息:</h1>
<label>名字: </label>
<p><input type="text" id="firstName" name="firstName"></p>

<label>姓氏: </label>
<p><input type="text" id="lastName" name="lastName"></p>

<label>國(guó)家: </label>
<p><input type="text" id="country" name="country"></p>

<label>郵件: </label>
<p><input type="text" id="email" name="email"></p>

<p>
<input type="submit" id="btn_sub" name="btn_sub" value="Submit">
<input type="reset" id="btn_res" name="btn_res" value="Reset">
</p>
</form>
</body>

</html>

用于以上 HTML 表單的 action 被設(shè)置為 "saveForm.asp"。"saveForm.asp" 文件是一個(gè) ASP 頁(yè)面,可循環(huán)遍表單域,并把它們的值存儲(chǔ)在一個(gè) XML 文件中:

<%
dim xmlDoc
dim rootEl,fieldName,fieldValue,attID
dim p,i

'如果有錯(cuò)誤發(fā)生,不允許程序終止
On Error Resume Next

Set xmlDoc = server.CreateObject("Microsoft.XMLDOM")
xmlDoc.preserveWhiteSpace=true

'創(chuàng)建并向文檔添加根元素
Set rootEl = xmlDoc.createElement("customer")
xmlDoc.appendChild rootEl

'循環(huán)遍歷 Form 集
for i = 1 To Request.Form.Count
  '除去表單中的 button 元素
  if instr(1,Request.Form.Key(i),"btn_")=0 then
    '創(chuàng)建 field 和 value 元素,以及 id 屬性
    Set fieldName = xmlDoc.createElement("field")
    Set fieldValue = xmlDoc.createElement("value")
    Set attID = xmlDoc.createAttribute("id")
    '把當(dāng)前表單域的名稱(chēng)設(shè)置為 id 屬性的值
    attID.Text = Request.Form.Key(i)
    '把 id 屬性添加到 field 元素
    fieldName.setAttributeNode attID
    '把當(dāng)前表單域的值設(shè)置為 value 元素的值
    fieldValue.Text = Request.Form(i)
    '將 field 元素作為根元素的子元素進(jìn)行添加
    rootEl.appendChild fieldName
    '將 value 元素作為 field 元素的子元素進(jìn)行添加
    fieldName.appendChild fieldValue
  end if
next

'添加 XML processing instruction
'并把它加到根元素之前
Set p = xmlDoc.createProcessingInstruction("xml","version='1.0'")
xmlDoc.insertBefore p,xmlDoc.childNodes(0)

'保存 XML 文件
xmlDoc.save "c:\Customer.xml"

'釋放所有的對(duì)象引用
set xmlDoc=nothing
set rootEl=nothing
set fieldName=nothing
set fieldValue=nothing
set attID=nothing
set p=nothing

'測(cè)試是否有錯(cuò)誤發(fā)生
if err.number<>0 then
  response.write("Error: No information saved.")
else
  response.write("Your information has been saved.")
end if
%>

注釋?zhuān)?/SPAN>如果指定的 XML 文件名已經(jīng)存在,那個(gè)文件會(huì)被覆蓋!

XML 文件會(huì)由上面的代碼生成,大致的樣子是這樣的:("Customer.xml"):

<?xml version="1.0" ?>
<customer>
  <field id="firstName">
    <value>David</value> 
  </field>
  <field id="lastName">
    <value>Smith</value> 
  </field>
  <field id="country">
    <value>China</value> 
  </field>
  <field id="email">
    <value>mymail@myaddress.com</value> 
  </field>
</customer
 

XML文件XPATH查詢(xún)方法

vb中使用DomDocument對(duì)象操作xml時(shí),若要使用XPath中的內(nèi)部函數(shù),需要進(jìn)行如下設(shè)置
 
dim dom as DomDocument
dom.setProperty  "SelectionLanguage", "XPath"
 
XML 路徑語(yǔ)言 (XPath) 查詢(xún)可以用來(lái)利用 DOM 方法 (如 selectNodesselectSingleNode 查詢(xún) XML 文件。預(yù)設(shè)會(huì)使用的查詢(xún)是 XSLPattern 回溯相容性。若要用以 XPath 變更 [以 XPath 的 [DOMDocumentSelectionLanguage 內(nèi)部屬性]。XPath 新增很多的功能 ; 比方說(shuō)它可讓您使用如 字串長(zhǎng)度加總 函數(shù)。
下列的程式碼範(fàn)例示範(fàn)如何使用 XPath 與 selectNodes 方法: 
  1. 啟動(dòng) Visual Basic,並建立新的標(biāo)準(zhǔn)執(zhí)行檔。
  2. [] 選取 [專(zhuān)案]、 選取 [參考],然後再新增 [Microsoft XML、 v3.0 的參考]。
  3. 將下列程式碼加入至 Form_Load 事件:
Dim dom As DOMDocument30
Dim nodelist As IXMLDOMNodeList
Dim strPath As String
   
Set dom = New DOMDocument30
dom.async = False
   
dom.loadXML "<Admin><Area AreaName='a'/></Admin>"
   
dom.setProperty "SelectionLanguage", "XPath"
strPath = "/Admin/Area[string-length(@AreaName) = 1]"
Set nodelist = dom.documentElement.selectNodes(strPath)
   
Debug.Print "Found " & nodelist.length & " Node"

4,執(zhí)行該應(yīng)用程式,並請(qǐng)注意 [即時(shí)運(yùn)算] 視窗會(huì)顯示 找到 1 節(jié)點(diǎn)。

5,若要顯示預(yù)設(shè)的註解出呼叫 setProperty 程式碼行行為。因?yàn)樵賵?zhí)行程式碼會(huì)產(chǎn)生錯(cuò)誤訊息 XSL 模式比對(duì)不支援 字串長(zhǎng)度 函式。

 

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買(mǎi)等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類(lèi)似文章 更多