设为首页收藏本站
网站公告 | 这是第一条公告
     

 找回密码
 立即注册
缓存时间00 现在时间00 缓存数据 父母亲存在的意义不是给予孩子舒适和富裕的生活,而是,当你想到你的父母时,你的内心会充满力量,会感受到温暖,从而拥有克服困难的勇气和能力,以此获得人生真正的乐趣和自由。晚安!

父母亲存在的意义不是给予孩子舒适和富裕的生活,而是,当你想到你的父母时,你的内心会充满力量,会感受到温暖,从而拥有克服困难的勇气和能力,以此获得人生真正的乐趣和自由。晚安!

查看: 1622|回复: 2

XML创建可排序、分页的数据显示页面

[复制链接]
的语句,如果XML数据里没有序号节点的话,这里显然会出现错误的,为了实现通用性,我们自定义了一个函数getName,来取得所要显示的节点的名称: 
    
   自定义函数是XSLT的一个突出的功能,要使用这个特性,我们得用msxml:script元素来定义,同时,必须在样式单定义的时候指定一个用户定义的名字空间。下面就是我们使用自定义函数的全部内容: 
      xmlns:msxsl="urn:schemas-microsoft-com:xslt" 
   xmlns:user="http://lucky.myrice.com" 
   version="1.0"> 
    
      function getName(node) 
   getName = node.item(0).nodeName 
   end function 
   }> 
    

   在我们的XSLT文件中,使用了两个循环,我们分别进行相应的更改,第一处:显示表头的地方改为,它等同于;第二处循环是显示每行记录,改成。还有其他的地方需要更改的,请参见后面的完整源代码部分。这样我们就完成了通用的XSLT文件,不管你的XML数据有多少字段,也不管节点名称是什么,我们都无需更改XSLT文件,就可以实现我们的功能了。最终的浏览效果将会象下图所示:  

    



    
   以下是完整的Style.xsl文件的内容: 

    
    
    
      Function getName(node) 
   getName = node.Item(0).nodeName 
   End Function 
   }> 
    

    
    
    

    
    
   

 
   第  页 总  页    共有  条记录 
   每页记录数: 
    
    
    
    
    
    
    
    
   
 
   

  离线 

TA的专栏

  • 打卡等级:热心大叔
  • 打卡总天数:226
  • 打卡月天数:0
  • 打卡总奖励:3523
  • 最近打卡:2025-03-13 12:07:03
等级头衔

等級:晓枫资讯-上等兵

在线时间
0 小时

积分成就
威望
0
贡献
429
主题
394
精华
0
金钱
4788
积分
880
注册时间
2023-1-6
最后登录
2025-6-1

发表于 2023-2-16 16:59:34 | 显示全部楼层 |阅读模式
 
   Sort()函数的语句如下所示: 
   Function Sort(strField) 

   Dim sortField 
   Dim sortOrderAttribute 

   '' 得到原来排序字段的属性值 
   Set sortField = Style.XMLDocument.selectSingleNode("//xsl:sort/@select") 

   '' 得到原来排序的顺序属性值 
   Set sortOrderAttribute = Style.XMLDocument.selectSingleNode("//xsl:sort/@order") 

   '' 如果我们已经按所点击的列的字段排序,我们必须改变排序的顺序; 
   '' 否则,我们只需要按新所点击的列字段按默认的顺序进行排序 
   If sortField.Value = strField Or sortField.Value = "./*[0]" Then 
   If sortOrderAttribute.Value = "descending" Then 
   sortOrderAttribute.Value = "ascending" 
   Else 
   sortOrderAttribute.Value = "descending" 
   End If 
   Else 
   sortField.Value = strField 
   sortOrderAttribute.Value = "ascending" 
   End If 

   Set sortField = Nothing 
   Set sortOrderAttribute = Nothing 
   '' 输出排序后的结果 
   DisplayArea.innerHTML = Data.transformNode(Style.DocumentElement) 

   End Function 
   下面,我们实现每页面显示的记录数和设定前页、后页的功能。使用span标记显示目前显示的是第几页、共多少页和记录的总数。我们默认每页显示6条记录,用变量intRecordsPerPage保存该值: 
    
   
 
   第  页 总  页    共有  条记录 
   每页记录数: 
    
    
    
    
    
    
    
    
   
 
   

