asp的通用數據分頁類
2024-05-04 10:58:11
供稿：網友
(原創)<!--#include file="Conn.asp" -->
通用數據分頁類
通用分頁類,以后寫分頁顯示數據時就輕松多啦.直接調用此類,然后再Execute即可以取得當前頁的所有數據.
此類所做的工作是只取得當前頁的數據,和總頁數和總記錄數等等數據.
ASP代碼:
<%
'/*****************************分頁顯示類**************************
'/* 作者：哇哇魚
'/* 日期：2004年11月18日
'/* 作用：取得某一頁的數據并返回給外部
'/* 說明示例：
'/* Dim MyPage=New PageClass
'/* MyPage.Conn=Conn '設置連接對象
'/* MyPage.PageSize=20 '設置一頁顯示多少條數據 (默認為10條)
'/* MyPage.CurPage=2 '設置當前要顯示的頁碼
'/*''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'/* MyPage.TableName="Member" '設置表名
'/* MyPage.Fields="ID,MemberName,MemberPass" '設置顯示字段列表
'/* MyPage.Condition="ID>100" '設置查詢條件
'/* MyPage.OrderBy="ID DESC" '設置排序條件（一定要設置該屬性)
'/* Set PageRs=MyPage.Execute '返回當前第2頁的數據(RecordSet對象)，如果出錯則返回Nothing值
'/*''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'/*'以上的定義也可以用以下的方法：ExecuteBy("表名","字段列表","查詢條件","排序條件")
'/* Set PageRs=MyPage.ExecuteBy("Member","ID,MemberName,MemberPass","ID>100","ID DESC")
'/*''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'/* PageCount=MyPage.PageCount '返回頁碼總數
'/* RecordCount=MyPage.RecordCount '返回記錄總數
'/* NextPage=MyPage.NextPage '返回下頁的頁碼
'/* PrePage=MyPage.PrePage '返回上一頁的頁碼
'/*****************************************************************
Class PageClass
Private Connection '連接數據庫的外部Connection對象
Private Rs
