ASP分页代码

原创 2016年06月02日 12:51:41


  <%'=============分页定义开始,可放在数据库打开前或后
                 dim action
    action=request.QueryString("action")   
    Const MaxPerPage=6   '定义每页显示记录数,可根据实际自定义
       dim totalPut   
       dim CurrentPage
       dim TotalPages
       dim sql
        if Not isempty(request("page")) then
          currentPage=Cint(request("page"))
       else
          currentPage=1
       end if        
'=============分页定义结束%>
  <% '=============打开数据库数据表,要以这种方式打开   
set rs=server.CreateObject("adodb.recordset")  
rs.open "select * from buyok_produc  order by  ProdNum desc",conn,1,1
%>
  <%'=============分页类代码开始,需放在数据库数据表打开后
   
    if err.number<>0 then
    response.write "<p align='center'>数据库中暂时无数据</p>"
    end if    
      if rs.eof And rs.bof then
           Response.Write "<p align='center'>对不起,没有符合条件记录!</p>"
       else
totalPut=rs.recordcount
          if currentpage<1 then
              currentpage=1
          end if

          if (currentpage-1)*MaxPerPage>totalput then
         if (totalPut mod MaxPerPage)=0 then
           currentpage= totalPut \ MaxPerPage
         else
            currentpage= totalPut \ MaxPerPage + 1
         end if
          end if

           if currentPage=1 then
               showContent               
               showpage totalput,MaxPerPage,""&request.ServerVariables("script_name")&""  
           else
              if (currentPage-1)*MaxPerPage<totalPut then
                rs.move  (currentPage-1)*MaxPerPage
               
                showContent
                 showpage totalput,MaxPerPage,""&request.ServerVariables("script_name")&""  
            else
             currentPage=1
                showContent
                
                showpage totalput,MaxPerPage,""&request.ServerVariables("script_name")&""  
                
           end if
        end if
       

版权声明:本文为博主原创文章,未经博主允许不得转载。

【ASP】数据库查询的内容分页显示

对于大数据的查询,你不可以一次性地把所有数据中显示出来, 比如一张学生表上面有一百多号人, 那么在页面中就应该一次显示10人左右, 提供翻页功能给用户进行翻阅,不要一次性显示100多号人。 翻页系统是...
  • yongh701
  • yongh701
  • 2014年11月12日 10:23
  • 3945

GridView万能分页代码

虽然GridView拥有自带分页功能,但很多时候总感觉它太简单了,不贴和实际,所以我们现在来修改一下,让它更使用。 在之间加入如下代码: ">首页 ">前页 ...
  • yangmingxing980
  • yangmingxing980
  • 2014年03月24日 11:45
  • 1223

ASP.NET MVC 简单的分页思想与实现

作为一个程序猿,数据分页是每个人都会遇到的问题。解决方案更是琳琅满目,花样百出。但基本的思想都是差不多的。  下面给大家分享一个简单的分页器,让初学者了解一下最简单的分页思想,以及在ASP.NET M...
  • wybshyy
  • wybshyy
  • 2016年07月29日 14:01
  • 817

Asp.net之真假分页大揭秘、使用AspNetPager实现真分页

最近在web界面的时候,遇到了一些非常现实的问题。最让人头疼的问题就是显示数据中的书画作品。这些书画作品都会以图片的形式展示给用户。 起初做的时候并没有想太多,只按着最简单的方式将所有的图片从数据库中...
  • jiuqiyuliang
  • jiuqiyuliang
  • 2014年01月11日 15:07
  • 17554

【ASP】多张图片分页显示

图片翻页在一些漫画、电子书网站中同样起着中流砥柱的作用 反正网页编写的核心就是一页中不能出现太多内容。...
  • yongh701
  • yongh701
  • 2014年11月12日 15:44
  • 1729

让Asp.NET的DataGrid可排序、可选择、可分页

让Asp.NET的DataGrid可排序、可选择、可分页 DataGrid是Asp.NET中的一个重要的控件,经常我们都将DataGrid做成可分页的和可排序的,有时还需要加上选择功能。这些都是经常...
  • u014440209
  • u014440209
  • 2014年05月09日 20:06
  • 847

Asp 解析 XML并分页显示

Asp 解析 XML并分页显示
  • yimiyuangguang
  • yimiyuangguang
  • 2014年05月14日 01:10
  • 1493

【牛腩】asp分页(有条件查询,涉及多表查询)

asp.net多表有条件分页
  • sds15732622190
  • sds15732622190
  • 2016年05月05日 18:39
  • 841

ASP.NET C#+Ajax+json无刷新分页参考

先html代码 ...
  • bianjing40
  • bianjing40
  • 2015年12月15日 21:51
  • 1397

ASP.NET GridView分页+排序+自定义样式【常规功能比JS插件使用简单】

现在基本都是在用一些前台table框架,做一些分页加排序处理 脑子里面就记得用repeat 处理完table然后调用第三方tablejs插件做分页和排序。 感觉这样能够做到想要的效果。 但是用第...
  • qq873113580
  • qq873113580
  • 2016年05月16日 15:30
  • 1820
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP分页代码
举报原因:
原因补充:

(最多只允许输入30个字)