超級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%"'定義分頁信息框大小