主頁 > 知識庫 > 以前寫的一個(gè)分頁存儲(chǔ)過程,剛才不小心翻出來的

以前寫的一個(gè)分頁存儲(chǔ)過程,剛才不小心翻出來的

熱門標(biāo)簽:土地證宗地圖標(biāo)注符號 vue 地圖標(biāo)注拖拽 自動(dòng)外呼系統(tǒng)怎么防止封卡 客服外呼系統(tǒng)呼叫中心 成都銷售外呼系統(tǒng)公司 電話機(jī)器人案例 保定電銷機(jī)器人軟件 鎮(zhèn)江云外呼系統(tǒng)怎么樣 電話機(jī)器人銷售公司嗎
CREATE PROCEDURE GoalerPageSp
@IntPageSize int,
@IntCurrPage int,
@strFields nvarchar(2000),
@strTable varchar(200),
@strWhere varchar(800),
@strOrderType varchar(200),
@strKeyField varchar(50)
AS
SET NOCOUNT ON
DECLARE @tmpSQL nvarchar(4000)--存放動(dòng)態(tài)SQL語句
DECLARE @tmpWhere varchar(800)
DECLARE @tmpAndWhere varchar(800)--用于第N(>1)頁上邊的查詢條件
DECLARE @tmpOrder varchar(200)
DECLARE @tmpD_X varchar(2)
DECLARE @tmpMin_MAX varchar(3)

--設(shè)置條件--
IF @strWhere IS NULL OR RTRIM(@strWhere)=''
    BEGIN --沒有查詢條件
        SET @tmpWhere=''
        SET @tmpAndWhere=''
    END 
ELSE 
    BEGIN --有查詢條件
        SET @tmpWhere=' WHERE '+@strWhere
        SET @tmpAndWhere=' AND '+@strWhere
    END 

--設(shè)置排序--
IF @strOrderType != 0
    BEGIN--倒序 
        SET @tmpD_X = ''
        SET @tmpMin_MAX = 'MIN'
        SET @tmpOrder=' ORDER BY ' +@strKeyField+ ' DESC'
    END 
ELSE 
    BEGIN 
        SET @tmpD_X = '>'
        SET @tmpMin_MAX = 'MAX'
        SET @tmpOrder=' ORDER BY ' +@strKeyField+ ' ASC'
    END 
--SQL查詢--
IF @IntCurrPage=1
    Set @tmpSQL='SELECT TOP '+CAST(@IntPageSize AS VARCHAR)+' '+@strFields+' FROM '+@strTable+' '+@tmpWhere+' '+@tmpOrder
ELSE
    SET @tmpSQL='SELECT TOP '+CAST(@IntPageSize AS VARCHAR)+' '+@strFields+' FROM '+@strTable+' WHERE ('+@strKeyField+' '+@tmpD_X+' (SELECT '+@tmpMin_MAX+'('+@strKeyField+') FROM (SELECT TOP '+CAST(@IntPageSize*(@IntCurrPage-1) AS VARCHAR)+' '+@strKeyField+' FROM '+@strTable+' '+@tmpWhere+' '+@tmpOrder+') AS T))'+@tmpAndWhere+' '+@tmpOrder
EXEC(@tmpSQL)
GO


調(diào)用方法:
IntPageSize=20
strTable=" [TableName] "    '數(shù)據(jù)表名稱
strFields=" Field1,Field2,Field3,Field4 "    '需要讀取的列名
strKeyField="Field1"    '主鍵:這里假設(shè)Field1為主鍵
strWhere=""    '條件:FieldA='b'
strOrderType=1    '排序方式:1為倒序,0為順序

CurrPage=Request.QueryString("Page")
IF(CurrPage>"" And Isnumeric(CurrPage))THEN
    CurrPage=CLNG(CurrPage)   
    IF(CurrPage1)THEN CurrPage=1                   
ELSE
    CurrPage=1
END IF

IF strWhere>"" THEN
    tmpWhere=" WHERE "strWhere
ELSE 
    tmpWhere=""
END IF

