2栏分页显示(附显示的形式[1][2]),此程序可直接套用

80酷酷网    80kuku.com

  程序|分页|显示显示形式:
         ID1    NAME   | ID2   NAME
         1      JULIET |  2     SPIRIT
         3      BABY   |  4     BOY
  [1] [2] [3] [4]  页数:1/4页   4条/页   总记录数:13条
代码:
<!--page2.asp-->
<!--#include file="conn.asp"-->
<html>
<body bgcolor="#FFFFFF" text="#000000">
<table width="60%" border="1" align="center">
<% '是有两列的分页(1,2,3,4的形式)。数据表:page,字段:id,testname
    dim rs
    dim sql
    msg_per_page    =    4                                                        '定义每页显示记录条数
    set rs    =    server.createobject("adodb.recordset")
    sql = "select * from page order by id"                                      '改成你自己的SQL语句
    rs.cursorlocation    =    3                                                    '使用客户端游标,可以使效率提高
    
    rs.pagesize    =    msg_per_page                                                '定义分页记录集每页显示记录数
    rs.open sql,conn,0,1                                                        

    if err.number<>0 then                                                        '错误处理
        response.write "数据库操作失败:" & err.description
        err.clear
    else
        if not (rs.eof and rs.bof) then                                            '检测记录集是否为空
            totalrec    =    RS.RecordCount                                        'totalrec:总记录条数
            if rs.recordcount mod msg_per_page    =    0 then                        '计算总页数,recordcount:数据的总记录数
                n   

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: