至顶网›软件频道 ›把XML的数据转换成多列表格形式

把XML的数据转换成多列表格形式

扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条

　　摘要：本文通过实际的例子来说明如何在XSL中实现对XML数据转换成完美的多列表格。在利用XSL对XML进行转换时，有时候需要把XML转换成多列的Table元素，这个问题经常会困扰许多人，如果不生成Table的话。

作者：中国IT实验室来源：中国IT实验室 2007年10月3日

关键字：

<xsl:call-template name="MyFun">
   <xsl:with-param name="nLefted" select="$nLefted"/>
   <xsl:with-param name="nCols" select="$nCols"/>
   </xsl:call-template>
   <xsl:value-of select="$strTrRight" disable-output-escaping="yes"/>
   </xsl:if>
   </table>
   <p>共有<xsl:value-of select="$nTotal"/>条数据。</p>
   </xsl:template>
   <xsl:template name="MyFun">
   <xsl:param name="nLefted"/>
   <xsl:param name="nCols"/>
   <xsl:if test=" $nLefted != 0 and $nLefted != $nCols">
   <td>
   <xsl:text disable-output-escaping="yes"> </xsl:text>
   </td>
   <xsl:call-template name="MyFun">
   <xsl:with-param name="nLefted" select="$nLefted - 1"/>
   <xsl:with-param name="nCols" select="$nCols"/>
   </xsl:call-template>
   </xsl:if>
   </xsl:template>
  </xsl:stylesheet>
  由于http://www.w3.org/1999/XSL/Transform名称控件只有IE5.5＋才支持，为了使我们的代码具有通用性，我们在服务器端进行转换，首先建立GoodLoop.aspx如下：

  <%@ Page Language="vb" AutoEventWireup="false" Codebehind="GoodLoop.aspx.vb"
   Inherits="aspxWeb.mengxianhui.com.GoodLoop"%>
  <%@ Import NameSpace = "System" %>
  <%@ Import NameSpace = "System.Xml" %>
  <%@ Import NameSpace = "system.Xml.Xsl" %>
  <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
  <HTML>
   <HEAD>
   <title>GoodLoop</title>
   <meta content="Microsoft Visual Studio .NET 7.0" name="GENERATOR">
   <meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
   <meta content="JavaScript" name="vs_defaultClientScript">
   <meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
   <script runat=Server>
   Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs)
   Try
   Dim Xmldom As New XmlDocument()
   Xmldom.Load(Server.MapPath("GoodLoop.xml"))
   Dim trans As XslTransform = New XslTransform()
   trans.Load(Server.MapPath("GoodLoop.xsl"))
   Xml1.Document = Xmldom
   Xml1.Transform = trans
   Catch er As XmlException
   Label1.Text = er.Message
   End Try
   End Sub
   </script>
   </HEAD>
   <body MS_POSITIONING="GridLayout">
   <form id="Form1" method="post" runat="server">
   <asp:label id="Label1" runat="server"></asp:label>
   <asp:Xml id="Xml1" runat="server"></asp:Xml></form>
   </body>
  </HTML>
  本文中所使用的XML数据样式为：GoodLoop.xml

  <?xml version="1.0" encoding="UTF-8"?>
  <?xml-stylesheet type="text/xsl" href="GoodLoop1.xsl"?>
  <Items>
   <Item>
   <Url>http://xml.sz.luohuedu.net</Url>
   <Title>【孟宪会之精彩世界】</Title>
   </Item>
   <Item>
   <Url>http://lucky.myrice.com/</Url>
   <Title>【孟宪会之精彩世界】</Title>
   </Item>
  ...............................
  </Items>
  转换结果如下：

查看本文来源

VIP专区

VIP用户

普通用户

邮件订阅

如果您非常迫切的想了解IT领域最新产品与技术信息，那么订阅至顶网技术邮件将是您的最佳途径之一。

重磅专题

往期文章

业界热点:

数字化转型东数西算自动驾驶智能制造云计算元宇宙虚拟人物联网算力网络数字孪生人工智能区块链开源大数据