IF(SESSION("RecCount")>"")THEN
    IF(SESSION("strWhere")>strWhere)THEN
        RecCount=Conn.Execute("SELECT COUNT("strKeyField") FROM "strTabletmpWhere)(0)
        SESSION("RecCount")=RecCount
        SESSION("strWhere")=strWhere
    ELSE
        RecCount=SESSION("RecCount")
    END IF
ELSE
    RecCount=Conn.Execute("SELECT COUNT(*) FROM "strTabletmpWhere)(0)
    SESSION("RecCount")=RecCount
    SESSION("strWhere")=strWhere
END IF

IF(RecCount MOD IntPageSize >0)THEN
    IntPageCount=INT(RecCount/IntPageSize)+1
ELSE
    IntPageCount=RecCount/IntPageSize
END IF

SET Cmd=Server.CreateObject("Adodb.Command") 
Cmd.CommandType=4 
SET Cmd.ActiveConnection=Conn 
Cmd.CommandText="GoalerPageSp" 
Cmd.Parameters.Append Cmd.CreateParameter("@IntPageSize",4,1,4,IntPageSize)
Cmd.Parameters.Append Cmd.CreateParameter("@IntCurrPage",4,1,4,CurrPage)
Cmd.Parameters.Append Cmd.CreateParameter("@strFields",200,1,2000,strFields)
Cmd.Parameters.Append Cmd.CreateParameter("@strTable",200,1,200,strTable)
Cmd.Parameters.Append Cmd.CreateParameter("@strWhere",200,1,800,strWhere)
Cmd.Parameters.Append Cmd.CreateParameter("@strOrderType",4,1,4,strOrderType)
Cmd.Parameters.Append Cmd.CreateParameter("@strKeyField",200,1,50,strKeyField)
SET RS=Cmd.Execute()
IF RecCount1 THEN
    Response.Write("沒有記錄")
ELSE
    GetRecord=RS.GetRows(IntPageSize)
    For i=0 To Ubound(GetRecord,2)
        Response.Write(GetRecord(0,i),GetRecord(1,i),GetRecord(2,i))    '...輸出內(nèi)容
    NEXT
    GetRecord=Null
END IF
SET RS=NOTHING


有用的朋友請自己慢慢調(diào)試吧,總記錄是用ASP來取的,存儲(chǔ)在SESSION里邊,如果每次都統(tǒng)計(jì)一次總記錄,將會(huì)非常費(fèi)時(shí),當(dāng)然,如果你想在存儲(chǔ)過程里來取總記錄和總頁數(shù)然后返回也是可以的,下邊是代碼:
--獲取記錄總數(shù)--
SET @tmpSQL='SELECT @getRecordCounts=COUNT('+@strKeyField+') FROM '+@strTable+@tmpWhere
EXEC sp_executesql @tmpSQL,N'@getRecordCounts int output',@getRecordCounts OUTPUT

--獲取總頁數(shù)--
SET @tempFolatNumber=@getRecordCounts%@IntPageSize
IF @getRecordCounts=@IntPageSize
    SET @getPageCounts=1
ELSE
BEGIN
    IF @tempFolatNumber != 0
        SET @getPageCounts=(@getRecordCounts/@IntPageSize)+1
    ELSE
        SET @getPageCounts=(@getRecordCounts/@IntPageSize)
END


別忘了返回定義參數(shù):
@getRecordCounts int output,--返回總記錄
@getPageCounts int output--返回總頁數(shù)

標(biāo)簽:麗江 成都 重慶 天津 公主嶺 懷化 內(nèi)江 臺(tái)灣

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《以前寫的一個(gè)分頁存儲(chǔ)過程,剛才不小心翻出來的》,本文關(guān)鍵詞  以前,寫的,一個(gè),分頁,存儲(chǔ),;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《以前寫的一個(gè)分頁存儲(chǔ)過程,剛才不小心翻出來的》相關(guān)的同類信息!
  • 本頁收集關(guān)于以前寫的一個(gè)分頁存儲(chǔ)過程,剛才不小心翻出來的的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章