加载中...
查看文章
  • 仅用XSL和ASP实现分页功能(代码)
  • 作者：小乙 来源：chinaasp 添加时间：2002年12月18日 字体:大 中 小
  • 83442－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

    N2dM6Xq注意事项：

    N2dM6Xq※本文代码可能有一些多余部分未去掉，请在阅读时忽略。

    N2dM6Xq　一些外部include进来的文件这里就不贴上来了。

    N2dM6Xq※小乙写xsl也不久，很多语句都不会使用，有些地方写得比较罗嗦，

    N2dM6Xq　如果您有更好的分页代码，请多多拿来交流。

    N2dM6Xq※适用于：用asp load进来xml代码，

    N2dM6Xq然后用此xsl文件进行分页处理。

    N2dM6Xq※[2001.2.19]

    N2dM6Xq－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

    N2dM6Xqasp文件大致结构：

    N2dM6Xq<%@ Language=VBScript %>

    N2dM6Xq<!-- #include file=include/lib.asp -->

    N2dM6Xq<%  

    N2dM6Xqcc=server.MapPath("trans.xml")

    N2dM6Xqset source=server.CreateObject("msxml2.domdocument")

    N2dM6Xqsource.async=false

    N2dM6Xqsource.load(cc)

    N2dM6Xq

    N2dM6Xqxslfile=server.MapPath("index.xsl")

    N2dM6Xqset style=server.CreateObject("msxml2.domdocument")

    N2dM6Xqstyle.async=false

    N2dM6Xqstyle.load(xslfile)

    N2dM6Xq

    N2dM6Xq'Response.write source.transformNode(style)

    N2dM6XqResponse.write gb_html(source.transformNode(style))

    N2dM6XqResponse.End  

    N2dM6Xq%>

    N2dM6Xq－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－load进来的xml数据是这样的：

    N2dM6Xq<?xml version="1.0" encoding="GB2312" ?>  

    N2dM6Xq<root>

    N2dM6Xq<function>

    N2dM6Xq<PO>里面的标签在后面的xsl文件里被"<xsl:for-each>"</PO>

    N2dM6Xq<PO>……………………</PO>

    N2dM6Xq<PO>……………………</PO>

    N2dM6Xq<PO>……………………</PO>

    N2dM6Xq</function>

    N2dM6Xq</root>

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

    N2dM6Xqxsl文件的内容：

    N2dM6Xq

    N2dM6Xq<?xml version="1.0" encoding="GB2312"?>

    N2dM6Xq<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform";>

    N2dM6Xq<xsl:include href="include/ydzhongxin.xsl"/><!--　嵌入头模板，尾模板　-->

    N2dM6Xq<xsl:param name="yd">7</xsl:param><!--　调用二级导航条所用参数 -->

    N2dM6Xq<xsl:param name="page">　　<xsl:＆#118alue-of select="count(//PO)"/></xsl:param>

    N2dM6Xq

    N2dM6Xq<!-- 定义根模板　-->

    N2dM6Xq<xsl:template match="/">

    N2dM6Xq<html>

    N2dM6Xq<head>

    N2dM6Xq<meta http-equiv="Content-Type" content="text/html; charset=gb2312"/>

    N2dM6Xq<link rel="stylesheet" type="text/css" href="include/style.css"/>

    N2dM6Xq<title>结果列表</title>

    N2dM6Xq</head>

    N2dM6Xq<body leftMargin="0" topMargin="0">

    N2dM6Xq<xsl:call-template name="ydtitle"/>

    N2dM6Xq

    N2dM6Xq　　　　<div align="center">

    N2dM6Xq　　　　<xsl:apply-templates select="root/function"/>

    N2dM6Xq　　　　<!--　匹配function模板　-->

    N2dM6Xq　　　　</div>

    N2dM6Xq

    N2dM6Xq<xsl:call-template name="end"/>

    N2dM6Xq</body>

    N2dM6Xq</html>

    N2dM6Xq</xsl:template>

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq<!--　定义function模板　-->

    N2dM6Xq<xsl:template match="function">

    N2dM6Xq<!-- －－－－－－－－－－－－－－－翻页链接开始－－－－－－－－－－－ -->

    N2dM6Xq<xsl:variable name="pagesize">5</xsl:variable><!--　是分页参数 -->

    N2dM6Xq

    N2dM6Xq<xsl:choose>

    N2dM6Xq<xsl:when test="/root/session/page[text()!='']">

    N2dM6Xq<!-- 进入一级choose的一个when条件分支！！！！！

    N2dM6Xq－－－－－－－－－－－－－进入此分支，证明用户已有翻页操作－－－－－－－－－－－－－－ -->

    N2dM6Xq<xsl:variable name="page"><xsl:＆#118alue-of select="/root/session/page"/></xsl:variable>

    N2dM6Xq<table border="0" cellpadding="2" cellspacing="0" width="630">

    N2dM6Xq　　<tr>

    N2dM6Xq　　　　<td align="right">

    N2dM6Xq　　　　<!-- 进入二级choose！！！ -->

    N2dM6Xq　　　　<xsl:choose>

    N2dM6Xq　　　　<!-- ①id小于等于0的情况，显示最后一页。-->

    N2dM6Xq　　　　<xsl:when test="$pid<1">

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)"/></xsl:attribute>

    N2dM6Xq[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size*2"/></xsl:attribute>[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页">[ >>> ] </a>

    N2dM6Xq　　　　<a>[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:when>

    N2dM6Xq　　　　<!-- ②id位于[0～pagesize]之间的情况，前页正常，后页无。 -->

    N2dM6Xq　　　　<xsl:when test="$pid<($size + 1) and $pid>0">

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)"/></xsl:attribute>

    N2dM6Xq[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$pid+$size"/></xsl:attribute>[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页">[ >>> ] </a>

    N2dM6Xq　　　　<a>[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:when>

    N2dM6Xq　　　　<!-- ③id位于[pagesize～count]之间的情况，前页无，后页正常。 -->

    N2dM6Xq　　　　<xsl:when test="$pid<count(//PO) and $pid>(count(//PO)-$size)">

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)"/></xsl:attribute>

    N2dM6Xq[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)"/></xsl:attribute>[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$pid - $size"/></xsl:attribute>[ >>> ] </a>

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size"/></xsl:attribute>

    N2dM6Xq[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:when>

    N2dM6Xq

    N2dM6Xq　　　　<!-- ④id等于count的情况，显示首页。 -->

    N2dM6Xq　　　　<xsl:when test="$pid=count(//PO)">

    N2dM6Xq　　　　<a>[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页">[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)-$size"/></xsl:attribute>[ >>> ] </a>

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size"/></xsl:attribute>

    N2dM6Xq[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:when>

    N2dM6Xq　　　　<!-- ⑤id大于count的情况，显示首页。 -->

    N2dM6Xq　　　　<xsl:when test="$pid>count(//PO)">

    N2dM6Xq　　　　<a>[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页">[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)-$size"/></xsl:attribute>[ >>> ] </a>

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size"/></xsl:attribute>

    N2dM6Xq[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:when>

    N2dM6Xq

    N2dM6Xq　　　　<!-- 正常情况 -->

    N2dM6Xq　　　　<xsl:otherwise>

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="count(//PO)"/></xsl:attribute>

    N2dM6Xq[ 首 ]</a>

    N2dM6Xq　　　　<a title="前一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$pid + $size"/></xsl:attribute>[ <<< ] </a>

    N2dM6Xq　　　　<a title="后一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$pid - $size"/></xsl:attribute>[ >>> ] </a>

    N2dM6Xq　　　　<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size"/></xsl:attribute>

    N2dM6Xq[ 尾 ]</a>

    N2dM6Xq　　　　</xsl:otherwise>

    N2dM6Xq　　　　</xsl:choose>

    N2dM6Xq　　　　<!-- －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ -->

    N2dM6Xq　　　　　　　　　　</td>

    N2dM6Xq　　　　　　　　　　</tr>

    N2dM6Xq　　　　　　　　</table><br/>

    N2dM6Xq　　　　　　<!-- －－－－－－－－－遍历符合要求的PO结点－－－－－－－－－－－－－ -->

    N2dM6Xq　　　　　　<xsl:for-each select="PO[position()<=$pid and position()>($pid - $size)]">

    N2dM6Xq　　　　　　　　<xsl:sort select="PO_ID" order="descending" data-type="number"/>

    N2dM6Xq　　　　　　　　<xsl:call-template name="PO"/>

    N2dM6Xq　　　　　　　　<br/><br/><br/>

    N2dM6Xq　　　　　　</xsl:for-each>

    N2dM6Xq<!-- 退出一级choose的一个when条件分支！！！！！ -->

    N2dM6Xq</xsl:when>

    N2dM6Xq<!-- －－－－－－－－－－－－－－－－－－用户直接进入的状态－－－－－－－－－－－－－－－－－－ -->

    N2dM6Xq<xsl:otherwise>

    N2dM6Xq<!-- 进入一级choose的另一个when条件分支！！！！！ -->

    N2dM6Xq<table border="0" cellpadding="2" cellspacing="0" width="630">

    N2dM6Xq<tr><td align="right">

    N2dM6Xq<a>[ 首 ]</a>

    N2dM6Xq<a title="前一页">[ <<< ] </a>

    N2dM6Xq<a title="后一页"><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$pid - $size"/></xsl:attribute>[ >>> ] </a>

    N2dM6Xq<a><xsl:attribute name="href">search_jieguo.asp?id=<xsl:＆#118alue-of select="$size"/></xsl:attribute>

    N2dM6Xq[ 尾 ]</a>

    N2dM6Xq</td></tr>

    N2dM6Xq</table><br/>

    N2dM6Xq　　　　　　<xsl:for-each select="PO[position()<=$pid and position()>($pid - $size)]">

    N2dM6Xq　　　　　　　　<xsl:sort select="PO_ID" order="descending" data-type="number"/>

    N2dM6Xq　　　　　　　　<xsl:call-template name="PO"/>

    N2dM6Xq　　　　　　　　<br/><br/><br/>

    N2dM6Xq　　　　　　</xsl:for-each>

    N2dM6Xq<!-- 退出一级choose的另一个when条件分支！！！！！ -->

    N2dM6Xq</xsl:otherwise>

    N2dM6Xq</xsl:choose>

    N2dM6Xq　　　　<!-- －－－－－－－－－－－－－－翻页链接到此结束－－－－－－－－－－－ -->

    N2dM6Xq　　　　<br/>

    N2dM6Xq　　　　<xsl:if test="count(//PO)=0">

    N2dM6Xq

    N2dM6Xq　　<div align="center"><b>

    N2dM6Xq　　　<img src="images/msg2.gif" align="absmiddle"/>

    N2dM6Xq　　　</b><font color="#CC0000" face="楷体ＣＳ" size="3"><b>

    N2dM6Xq　　　没有符合当前条件的订单</b></font>  

    N2dM6Xq　　　<a><xsl:attribute name="href">lkxx.asp?po_id=<xsl:＆#118alue-of select="PO_ID"/></xsl:attribute></a>

    N2dM6Xq　　</div>

    N2dM6Xq><br/><br/>

    N2dM6Xq<input type="button" ＆#118alue="重新输入条件查询" ＆#111nclick="location.href='search.asp'"/>

    N2dM6Xq　　　　</xsl:if>

    N2dM6Xq　　</xsl:template>

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq

    N2dM6Xq<!-- －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－-->

    N2dM6Xq<xsl:template name="PO">

    N2dM6Xq　<table border="1" cellpadding="2" cellspacing="0" width="100%">

    N2dM6Xq　　<tr>  

    N2dM6Xq　　　<td nowrap="nowrap" width="70"> 号码</td>

    N2dM6Xq　　　<td nowrap="nowrap" width="110"> 名称</td>

    N2dM6Xq　　　<td nowrap="nowrap" width="110"> 日期</td>

    N2dM6Xq　　　<td nowrap="nowrap" width="110"> 人员</td>

    N2dM6Xq　　</tr>

    N2dM6Xq　　<tr>

    N2dM6Xq<td nowrap="nowrap"> <xsl:＆#118alue-of select="num"/></td>

    N2dM6Xq<td nowrap="nowrap"> <xsl:＆#118alue-of select="username"/></td>

    N2dM6Xq<td nowrap="nowrap"> <xsl:＆#118alue-of select="dt"/></td>

    N2dM6Xq<td nowrap="nowrap"> <xsl:＆#118alue-of select="men"/></td>

    N2dM6Xq　　</tr>

    N2dM6Xq　</table>

    N2dM6Xq</xsl:template>

    N2dM6Xq</xsl:stylesheet>83439
  • 返回页面顶端
  • 上一篇：利用ASP在线维护数据库
  • 下一篇：ASP如何获取真实IP地址
  • 返回上一页 打印本文 加入收藏
  • 页面最后更新时间：2011年5月18日