当前位置: 首页 > 图文教程 > 网络编程 > ASP > 利用XSL和ASP实现XML文档在线编辑

ASP
asp分页(自己整理的2个分页程序)
ASP常用的系统配置函数
雨哲防采集策略之列表篇
雨哲浅谈关于防采集而不影响收录内容篇
asp数据库连接函数
ajax XMLHTTP Post Form时的表单乱码综合解决
ASP注入详细命令40条
用ASP实现MSSQL用户密码破解
ASP创建对象的两种方法比较
ASP字符串转换为整形、双精度型、布尔
ASP计算str2在str1中出现的次数
asp采集抓取网上房产信息的代码
ASP注册登陆实例代码
ASP中使用FileSystemObject时提高性能的方法
分享一个好东东,动态Include文件 (Dynamic File Includes)
解决 JScript 中使用日期类型数据时出现类型错误的问题
在ASP里面创建GUID
在JScript中使用缓存技术的实际代码
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
海阳2006+功能中的潜水王

利用XSL和ASP实现XML文档在线编辑


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 202 ::
收藏到网摘: n/a

 

  本文通过一个详细的例子,来阐述了在线编辑XML文档数据的方法。由于Netscape对XML的支持比较弱,因此,要实现跨平台的数据交换,数据的处理必须在服务器端进行。要编辑XML文档,首先要做的事情就是怎样把这些数据提取并显示给访问者,XSL为我们显示XML文件提供了一个很好的解决方案。下面的例子就是利用XSL样式单把XML文档显示出来,供用户进行编辑,然后再把编辑后的数据提交到服务器,在服务器端进行数据的更新。这里采用ASP(Active Server Pages)来完成我们的任务。

  首先,载入我们要进行编辑的XML文档,利用微软的文档对象模型(Microsoft XMLDOM Object)和XSL,XML文档就可以在服务器端转换成可以在客户端显示的HTML文件内容。下面先看看我们使用的XML和XSL文件是什么样子的。

  XML文件:UserData.xml

<?xml version="1.0" encoding="gb2312"?>
<!-- edited with XMLSPY v2004 rel. 4 U (http://www.xmlspy.com) by Dicky (Apple'S Eden) -->
 <UserInfo>
  <Field ID="Name" TabOrder="1">
   <FieldValue>Dicky</FieldValue>
  </Field>
  <Field ID="Sex" TabOrder="2">
   <FieldValue>Male</FieldValue>
  </Field>
  <Field ID="UnitName" TabOrder="3">
   <FieldValue>ShangHai Ateam Company</FieldValue>
  </Field>
  <Field ID="Address" TabOrder="4">
   <FieldValue>ShangHai,ZhongShan West Road 1800#,Room 26A</FieldValue>
  </Field>
  <Field ID="Tel" TabOrder="5">
   <FieldValue>13800138000</FieldValue>
  </Field>
  <Field ID="EMail" TabOrder="6">
   <FieldValue>[email protected]</FieldValue>
  </Field>
</UserInfo> 

  XSL文件:UserData.xsl

<?xml version="1.0" encoding="gb2312"?>
<!-- edited with XMLSPY v2004 rel. 4 U (http://www.xmlspy.com) by Dicky (Apple'S Eden) -->
<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl">
<xsl:template match="/">
<html>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"/>
<body>
 <form method="post" action="EditUserData.asp">
  <h1>Edit UserInfo:</h1>
  <table border="1" cellpadding="2">
  <xsl:for-each select="UserInfo/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="FieldValue"/></xsl:attribute>
    </input>
   </td>
  </tr>
  </xsl:for-each>
  </table>
  <br/>
  <input type="submit" id="btnSubmit" name="btnSubmit" value="Edit"/>
 </form>
</body>
</html>
</xsl:template>
</xsl:stylesheet> 

  XSL文件使用了XSL:for-each元素的来遍历整个XML文件,XML文件里每个“field”元素的“id”属性和HTML表单的文本输入框的“id”和“name”相对应。这样,HTML表单的文本输入框就显示出了XML文件的元素值。此文件负责XML文档在服务器端的转换,以便能在各种浏览器上显示。

  下面是关键的程序,它实现打开和更新XML文档的功能,并根据表单的提交与否,来决定是否进行更新。它包含了两个函数,loadXMLFile负责载入和转换要显示的XML文件;updateXML函数负责更新XML文件。

  EditUserData.asp程序如下:

<%
 '-----------------------------------------------------------
 '定义函数 LoadXMLFile(),接收二个参数:
 'strXMLFile - XML 文件的路径和文件名字
 'strXSLFilee - XSL 文件的路径和文件名字
 '-----------------------------------------------------------
Function LoadXMLFile(strXMLFile, strXSLFile)
 'Declare local variables
 Dim objXML
 Dim objXSL
 '实例化 XMLDOM 对象,以便载入 XML 文件。
 Set objXML =