在Web开发中,我们经常会遇到分页显示和排序数据记录集的情况,这在服务器端使用服务器端的代码和数据库技术是件很轻松的事情,比如:ASP、PHP、JSP等。然而,如果要在客户端显示多条记录并且排序是一件很令人头疼的事情。下面,我们利用Extensible Markup Language(XML,可扩展标记语言)和Extensible Stylesheet Language Transformations(XSLT,可扩展样式单语言转换),并结合XML Path Language(XPath,XML路径语言),只需要编写简单的代码,就可轻松实现。这种方法避免了与服务器频繁打交道的过程,节省了数据显示的时间,浏览者无须等待就可以看到结果,也可以减少服务器的负担。另外。由于XML和XSLT技术,使数据存储和数据显示分离,还可以让我们的代码能够重复利用,大大减轻了程序员编写代码的负担。 
   下面,我们一步一步地来实现我们的功能。 

   首先:创建XSLT 

   XSLT样式单的第一行标明该XML所遵照的XML规范版本,然后是标明该样式单使用的名称空间,这里,我们以XSL规范的正式版本来进行编写,而不采用XSL的草案的写法: 
    
   注意:两者在功能和写法上有很大的差异。 
    
    
   接下来,我们定义XSLT里的模板标记: 

    
    
    

    

   我们把要显示的样式写到模板里面。我们使用HTML的数据岛来存放我们的数据,这些数据可以利用SQL Server 2000的XML查询来得到,对于不支持XML的数据库,我们可以自己编写组件把数据转换成XML格式,然后在放到数据岛里。在HTML里使用数据岛有两种方法: 
   一是直接嵌入数据,如下所示: 
    
   <客户关系表> 
   <客户>每条数据 
    
    
   二是通过SRC属性引用外部文件,如下所示: 
    
   要使用数据岛里的数据,必须通过id名来引用它,当然,由于XSLT文件也是XML格式文件的一种,也可以通过这种方法来实现: 
    
   我们在页面中加入标记DIV来显示我们的转换的结果: 
   

 
   使用XSLT转换数据岛里的数据,采用DOMDocument的transNode()方法,并把结果通过DIV的innerHTML属性来展现出来: 
   DisplayArea.innerHTML = Data.transformNode(Style.DocumentElement) 

   第二步:实现客户端排序的功能 

   我们先设定一个默认的排序字段,这里选择“序号”作为默认的排序关键字,并且是按递增的顺序排列,在XSLT里加入sort标记: 
    
    
    
   接下来,我们为样式表增加排序的功能,以便可以响应用户的操作,我们在表头的每个列上添加onClick事件,该事件调用sort()函数,允许用户通过单击该表头来进行对该列的排序。 
   序号
 
   下面以“下一页”按钮执行的操作为例子,说明转换不同页面的处理过程。该函数根据参数intPage来决定要显示的记录的条数和相应的页面,每个按钮Value值的变化是通过动态改变XSL DOM的内容来实现的: 
   Function nextPage(intPage) 

   Dim strDisplay 
   Dim strDateRange 

   If CInt(CStr(intPage) * intRecordsPerPage) < _ 
   Data.selectNodes("/客户关系表/客户").length Then 
   intPage = CInt(intPage) + 1 

   Style.XMLDocument.selectNodes("//@OnClick") _ 
   (1).Value = "previousPage(" & intPage & ")" 

   Style.XMLDocument.selectNodes("//@OnClick") _ 
   (2).Value = "nextPage(" & intPage & ")" 

   Style.XMLDocument.selectNodes _ 
   ("//xsl:for-each/@select")(1).Value = _ 
   "./客户[position() <= " & (CStr(intPage) _ 
   * intRecordsPerPage) & " and position() > " _ 
   & (CInt(intPage) - 1) * intRecordsPerPage & _ 
   "]" 

   redisplay (intPage) 

   End If 

   End Function 
   下面,我们来看看设置每个页面记录条数的函数setRecordsPerPage(),该函数通过动态修改xsl:for-each的select属性值来实现的,使用XPath来遍历那些符合节点位置大于0并且节点位置小于每页记录数加1的那些节点。其中主要的语句是下面的一行: 
   Style.XMLDocument.selectNodes("//xsl:for-each/@select")(1). _ 
   value = "./客户[position() < " & intRecordsPerPage + 1 & " and "& " position() > 0]" 
   到目前为止,我们的页面既可以实现排序,也实现动态改变每页显示记录条数的功能了,为了实现可重用的要求,我们还可以进行进一步的改进。XPath是进行XML/XSLT应用开发的一个强有力的工具,XPath中可以使用通配符,使XSLT样式单文件完全不依赖于你的数据节点名称。因此,我们在改变XML数据的时候,只要不改变节点的层次关系,可以不必改动XSLT就可以直接使用。比如:在本例中,你可以添加或者删除某些字段、或添加删除一些记录,直接使用本例中的XSLT,不但可以在表格里正常显示出数据,而且还能正常排序和分页。 
   下面我们就分析一下是如何实现的。比如下面的层次关系: 
   <客户关系表> 
   <客户> 
   <序号> 
   <姓名> 
   <电子邮件> 
    
    
   假如我们的XSLT中有这样一个选择模板的句子: 
    
   为了实现通用性的要求,我们可以使用通配符: 
    
   这里我们使用了子运算符"/",它选择了根下的所有节点,两者的不同点在于:"/客户关系表"选择的是根下的客户关系表子节点,而"/*"选择的是根下所有的直接子节点,在上面的XML数据格式中,二者是完全等价的。 
   对于下面的for-each循环来说: 
    
    
    
   我们可以改变成这样的形式: 
    
    
    
   这里"./*"表示你应当包含进去当前节点下所有的一级子节点,语法"./*[1]"表示的是选择当前节点中的第一个子节点。 
   另外还有一个地方可以改进的是,我们可以把它改成,表示在每一次循环中选择当前节点。 
   在我们的函数中,还使用了一些硬代码,如果不做改动的话,我们的通用性还是实现不了,因此,我们下面就看看如何替换硬代码中的语句。 
   在创建表头的时候,我们使用了 序号
 
    
   Sort('''') 
    
    
   
 
    
    
    
    
    
   Sort('''') 
    
    
    
    
    
    0]"> 
    
    
    
     
    
    
    
    
    
    
   以下是进行输出的Exam.htm文件: 
    
    
    
    
    
    
    
   客户关系表

 
    
   <客户关系表 xmlns:dt="urn:schemas-microsoft-com:datatypes"> 
   <客户><序号 dt:dt="int">01<姓名>Mi<电子邮件>water@21cn.com 
   <客户><序号 dt:dt="int">02<姓名>uyi<电子邮件>Lily@sina.com 
   <客户><序号 dt:dt="int">03<姓名>uiyu<电子邮件>John@21cn.com 
   <客户><序号 dt:dt="int">04<姓名>Doug<电子邮件>Karry@163.net 
   <客户><序号 dt:dt="int">05<姓名>Ellen<电子邮件>vivki@sina.com 
   <客户><序号 dt:dt="int">06<姓名>Frank<电子邮件>net_lover@mengxianhui.com.cn 
   <客户><序号 dt:dt="int">07<姓名>Greg<电子邮件>meng@mengxianhui.com 
   <客户><序号 dt:dt="int">08<姓名>Harry<电子邮件>sunny@xianhui.net 
   <客户><序号 dt:dt="int">09<姓名>Ingrid<电子邮件>cathy@hotmail.com 
   <客户><序号 dt:dt="int">10<姓名>Jeff<电子邮件>your@mxh.com 
   <客户><序号 dt:dt="int">11<姓名>Kelly<电子邮件>Iloveyou@mengxianhui.com 
   <客户><序号 dt:dt="int">12<姓名>Larry<电子邮件>smilling@mengxianhui.com 
   <客户><序号 dt:dt="int">13<姓名>Mark<电子邮件>money@21cn.com 
   <客户><序号 dt:dt="int">14<姓名>Nancy<电子邮件>www@yahoo.com 
   <客户><序号 dt:dt="int">15<姓名>Peter<电子邮件>dotnet@aol.com 
   <客户><序号 dt:dt="int">16<姓名>Rachel<电子邮件>billgates@microsoft.com 
   <客户><序号 dt:dt="int">17<姓名>Seth<电子邮件>flying@yous.net 
   <客户><序号 dt:dt="int">18<姓名>Tim<电子邮件>agooyboy@lovegirl.com 
    
    
    
   
 
    
    
   资料来源:【孟宪会之精彩世界】 
    
    
    
    

   把上面的内容拷贝到本地计算机上,分别保存为相应的文件,在IE5+和XML3.0+的环境下即可看到效果!


