易心asp分頁類v1.0
複製代碼代碼如下:
<%
classEx_SplitPageCls
'==========================================================================
'易心asp分頁類v1.0
'作者:易心QQ:343931221
'個人網站www.ex123.netwww.bo56.com
'演示地址:www.ex123.net/show/page
'轉載請保留此信息
'==========================================================================
dimEx_Rs
dimEx_columns'要提取的字段
dimEx_datafrom'數據表名
dimEx_strWhere'記錄篩選條件
dimEx_order'sql排序
dimEx_idcount'記錄總數
dimEx_pageSize'每頁條數
dimEx_pageCount'總頁數
dimEx_ids'獲得本頁要用到的id
dimEx_Sql'構造的sql語句
dimEx_page'當前顯示頁碼
dimEx_Conn'數據庫聯接對象
dimEx_index'數據庫記錄當前位置
dimEx_id'主鍵字段
privatesubclass_initialize
setEx_Rs=server.CreateObject("adodb.recordset")
Ex_id="id"
Ex_pageSize=20
endsub
privatesubclass_terminate
Ex_rs.close
setEx_rs=nothing
endsub
'屬性賦值:
publicpropertyletletConn(str)
Ex_conn=str
endproperty
'屬性賦值:sql語句要查詢的字段帶select
publicpropertyletletColumns(str)
Ex_Columns=str
endproperty
'屬性賦值:sql語句篩選條件部分帶where
publicpropertyletletWhere(str)
Ex_strWhere=str
endproperty
'屬性賦值:sql語句數據錶帶from
publicpropertyletletDataFrom(str)
Ex_dataFrom=str
endproperty
'屬性賦值:sql語句排序部分帶orderby
publicpropertyletletOrder(str)
Ex_order=str
endproperty
'屬性賦值:每頁記錄數
publicpropertyletletPageSize(str)
Ex_pageSize=str
endproperty
'屬性賦值:當前頁數
publicpropertyletletPage(str)
Ex_page=str
endproperty
'屬性賦值:主表主鍵字段
publicpropertyletletId(str)
Ex_Id=str