[收藏]ASP数据库操作类（下）

  1 2 、查询分页 --- 一般的，不用存储过程
  2
  3 mypage = request.form( " currpage " ) ' 得到需要显示第几页
  4 ' mypage为空则说明此页是第一次加载
  5 if  mypage = ""   then
  6 mypage = 1
  7 end   if
  8 dim  myDb
  9 set  myDb = new  ConDb
 10 with  myDb
 11      .tbName = " comEmploy "         ' 表名
 12      .pKey = " empId "               ' 主键
 13      .pgFields = " empId,empGz "     ' 显示的字段
 14      .pgSize = 20                  ' 每页显示的条数
 15      .conditions = ""              ' 查询的条件
 16      .orderBy = " empId desc "       ' 排序的条件
 17      .currPg = mypage 
 18 end   with
 19 dim  rs
 20 set  rs = myDb.pageRs() 
 21 ' 根据返回的rs写表现代码
 22 myDb.cRs(rs)
 23 ' 在适当的地方放放置分页导航
 24 < % = myDb.pageNav()% >
 25 set  myDb = nothing
 26 3 、查询分页 --- 用存储过程
 27
 28 此处的存储我用的叶子分页类用的存储过程，可在网上查找叶子分页类的相关代码
 29
 30 mypage = request.form( " currpage " ) ' 得到需要显示第几页
 31 ' mypage为空则说明此页是第一次加载
 32 if  mypage = ""   then
 33 ypage = 1
 34 end   if
 35 dim  myDb
 36 set  myDb = new  ConDb
 37 with  myDb
 38      .tbName = " comEmploy "         ' 表名
 39      .pKey = " empId "               ' 主键
 40      .pgSize = 2                   ' 每页显示的条数
 41      .pgFields = " empId,empGz "     ' 显示的字段
 42      .conditions = ""              ' 查询的条件
 43      .orderBy = " empId desc "       ' 排序的条件
 44      .currPg = mypage 
 45 end   with
 46 dim  rs
 47 set  rs = myDb.sqlPage() 
 48 ' 根据返回的rs写表现代码
 49 ' 若查询条件是根据form提交，查询条件可保存在cookie中
 50 myDb.cRs(rs)
 51 ' 在适当的地方放放置分页导航
 52 < % = myDb.pageNav()% >
 53 set  myDb = nothing
 54 4 、若你的分页显示没有什么特别的表现形式，还可以直接输入有分页导航的table
 55
 56 tbTil = Array ( " 作者|200 " , " IP地址|150 " , " 发布时间|150 " , " 具体内容|300 " )
 57 ' 作者是表格的第一个字段的名称
 58 ' 200是此单元格的宽度
 59 mypage = request.QueryString( " currpage " ) ' 得到需要显示第几页
 60 ' mypage为空则说明此页是第一次加载
 61 if  mypage = ""   then
 62 mypage = 1
 63 end   if
 64 dim  myDb: set  myDb = new  dbClass
 65 with  myDb
 66    .tbName = " guestBook "         ' 表名
 67    .pKey = " id "               ' 主键
 68    .pgFields = " mem_Author,mem_PostIP,mem_PostTime,mem_Content "     ' 显示的字段
 69    .pgSize = 3                   ' 每页显示的条数
 70    .conditions = ""              ' 查询的条件
 71    .orderBy = " id desc "       ' 排序的条件 
 72    .currPg = mypage 
 73 end   with
 74 myDb.showTb(tbTil)
 75 set  myDb = nothing
 76 5 、返回总记录数可以用myDb.vRsCount()   返回总页数可以用myDb.vPgCount()
 77
 78 6 、myDb.prnSql()打印sql语句，在出现错误时利用此检查sql语句
 79
 80 下面是用到的样式代码,可作相应修改
 81
 82 程序代码：
 83
 84 table{
 85 border - collapse:collapse;
 86 font - size:12px;
 87 }
 88 td{ 
 89 border:1px solid #FFCC99;
 90 border - collapse:collapse;
 91 height:30px;
 92 text - align:center;
 93 }
 94 #fy{
 95 /* width:545px; */
 96 margin - left :350px;
 97 }
 98 #fy span,#fy a{
 99 display:block;
100 float: left ;
101 height:15px;
102 }
103 #fy #rpc{
104 margin - left :20px;
105 line - height:20px;
106 }
107 #fy a{
108 border:1px solid #CCCCFF;
109 width:15px;
110 text - decoration:none;
111 margin - left :5px;
112 color:# 993300 ;
113 cursor:pointer;
114 }
115 #fy a.aW{
116 width:40px;
117 color:# 000000 ;
118 border:none;
119 line - height:20px;
120 }
121 #fy a:hover{
122 color:#125da7;
123 /* border:1px solid #F8b3d0;
124 background - color:#F8b3d0; */
125 }
126 #fy a#currP{
127 color:#125da7;
128 border:1px solid #FF0000;
129 background - color:#FF0000;
130 /* border:1px solid #F8b3d0;
131 background - color:#fff5fa; */
132 }

转载于:https://www.cnblogs.com/voswin/articles/1282504.html