五月综合缴情婷婷六月,色94色欧美sute亚洲线路二,日韩制服国产精品一区,色噜噜一区二区三区,香港三级午夜理伦三级三

您現(xiàn)在的位置: 365建站網(wǎng) > 建站教程 > XSLT 教程 > XSLT - 編輯 XML

XSLT - 編輯 XML

此節(jié)有 176 人學(xué)習(xí)過(guò)     參與評(píng)論

存儲(chǔ)在 XML 文件中的數(shù)據(jù)可通過(guò)因特網(wǎng)瀏覽器進(jìn)行編輯。

打開(kāi)、編輯并保存 XML

現(xiàn)在,我們會(huì)為您展示如何打開(kāi)、編輯及保存存儲(chǔ)于服務(wù)器上的 XML 文件。

我們將使用 XSL 把 XML 文檔轉(zhuǎn)換到一個(gè) HTML 表單中。XML 元素的值會(huì)被寫(xiě)到 HTML 表單中的 HTML 輸入域。此表單是可編輯的。在被編輯完成后,數(shù)據(jù)會(huì)被提交回服務(wù)器,XML 文件會(huì)得到更新(這部分由 ASP 完成)。

XML 文件和 XSL 文件

首先,請(qǐng)看將被使用的 XML 文檔 ("tool.xml"):

<?xml version="1.0" encoding="ISO-8859-1"?>
<tool>
  <field id="prodName">
    <value>HAMMER HG2606</value> 
  </field>
  <field id="prodNo">
    <value>32456240</value> 
  </field>
  <field id="price">
    <value>$30.00</value> 
  </field>
</tool>

查看 XML 文件。

接著,請(qǐng)看下面的樣式表("tool.xsl"):

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">

<xsl:template match="/">
<html>
<body>
<form method="post" action="edittool.asp">
<h2>Tool Information (edit):</h2>
<table border="0">
<xsl:for-each select="tool/field">
<tr>
<td>
<xsl:value-of select="@id"/>
</td>
<td>
<input type="text">
<xsl:attribute name="id">
  <xsl:value-of select="@id" />
</xsl:attribute>
<xsl:attribute name="name">
  <xsl:value-of select="@id" />
</xsl:attribute>
<xsl:attribute name="value">
  <xsl:value-of select="value" />
</xsl:attribute>
</input> 
</td>
</tr>
</xsl:for-each>
</table>
<br />
<input type="submit" id="btn_sub" name="btn_sub" value="Submit" />
<input type="reset" id="btn_res" name="btn_res" value="Reset" />
</form>
</body>
</html>
</xsl:template>
</xsl:stylesheet>

查看 XSL 文件。

上面這個(gè) XSL 文件會(huì)循環(huán)遍歷 XML 文件中的元素,并為每個(gè) XML "field" 元素創(chuàng)建一個(gè)輸入域。field 元素的 id 屬性的值被添加到每個(gè) HTML 輸入域的 id 和 name 屬性。"value" 元素的值被添加到每個(gè) HTML 輸入域的 "value" 屬性。結(jié)果是,可以得到一個(gè)包含 XML 文件中值的可編輯的 HTML 表單。

然后,我們還有第二個(gè)樣式表:"tool_updated.xsl"。這個(gè) XSL 文件會(huì)被用來(lái)顯示已更新的 XML 數(shù)據(jù)。這個(gè)樣式表不會(huì)輸出可編輯 HTML 表單,而是一個(gè)靜態(tài)的 HTML 表格:

<?xml version="1.0" encoding="ISO-8859-1"?>
<xsl:stylesheet version="1.0"
xmlns:xsl="http://www.w3.org/1999/XSL/Transform">

<xsl:template match="/">
<html>
<body>
<h2>Updated Tool Information:</h2>
<table border="1">
<xsl:for-each select="tool/field">
<tr>
<td><xsl:value-of select="@id" /></td>
<td><xsl:value-of select="value" /></td>
</tr>
</xsl:for-each>
</table>
</body>
</html>
</xsl:template>

</xsl:stylesheet>

查看 XSL 文件。

ASP 文件

在上面 "tool.xsl" 文件中, HTML 表單的 action 屬性的值是 "edittool.asp" 。

"edittool.asp" 頁(yè)面包含兩個(gè)函數(shù):loadFile() 載入并轉(zhuǎn)換 XML 文件,updateFile() 函數(shù)更新 XML 文件:

<%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc

'加載 XML 文件
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)

'加載 XSL 文件
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)

'轉(zhuǎn)換文件
Response.Write(xmlDoc.transformNode(xslDoc))
end function

function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i

'加載 XML 文件
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)

'設(shè)置 rootEl 變量為根元素
Set rootEl = xmlDoc.documentElement

'循環(huán)遍歷 form 集
for i = 1 To Request.Form.Count
   '除去表單中的按鈕元素
   if instr(1,Request.Form.Key(i),"btn_")=0 then
   'selectSingleNode 方法可查詢匹配某個(gè)查詢的 XML 文件中的某個(gè)單一節(jié)點(diǎn)。
   '此查詢會(huì)請(qǐng)求 value 元素,此 value 元素是 field 元素的子元素,
   '而此 field 元素?fù)碛锌善ヅ浔韱渭挟?dāng)前 key 值的 id 屬性。
   '如果存在匹配,則設(shè)置 text 屬性為表單集中當(dāng)前域的值。
   set f = rootEl.selectSingleNode("field[@id='" & _
   Request.Form.Key(i) & "']/value")
   f.Text = Request.Form(i)
   end if
next

'保存已修改的 XML 文件
xmlDoc.save xmlfile

'釋放所有的對(duì)象引用
set xmlDoc=nothing
set rootEl=nothing
set f=nothing

'通過(guò)一個(gè)樣式表加載已修改的 XML 文件,這樣客戶端就可以看到所編輯的信息
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function

'如果表單已被提交,則更新XML文件并顯示結(jié)果,如果沒(méi)有被提交,則轉(zhuǎn)換此 XML 文件以供編輯
if Request.Form("btn_sub")="" then
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>

提示:假如您不了解如何編寫(xiě) ASP,請(qǐng)學(xué)習(xí)我們的《ASP 教程》。

注釋:我們正在轉(zhuǎn)換并更新位于服務(wù)器上的 XML 文件。這是一個(gè)跨平臺(tái)的解決方案??蛻舳藘H能獲得從服務(wù)器返回的 HTML - 而 HTML 可運(yùn)行于任何瀏覽器。

如對(duì)本文有疑問(wèn),請(qǐng)?zhí)峤坏浇涣髡搲瑥V大熱心網(wǎng)友會(huì)為你解答??! 點(diǎn)擊進(jìn)入論壇

發(fā)表評(píng)論 (176人查看0條評(píng)論)
請(qǐng)自覺(jué)遵守互聯(lián)網(wǎng)相關(guān)的政策法規(guī),嚴(yán)禁發(fā)布色情、暴力、反動(dòng)的言論。
昵稱:
最新評(píng)論
------分隔線----------------------------
XSLT 教程目錄

其它欄目

· 建站教程
· 365學(xué)習(xí)

業(yè)務(wù)咨詢

· 技術(shù)支持
· 服務(wù)時(shí)間:9:00-18:00
365建站網(wǎng)二維碼

Powered by 365建站網(wǎng) RSS地圖 HTML地圖

copyright © 2013-2024 版權(quán)所有 鄂ICP備17013400號(hào)