科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

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

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

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

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

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

关键字:

  • 评论
  • 分享微博
  • 分享邮件

在本页阅读全文(共2页)

  

   <!--
   如果nLefted不等于0和列数,则需要进行补齐,这里进行递归调用,需要传递的参数有两个:
   nLefted:要补齐的列数;
   nCols:表格的列数。
   -->
   <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">&nbsp;</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>
  转换结果如下:
  
  

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件