XSLT – 编辑 XML概述

110次阅读

共计 3681 个字符，预计需要花费 10 分钟才能阅读完成。

导读	存储在 XML 文件中的数据可通过因特网浏览器进行编辑。

XSLT – 编辑 XML 概述

打开、编辑并保存 XML

现在，我们会为您展示如何打开、编辑及保存存储于服务器上的 XML 文件。

我们将使用 XSL 把 XML 文档转换到一个 HTML 表单中。XML 元素的值会被写到 HTML 表单中的 HTML 输入域。这个 HTML 表单是可编辑的。在被编辑完成后，数据会被提交回服务器，XML 文件会得到更新（这部分由 ASP 完成）。

XML 文件和 XSL 文件

首先，请看将被使用的 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>

接着，请看下面的样式表（”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.html">
<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 文件会循环遍历 XML 文件中的元素，并为每个 XML “field” 元素创建一个输入域。XML “field” 元素的 “id” 属性的值被添加到每个 HTML 输入域的 “id” 和 “name” 属性。每个 XML “value” 元素的值被添加到每个 HTML 输入域的 “value” 属性。结果是，可以得到一个包含 XML 文件中值的可编辑的 HTML 表单。

然后，我们还有第二个样式表：”tool_updated.xsl”。这个 XSL 文件会被用来显示已更新的 XML 数据。这个样式表不会输出可编辑 HTML 表单，而是一个静态的 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>

ASP 文件

在上面 “tool.xsl” 文件中，HTML 表单的 action 属性的值是 “edittool.asp”。

“edittool.asp” 页面包含两个函数：loadFile() 函数载入并转换 XML 文件，updateFile() 函数更新 XML 文件：

 <%
function loadFile(xmlfile,xslfile)
Dim xmlDoc,xslDoc'Load XML file
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)'Load XSL file
set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
xslDoc.async = false
xslDoc.load(xslfile)'Transform file
Response.Write(xmlDoc.transformNode(xslDoc))
end function
function updateFile(xmlfile)
Dim xmlDoc,rootEl,f
Dim i'Load XML file
set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load(xmlfile)
'Set the rootEl variable equal to the root element
Set rootEl = xmlDoc.documentElement
'Loop through the form collection
for i = 1 To Request.Form.Count 
'Eliminate button elements in the form
if instr(1,Request.Form.Key(i),"btn_")=0 then 
'The selectSingleNode method queries the XML file for a single node'that matches a query. This query requests the value element that is  
'the child of a field element that has an id attribute which matches'the current key value in the Form Collection. When there is a match - 
'set the text property equal to the value of the current field in the'Form Collection.
set f = rootEl.selectSingleNode("field[@id='" & _
Request.Form.Key(i) & "']/value")  
f.Text = Request.Form(i)
end if
next
'Save the modified XML file
xmlDoc.save xmlfile
'Release all object references
set xmlDoc=nothing
set rootEl=nothing
set f=nothing
'Load the modified XML file with a style sheet that'allows the client to see the edited information
loadFile xmlfile,server.MapPath("tool_updated.xsl")
end function
'If the form has been submitted update the'XML file and display result - if not,
'transform the XML file for editing
if Request.Form("btn_sub")="" then 
loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
else
updateFile server.MapPath("tool.xml")
end if
%>

注意：我们正在转换并更新位于服务器上的 XML 文件。这是一个跨平台的解决方案。客户端仅能获得从服务器返回的 HTML – 而 HTML 可运行于任何浏览器。

阿里云 2 核 2G 服务器 3M 带宽 61 元 1 年，有高配

腾讯云新客低至 82 元 / 年，老客户 99 元 / 年

代金券：在阿里云专用满减优惠券

正文完

星哥玩云-微信公众号

发表至： linux教程

2024-07-25

0

转载说明：除特殊说明外本站文章皆由CC-4.0协议发布，转载请注明出处。

如何配置在线Yum源？

Linux系统管理之atq命令解析【每日一个知识点第164期-Linux】

sleep()到底睡多久，你知道吗？

执行前端测试的必要性

Ubuntu 16.04 下安装Firefox的Flash插件

Lua打印乘法表

MySQL DCL语句

老司机告诉你：正规的运维工作是什么的？

Linux 技巧：让进程在后台可靠运行的几种方法

XSLT – 编辑 XML概述

开源堡垒机JumpServer配置教程：使用步骤与配置

申请腾讯混元的API Key并且使用LobeChat调用混元AI

【开源安全保护】如何安装JumpServer堡垒机

Docker部署搭建一个开源强大的图书管理系统

基于Docker快速搭建一个开源的IT人员在线工具箱-it-tools

Ubuntu nginx和安全狗的安装与配置

怎样减少数据中心审计的麻烦

细述使用 Python 获取 Linux 系统信息

干货：MySQL增量备份脚本

如何在Linux下进行SFTP用户权限设置

	<?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 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.html">
	<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>

	<%
	function loadFile(xmlfile,xslfile)
	Dim xmlDoc,xslDoc'Load XML file
	set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
	xmlDoc.async = false
	xmlDoc.load(xmlfile)'Load XSL file
	set xslDoc = Server.CreateObject("Microsoft.XMLDOM")
	xslDoc.async = false
	xslDoc.load(xslfile)'Transform file
	Response.Write(xmlDoc.transformNode(xslDoc))
	end function
	function updateFile(xmlfile)
	Dim xmlDoc,rootEl,f
	Dim i'Load XML file
	set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
	xmlDoc.async = false
	xmlDoc.load(xmlfile)
	'Set the rootEl variable equal to the root element
	Set rootEl = xmlDoc.documentElement
	'Loop through the form collection
	for i = 1 To Request.Form.Count
	'Eliminate button elements in the form
	if instr(1,Request.Form.Key(i),"btn_")=0 then
	'The selectSingleNode method queries the XML file for a single node'that matches a query. This query requests the value element that is
	'the child of a field element that has an id attribute which matches'the current key value in the Form Collection. When there is a match -
	'set the text property equal to the value of the current field in the'Form Collection.
	set f = rootEl.selectSingleNode("field[@id='" & _
	Request.Form.Key(i) & "']/value")
	f.Text = Request.Form(i)
	end if
	next
	'Save the modified XML file
	xmlDoc.save xmlfile
	'Release all object references
	set xmlDoc=nothing
	set rootEl=nothing
	set f=nothing
	'Load the modified XML file with a style sheet that'allows the client to see the edited information
	loadFile xmlfile,server.MapPath("tool_updated.xsl")
	end function
	'If the form has been submitted update the'XML file and display result - if not,
	'transform the XML file for editing
	if Request.Form("btn_sub")="" then
	loadFile server.MapPath("tool.xml"),server.MapPath("tool.xsl")
	else
	updateFile server.MapPath("tool.xml")
	end if
	%>