成熟sql 分页存储过程(UP_Common_GetPage)

GO
/****** Object:  StoredProcedure [dbo].[UP_Common_GetPage]    Script Date: 03/17/2011 11:16:21 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:  

 9 -- Create date: 2-20
-- Description: 分页存储过程
-- =============================================
ALTER PROCEDURE [dbo].[UP_Common_GetPage]
@tblName nvarchar(255), -- 表名 
@strGetFields nvarchar(1000) = '*', -- 需要返回的列 
@fldName nvarchar(255)='', -- 排序的字段名 
@PageSize int = 10, -- 页尺寸(每页记录数) 
@PageIndex int = 1, -- 页码 
@OrderType bit = 0, -- 设置排序类型, 非0值则降序 
@strWhere nvarchar(1500) = '', -- 前缀 and 的 查询条件 (注意: 不要加 where) 
@RowCount int output -- 返回记录总数
AS 
SET   ANSI_WARNINGS   ON 
 declare @strSQL nvarchar(4000) -- 主语句 
 declare @strTmp nvarchar(110) -- 临时变量 
 declare @strOrder nvarchar(400) -- 排序类型 
 set @strSQL = 'select @RowCount=ISNULL(count(*),0) from  ' + @tblName + '   where  1=1 '+@strWhere 
 exec sp_executesql @strSQL,N'@RowCount int output',@RowCount out

        --insert into sqllogs(sqllogs) values(@strSQL+'cnt:'+cast(@RowCount as varchar(500)))
             
 IF @RowCount=0
 BEGIN
  RETURN
 END
            IF @RowCount<( @PageIndex-1)*@PageSize
             BEGIN
    set @PageIndex=1
 END
                  
 --以上代码的意思是如果@doCount传递过来的不是0，就执行总数统计。以下的所有代码都是@doCount为0的情况 
 set @strSQL =''
 if @OrderType!= 0 -- 降序(desc) 
 begin 
  set @strTmp = '<(select min' 
  set @strOrder = ' order by  ' + @fldName +'   desc' 
  --如果@OrderType不是0，就执行降序，这句很重要! 
 end 
 else -- 升序(asc) 
 begin 
  set @strTmp = '>(select max' 
  set @strOrder = ' order by  ' + @fldName +'   asc' 
 end 
 if @PageIndex = 1 --// 页码 
 begin 
   set @strSQL = 'select top ' +str(@PageSize)+ ' ' +@strGetFields+ ' from  ' + @tblName + '   where   1=1  ' + @strWhere + ' ' + @strOrder 
  --如果是第一页就执行以上代码，这样会加快执行速度 

  --insert into sqllogs(sqllogs) values(@strSQL+' 1 --// 页码 ')
 end 
 else 
 begin --以下代码赋予了@strSQL以真正执行的SQL代码 
  set @strSQL ='select top ' +str(@PageSize)+ ' ' +@strGetFields+ ' from  ' +@tblName+ '   where  ' +@fldName+ '  ' +@strTmp+ '( ' +@fldName+ '  ) from (select top ' +str((@PageIndex-1)*@PageSize) + '  ' +@fldName+ '   from  ' +@tblName+ '   where  1=1  ' +@strWhere+ ' ' +@strOrder+ ') as tblTmp)   ' +@strWhere+ ' ' +@strOrder 
 --insert into sqllogs(sqllogs) values(@strSQL+'真正执行的SQL代码 ') 
end 
 --print @strSQL
 exec (@strSQL)