以前用程序寫了很多效率不錯分頁方法，但很麻煩也都不通用。最近抽空編寫了用SQL SEVER後臺存儲過程實現分頁通用的方法，此過程提供3種分頁技術方法，可以根據具體情況採用不同的方法。
--exec get_page 'T_Table,'*','xh',100,6,0,0,' ',' lb like ''1%'''
CREATE PROCEDURE get_page
@tblName varchar(255), -- 表名
@strGetFields varchar(1000) = '*', -- 需要返回的列
@fldName varchar(255)='', -- 排序的字段名
@PageSize int = 10, -- 頁尺寸
@PageIndex int = 1, -- 頁碼
@doCount bit = 0, -- 返回記錄總數, 非 0 值則返回
@OrderType bit = 0, -- 設置排序類型, 非 0 值則降序
@OtherOrder varchar(200), --其它排序字段
@strWhere varchar(1500) = '', -- 查詢條件 (注意: 不要加 where)
@Type varchar(1)='1' --分頁使用方法
AS
SET NOCOUNT ON
declare @strSQL varchar(5000) -- 主語句
declare @strTmp varchar(110) -- 臨時變量
declare @strOrder varchar(400) -- 排序類型
if @doCount != 0
begin
if @strWhere !=''
set @strSQL = 'select count(*) as Total from ' + @tblName + ' where '+@strWhere
else
set @strSQL = 'select count(*) as Total from ' + @tblName + ''
end
--以上代碼的意思是如果@doCount傳遞過來的不是0，就執行總數統計。以下的所有代碼都是@doCount爲0的情況
else
begin
if @OrderType != 0
begin
set @strTmp = '<(select min'
if @OtherOrder!=''
set @strOrder = ' order by ' + @fldName +' desc,'+@OtherOrder+' '
else
set @strOrder = ' order by ' + @fldName +' desc'
--如果@OrderType不是0，就執行降序，這句很重要！
end
else
begin
set @strTmp = '>(select max'
if @OtherOrder!=''
set @strOrder = ' order by ' + @fldName +' asc,'+@OtherOrder+' '
else
set @strOrder = ' order by ' + @fldName +' asc'
end
if @PageIndex = 1
begin
if @strWhere != ''
set @strSQL = 'select top ' + str(@PageSize) +' '+@strGetFields+ ' from ' + @tblName + ' where ' + @strWhere + ' ' +
@strOrder
else
set @strSQL = 'select top ' + str(@PageSize) +' '+@strGetFields+ ' from '+ @tblName + ' '+ @strOrder
--如果是第一頁就執行以上代碼，這樣會加快執行速度
end
else
begin
--以下代碼賦予了@strSQL以真正執行的SQL代碼
IF @Type='1'
BEGIN--方法1，採用嵌套SELECT語句與TOP方法，在數據量不大的情況效果最好。
set @strSQL = 'select top ' + str(@PageSize) +' '+@strGetFields+ ' from '
+ @tblName + ' where ' + @fldName + '' + @strTmp + '('+ @fldName + ') from (select top ' + str
((@PageIndex-1)*@PageSize) + ' '+ @fldName + ' from ' + @tblName + @strOrder + ') as tblTmp)'+ @strOrder
if @strWhere != ''
set @strSQL = 'select top ' + str(@PageSize) +' '+@strGetFields+ ' from '
+ @tblName + ' where ' + @fldName + @strTmp + '('
+ @fldName + ') from (select top ' + str((@PageIndex-1)*@PageSize) + ' '
+ @fldName + ' from ' + @tblName + ' where ' + @strWhere + ' '
+ @strOrder + ') as tblTmp) and ' + @strWhere + ' ' + @strOrder
EXEC (@strSQL)
END
ELSE
IF @Type='2'
BEGIN --方法2，採用一個輕量級的中間表，在大數據量的情況下效果會比較明顯
CREATE TABLE #t(Fkey varchar(1000))
DECLARE @i int
SET @i=@PageIndex*@PageSize
IF @strWhere =''
SET @strWhere = '1=1'
SET @strSQL ='INSERT INTO #t SELECT '+@fldName+' FROM '+@tblName+' WHERE '+@strWhere+' '+ @strOrder
SET ROWCOUNT @i
print @strSQL
EXEC(@strSQL)
SET @i=@i-@pagesize
SET ROWCOUNT @i
DELETE FROM #t
--返回查詢結果
SET @strSQL ='SELECT '+@strGetFields+' FROM '+@tblName+' AS a WHERE EXISTS(SELECT FKey FROM #t WHERE FKey=a.'+@fldName+') '+ @strOrder
print @strSQL
EXEC(@strSQL)
SET ROWCOUNT 0
DROP TABLE #t
RETURN
END
ELSE
IF @Type='3'
BEGIN --方法3，採用取當前開始編號與結束編號進行取數據集
DECLARE @TheSQL NVARCHAR(4000)
DECLARE @RowCount INT
DECLARE @BeginID VARCHAR(1000)
DECLARE @EndID VARCHAR(1000)
/*開始編號*/
SET @RowCount = (@PageIndex -1)*@PageSize +1
SET ROWCOUNT @RowCount
SET @TheSQL = 'SELECT @BeginID = '+@fldName+' FROM '+@tblName+ ' WHERE '+@strWhere+' '+ @strOrder
EXEC sp_executesql @TheSQL,N'@BeginID VARCHAR(1000) output',@BeginID output
/*結束編號*/
SET @RowCount = @PageIndex * @PageSize
SET ROWCOUNT @RowCount
SET @TheSQL = 'SELECT @EndID = '+@fldName+' FROM '+@tblName + ' WHERE '+@strWhere+' '+ @strOrder
EXEC sp_executesql @TheSQL,N'@EndID varchar(1000) output',@EndID output
/*返回當前頁結果集*/
SET ROWCOUNT @PAGESIZE
EXEC('select '+@strGetFields+' from '+@tblName+' WHERE( '+@fldName+' between '''+@EndID +''' and '''+@BeginID+''') ' + @strOrder)
SET ROWCOUNT 0
SET NOCOUNT OFF
RETURN
END
end
end
GO
作者QQ:43460043 MSN:[email protected]