免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作!
晓枫资讯-科技资讯社区-免责声明
免责声明:以上内容为本网站转自其它媒体,相关信息仅为传递更多信息之目的,不代表本网观点,亦不代表本网站赞同其观点或证实其内容的真实性。
      1、注册用户在本社区发表、转载的任何作品仅代表其个人观点,不代表本社区认同其观点。
      2、管理员及版主有权在不事先通知或不经作者准许的情况下删除其在本社区所发表的文章。
      3、本社区的文章部分内容可能来源于网络,仅供大家学习与参考,如有侵权,举报反馈:点击这里给我发消息进行删除处理。
      4、本社区一切资源不代表本站立场,并不代表本站赞同其观点和对其真实性负责。
      5、以上声明内容的最终解释权归《晓枫资讯-科技资讯社区》所有。
http://bbs.yzwlo.com 晓枫资讯--游戏IT新闻资讯~~~
回复

举报 送花

  离线 

TA的专栏

等级头衔

等級:晓枫资讯-列兵

在线时间
0 小时

积分成就
威望
0
贡献
0
主题
0
精华
0
金钱
19
积分
18
注册时间
2022-12-29
最后登录
2022-12-29

发表于 2024-9-22 03:53:08 | 显示全部楼层
感谢楼主分享。
http://bbs.yzwlo.com 晓枫资讯--游戏IT新闻资讯~~~

  离线 

