超级ASP大分页_我的类容我做主选择自AppleBBS的Blog
关键字超级ASP大分页_我的类容我做主
出处
<%
'===================================================================
'ShowMorePageASP版本
'VersionHuangJM1.00
'Codebymaomao
'CreateDate2004-09-28
'QQ:5144707
'http://blog.csdn.net/maomaoysq
'Writeformylover:HuangJM'本程序可以免费使用、修改，但请保留以上信息
'
'function
'本程序主要是对数据分页的部分进行了封装，而数据显示部份完全由用户自定义，
'支持URL多个参数:http://www.***.com/***.asp?aa=1&page=9&bb=2
'
'
'Paramers:
'PapgeSize定义分页每一页的记录数
'GetCurPageNum返回当前页的记录集数目此属性只读
'GetRS返回经过分页的Recordset此属性只读
'GetConn得到数据库连接
'GetSQL得到查询语句
'InterfaceofClass
'ShowPage显示分页导航条,唯一的公用方法
'
'#############类调用样例#################
'创建对象
'SethjmPage=newShowMorePage
'得到数据库连接
'hjmPage.getconn=conn
'sql语句
'hjmPage.getsql="select*fromshop_bookswherenewsbook=1orderbybookiddesc"
'设置每一页的记录条数据为20条,默认显示10条
'hjmPage.pagesize=20
'显示分页信息,可在任意位置调用，可以调用多次
'hjmPage.showpage()
'setrs=hjmPage.getrs()'返回Recordset
'显示数据开始
'这里就可以自定义显示方式了
'fori=1tohjmPage.GetCurPageNum'当前页的记录数目
'response.writeleft(trim(rs("bookname")),13)&"...."
'rs.movenext
'next
'显示数据结束
'sethjmPage=nothing
'#############类调用样例#################
'===================================================================
ConstBtn_First="<fontface=""webdings"">9</font>"'定义第一页按钮显示样式
ConstBtn_Prev="<fontface=""webdings"">3</font>"'定义前一页按钮显示样式
ConstBtn_Next="<fontface=""webdings"">4</font>"'定义下一页按钮显示样式
ConstBtn_Last="<fontface=""webdings"">:</font>"'定义最后一页按钮显示样式
ConstXD_Align="Center"'定义分页信息对齐方式
ConstXD_Width="100%"'定义分页信息框大小