精品熟女碰碰人人a久久,多姿,欧美欧美a v日韩中文字幕,日本福利片秋霞国产午夜,欧美成人禁片在线观看

 代碼如下:

'//---- cocoon_自定義類(lèi)_翻頁(yè)優(yōu)化代碼 ----//'
class cc_db_pager
    '--------------------------------
    '     cocoon db_pager 類(lèi) (ver: 1.02)
    '     作者: sunrise_chen (sunrise_chen@msn.com)
    '     請(qǐng)保留此信息，謝謝。
    '     
    '     2003/06 修正一個(gè)錯(cuò)誤，描述：如果id不唯一，將產(chǎn)生多條重復(fù)記錄的錯(cuò)誤。
    '                           2003.5
    '--------------------------------

    '//-------------------- 定義變量 --------------------//'
    private stablename        '//表名
    private ssqlstring        '//自定義sql語(yǔ)句
    private acondition()        '//查詢(xún)條件(數(shù)組)
    private scondition        '//查詢(xún)條件(字符串)
    private ipage        '//當(dāng)前頁(yè)碼
    private ipagesize        '//每頁(yè)記錄數(shù)
    private ipagecount        '//總頁(yè)數(shù)
    private ireccount        '//當(dāng)前查詢(xún)條件下的記錄數(shù)
    private itotalreccount    '//總記錄數(shù)
    private sfields        '//輸出的字段名
    private sorderby        '//排序字符串
    private ssql        '//當(dāng)前的查詢(xún)語(yǔ)句
    private spkey        '//主鍵
    private oconn        '//連接對(duì)象
    private idefpagesize        '//默認(rèn)每頁(yè)顯示的記錄數(shù)
    private sprojectname        '/項(xiàng)目名
    private sversion        '/版本號(hào)
    private bshowerror        '//是否顯示錯(cuò)誤信息

    '//-------------------- 事件、方法 --------------------//'
    '//類(lèi)初始化事件
    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 類(lèi)系列 數(shù)據(jù)庫(kù)翻頁(yè)優(yōu)化"
        sversion        = "1.02"
    end sub

    '//類(lèi)結(jié)束事件
    private sub class_terminate()
        set oconn = nothing
    end sub

    '//錯(cuò)誤處理
    public sub doerror(s)
            dim stmp
            stmp = clng(rnd() * 100)
            response.write( "