TA的专栏

  • 打卡等级:无名新人
  • 打卡总天数:1
  • 打卡月天数:0
  • 打卡总奖励:5
  • 最近打卡:2024-01-11 15:15:13
等级头衔

等級:晓枫资讯-列兵

在线时间
0 小时

积分成就
威望
0
贡献
0
主题
0
精华
0
金钱
18
积分
6
注册时间
2023-11-25
最后登录
2024-1-11

发表于 2024-10-9 23:46:04 | 显示全部楼层
路过,支持一下
http://bbs.yzwlo.com 晓枫资讯--游戏IT新闻资讯~~~
返回列表 发新帖
严禁发布广告,淫秽、色情、赌博、暴力、凶杀、恐怖、间谍及其他违反国家法律法规的内容。!晓枫资讯-社区
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

1楼
2楼
3楼

手机版|晓枫资讯--科技资讯社区 本站已运行

CopyRight © 2022-2025 晓枫资讯--科技资讯社区 ( BBS.yzwlo.com ) . All Rights Reserved .

晓枫资讯--科技资讯社区

本站内容由用户自主分享和转载自互联网,转载目的在于传递更多信息,并不代表本网赞同其观点和对其真实性负责。

如有侵权、违反国家法律政策行为,请联系我们,我们会第一时间及时清除和处理! 举报反馈邮箱:点击这里给我发消息

Powered by Discuz! X3.5

快速回复 返回顶部 返回列表