火星文 技术研习社

Noname Cat, Keep Thinking
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

SQL Server 通用分页存储过程

Posted on 2006-11-14 10:22  剑廿三  阅读(341)  评论(0)    收藏  举报
set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go

ALTER PROCEDURE [dbo].[Pagination] 
    
@TableName      varchar(255),       -- 表名 
    @PageSize     int = 10,           -- 页尺寸 
    @PageIndex    int = 1,            -- 页码 
    @OrderColumn      varchar(255),       -- 排序字段名 
    @OrderType    bit = 0,            -- 设置排序类型, 非 0 值则降序 
    @WhereStr     varchar(1500)='',  -- 查询条件 (注意: 不要加 where) 
    @TotalCount      int output            -- 返回记录总数 
AS 

/******************************************************************************
**        File: 
**        Name: Pagination
**        Desc: 分页查询数据
**      Example:declare @TotalCount int
                exec Pagination 'SmsOut','CreatedTime',50,100,0,'CreatedTime>''2006-9-25''', @TotalCount output
**
**        This template can be customized:
**              
**        Return values:
** 
**        Called by:   
**              
**        Parameters:
**        Input                            Output
**     ----------                            -----------
**
**        Auth: 
**        Date: 
*******************************************************************************
**        Change History
*******************************************************************************
**        Date:        Author:                Description:
**        --------        --------                -------------------------------------------
**    
******************************************************************************
*/

declare  @strSQL   varchar(2000)     -- 主语句 
declare @strTmp   varchar(1000)     -- 临时变量 
declare @strOrder varchar(1000)       -- 排序类型 

if @OrderType != 0 
begin 
    
set @strTmp = '<(select min' 
    
set @strOrder = ' order by [' + @OrderColumn +'] desc' 
end 
else 
begin 
    
set @strTmp = '>(select max' 
    
set @strOrder = ' order by [' + @OrderColumn +'] asc' 
end 



if @WhereStr !='' 
    
set @strSQL = 'select top ' + str(@PageSize+ ' * from [' 
        
+ @TableName + '] where [' + @OrderColumn + ']' + @strTmp + '([' 
        
+ @OrderColumn + ']) from (select top ' + str((@PageIndex-1)*@PageSize+ ' [' 
        
+ @OrderColumn + '] from [' + @TableName + '] where (' + @WhereStr + '' 
        
+ @strOrder + ') as tblTmp) and (' + @WhereStr + '' + @strOrder 
else
set @strSQL = 'select top ' + str(@PageSize+ ' * from [' 
    
+ @TableName + '] where [' + @OrderColumn + ']' + @strTmp + '([' 
    
+ @OrderColumn + ']) from (select top ' + str((@PageIndex-1)*@PageSize+ ' [' + @OrderColumn + '] from [' + @TableName +']' + @strOrder + ') as tblTmp)' + @strOrder 
if @PageIndex = 1 
begin 
    
set @strTmp = '' 
    
if @WhereStr !='' 
        
set @strTmp = ' where (' + @WhereStr + ')' 

    
set @strSQL = 'select top ' + str(@PageSize+ ' * from [' 
        
+ @TableName + ']' + @strTmp + ' ' + @strOrder 
end 

Declare @strCount nvarchar(2000)
if @WhereStr <> ''
set @strCount =N'select @TotalCount=Count(*) from ['+@TableName+'] Where ('+@WhereStr+')'
else
set @strCount =N'select @TotalCount=Count(*) from ['+ @TableName +']'

execute sp_executesql @strCount,N'@TotalCount int output',@TotalCount output

print @TotalCount

exec (@strSQL