查詢翻頁優(yōu)化第1/2頁
代碼如下:
'//---- cocoon_自定義類_翻頁優(yōu)化代碼 ----//'
class cc_db_pager
'--------------------------------
' cocoon db_pager 類 (ver: 1.02)
' 作者: sunrise_chen (sunrise_chen@msn.com)
' 請保留此信息,謝謝。
'
' 2003/06 修正一個(gè)錯(cuò)誤,描述:如果id不唯一,將產(chǎn)生多條重復(fù)記錄的錯(cuò)誤。
' 2003.5
'--------------------------------
'//-------------------- 定義變量 --------------------//'
private stablename '//表名
private ssqlstring '//自定義sql語句
private acondition() '//查詢條件(數(shù)組)
private scondition '//查詢條件(字符串)
private ipage '//當(dāng)前頁碼
private ipagesize '//每頁記錄數(shù)
private ipagecount '//總頁數(shù)
private ireccount '//當(dāng)前查詢條件下的記錄數(shù)
private itotalreccount '//總記錄數(shù)
private sfields '//輸出的字段名
private sorderby '//排序字符串
private ssql '//當(dāng)前的查詢語句
private spkey '//主鍵
private oconn '//連接對象
private idefpagesize '//默認(rèn)每頁顯示的記錄數(shù)
private sprojectname '/項(xiàng)目名
private sversion '/版本號
private bshowerror '//是否顯示錯(cuò)誤信息
'//-------------------- 事件、方法 --------------------//'
'//類初始化事件
private sub class_initialize()
redim acondition(-1)
ipage = 1
ireccount = null
itotalreccount = null
ipagecount = null
bshowerror = true
ipagesize = 10
sfields = "*"
spkey = "id"
scondition = ""
sorderby = ""
ssqlstring = ""
sprojectname = "cocoon 類系列 數(shù)據(jù)庫翻頁優(yōu)化"
sversion = "1.02"
end sub
'//類結(jié)束事件
private sub class_terminate()
set oconn = nothing
end sub
'//錯(cuò)誤處理
public sub doerror(s)
dim stmp
stmp = clng(rnd() * 100)
response.write( "
" )
response.write( "" )
response.write( "〖 cc_db_pager 提示信息 〗
" )
response.write( "
response.write( "" )
response.write( "〖 cc_db_pager 提示信息 〗
" )
response.write( "
response.write( "border: 1px solid #cccc00;padding:5;overflow:hidden;text-overflow:ellipsis;'>" )
response.write( "description: " & s & "
" )
response.write( "provider: " & sprojectname )
response.write( " version: " & sversion & "
" )
response.write( "
response.write( "description: " & s & "
" )
response.write( "provider: " & sprojectname )
response.write( " version: " & sversion & "
" )
response.write( "
相關(guān)文章
- ASP怎么談到應(yīng)用到類的?
- 檢測函數(shù) asp class
- 遭遇ASP類的事件設(shè)計(jì)
- ASP高亮類
- Object對象的一些的隱藏函數(shù)介紹
- 淺談ASP中的類
- 在VBScript中使用類
- ASP 類專題
- 代碼與頁面的分離
- ASP代碼的對象化
- 一個(gè)asp快速字符串連接類
- 一個(gè)簡單的asp數(shù)據(jù)庫操作類
- ASP類編寫詳細(xì)說明
- 實(shí)現(xiàn)支持邏輯搜索/單詞搜索/詞組搜索+支持OR/AND關(guān)鍵字的VBS CLASS!
- ASP類Class入門 推薦
- 創(chuàng)建一個(gè)ASP通用分頁類
- 如何編寫一個(gè)ASP類
- 一個(gè)ACCESS數(shù)據(jù)庫訪問的類第1/3頁
- 分頁類,異常類
- ASP 類 Class入門