MSSQL分页：一个高效的二分法TOP MAX/TOP MIN分页存贮过程

--/*-----存储过程 分页处理 孙伟 2005-03-28创建 -------*/
--/*----- 对数据进行了2分处理使查询前半部分数据与查询后半部分数据性能相同 -------*/
--/*-----存储过程 分页处理 孙伟 2005-04-21修改 添加Distinct查询功能-------*/
--/*-----存储过程 分页处理 孙伟 2005-05-18修改 多字段排序规则问题-------*/
--/*-----存储过程 分页处理 孙伟 2005-06-15修改 多字段排序修改-------*/
--/*-----存储过程 分页处理 孙伟 2005-12-13修改 修改数据分页方式为top max模式 性能有极大提高-------*/
--/*-----缺点：相对之前的not in版本主键只能是整型字段,如主键为GUID类型请使用not in 模式的版本-------*/

CREATE   PROCEDURE   [ dbo ] . [ getPagerTopMAX ]  (
     @tblName       nvarchar ( 2000 ),            -- --要显示的表或多个表的连接,如："myTable"
     @ID          nvarchar ( 150 ),             -- --主表的主键，如："id"
     @page          int   =   1 ,                 -- --要显示那一页的记录
     @pageSize      int   =   10 ,                 -- --每页显示的记录个数
     @fldName       nvarchar ( 500 )  =   ' * ' ,         -- --要显示的字段列表,如："id, cdsinger, cdsingertype, area, cdsingerreadme"
     @fldSort      nvarchar ( 200 )  =   @ID ,        -- --排序字段列表或条件
     @Sort          bit   =   1 ,                 -- --排序方法，0为升序，1为降序(如果是多字段排列Sort指代最后一个排序字段的排列顺序(最后一个排序字段不加排序标记)--程序传参如：' SortA Asc,SortB Desc,SortC ')
     @strCondition      nvarchar ( 1000 )  =   null ,  -- --查询条件,不需where,如："and a=1 and b=2"
     @Dist                   bit   =   0 ,           -- --是否添加查询字段的 DISTINCT 默认0不添加/1添加
     @Counts      int   =   1  output,               -- --查询到的记录数
     @pageCount      int   =   1  output             -- --查询结果分页后的总页数
)  AS   begin
     SET  NOCOUNT  ON
     Declare   @sqlTmp   nvarchar ( 3000 )            -- --存放动态生成的SQL语句
     Declare   @strTmp   nvarchar ( 3000 )             -- --存放取得查询结果总数的查询语句
     Declare   @strID       nvarchar ( 3000 )        -- --存放取得查询开头或结尾ID的查询语句

     Declare   @strSortType   nvarchar ( 10 )         -- --数据排序规则A
     Declare   @strFSortType   nvarchar ( 10 )         -- --数据排序规则B

     Declare   @SqlSelect   nvarchar ( 50 )          -- --对含有DISTINCT的查询进行SQL构造
     Declare   @SqlCounts   nvarchar ( 50 )          -- --对含有DISTINCT的总数查询进行SQL构造


     if   @Dist    =   0
     begin
         set   @SqlSelect   =   ' select  '
         set   @SqlCounts   =   ' Count(*) '
     end
     else
     begin
         set   @SqlSelect   =   ' select distinct  '
         set   @SqlCounts   =   ' Count(DISTINCT  ' + @ID + ' ) '
     end


     if   @Sort = 0
     begin
         set   @strFSortType = '  ASC  '
         set   @strSortType = '  DESC  '
     end
     else
     begin
         set   @strFSortType = '  DESC  '
         set   @strSortType = '  ASC  '
     end



     -- ------生成查询语句--------

     -- 此处@strTmp为取得查询结果数量的语句
     if   @strCondition   is   null   or   @strCondition = ''       -- 没有设置显示条件
     begin
         set   @sqlTmp   =    @fldName   +   '  From  '   +   @tblName
         set   @strTmp   =   @SqlSelect + '  @Counts= ' + @SqlCounts + '  FROM  ' + @tblName
         set   @strID   =   '  From  '   +   @tblName
     end
     else
     begin
         set   @sqlTmp   =   +   @fldName   +   ' From  '   +   @tblName   +   '  where (1>0)  '   +   @strCondition
         set   @strTmp   =   @SqlSelect + '  @Counts= ' + @SqlCounts + '  FROM  ' + @tblName   +   '  where (1>0)  '   +   @strCondition
         set   @strID   =   '  From  '   +   @tblName   +   '  where (1>0)  '   +   @strCondition
     end

     -- --取得查询结果总数量-----
     exec  sp_executesql  @strTmp ,N ' @Counts int out  ' , @Counts  out
     declare   @tmpCounts   int
     if   @Counts   =   0
         set   @tmpCounts   =   1
     else
         set   @tmpCounts   =   @Counts

         -- 取得分页总数
         set   @pageCount = ( @tmpCounts + @pageSize - 1 ) / @pageSize

         /**//* *当前页大于总页数 取最后一页* */
         if   @page > @pageCount
             set   @page = @pageCount

         -- /*-----数据分页2分处理-------*/
         declare   @pageIndex   int   -- 总数/页大小
         declare   @lastcount   int   -- 总数%页大小 

         set   @pageIndex   =   @tmpCounts / @pageSize
         set   @lastcount   =   @tmpCounts % @pageSize
         if   @lastcount   >   0
             set   @pageIndex   =   @pageIndex   +   1
         else
             set   @lastcount   =   @pagesize

         -- //***显示分页
         if   @strCondition   is   null   or   @strCondition = ''       -- 没有设置显示条件
         begin
             if   @pageIndex < 2   or   @page <= @pageIndex   /   2   +   @pageIndex   %   2     -- 前半部分数据处理
                 begin  
                     if   @page = 1
                         set   @strTmp = @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName                         
                             + '  order by  ' +   @fldSort   + '   ' +   @strFSortType
                     else
                     begin                     
                         set   @strTmp = @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  where  ' + @ID + '  <(select min( ' +   @ID   + ' ) from ( ' +   @SqlSelect + '  top  ' +   CAST ( @pageSize * ( @page - 1 )  as   Varchar ( 20 ))  + '   ' +   @ID   + '  from  ' + @tblName
                             + '  order by  ' +   @fldSort   + '   ' +   @strFSortType + ' ) AS TBMinID) '
                             + '  order by  ' +   @fldSort   + '   ' +   @strFSortType
                     end     
                 end
             else
                 begin
                 set   @page   =   @pageIndex - @page + 1   -- 后半部分数据处理
                     if   @page   <=   1   -- 最后一页数据显示                
                         set   @strTmp = @SqlSelect + '  * from ( ' + @SqlSelect + '  top  ' +   CAST ( @lastcount   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TempTB ' + '  order by  ' +   @fldSort   + '   ' +   @strFSortType  
                     else
                         set   @strTmp = @SqlSelect + '  * from ( ' + @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  where  ' + @ID + '  >(select max( ' +   @ID   + ' ) from( ' +   @SqlSelect + '  top  ' +   CAST ( @pageSize * ( @page - 2 ) + @lastcount   as   Varchar ( 20 ))  + '   ' +   @ID   + '  from  ' + @tblName
                             + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TBMaxID) '
                             + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TempTB ' + '  order by  ' +   @fldSort   + '   ' +   @strFSortType  
                 end
         end

         else   -- 有查询条件
         begin
             if   @pageIndex < 2   or   @page <= @pageIndex   /   2   +   @pageIndex   %   2     -- 前半部分数据处理
             begin
                     if   @page = 1
                         set   @strTmp = @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName                         
                             + '  where 1=1  '   +   @strCondition   +   '  order by  ' +   @fldSort   + '   ' +   @strFSortType
                     else
                     begin                     
                         set   @strTmp = @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  where  ' + @ID + '  <(select min( ' +   @ID   + ' ) from ( ' +   @SqlSelect + '  top  ' +   CAST ( @pageSize * ( @page - 1 )  as   Varchar ( 20 ))  + '   ' +   @ID   + '  from  ' + @tblName
                             + '  where (1=1)  '   +   @strCondition   + '  order by  ' +   @fldSort   + '   ' +   @strFSortType + ' ) AS TBMinID) '
                             + '   ' +   @strCondition   + '  order by  ' +   @fldSort   + '   ' +   @strFSortType
                     end             
             end
             else
             begin  
                 set   @page   =   @pageIndex - @page + 1   -- 后半部分数据处理
                 if   @page   <=   1   -- 最后一页数据显示
                         set   @strTmp = @SqlSelect + '  * from ( ' + @SqlSelect + '  top  ' +   CAST ( @lastcount   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  where (1=1)  ' +   @strCondition   + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TempTB ' + '  order by  ' +   @fldSort   + '   ' +   @strFSortType                      
                 else
                         set   @strTmp = @SqlSelect + '  * from ( ' + @SqlSelect + '  top  ' +   CAST ( @pageSize   as   VARCHAR ( 20 )) + '   ' +   @fldName + '  from  ' + @tblName
                             + '  where  ' + @ID + '  >(select max( ' +   @ID   + ' ) from( ' +   @SqlSelect + '  top  ' +   CAST ( @pageSize * ( @page - 2 ) + @lastcount   as   Varchar ( 20 ))  + '   ' +   @ID   + '  from  ' + @tblName
                             + '  where (1=1)  ' +   @strCondition   + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TBMaxID) '
                             + '   ' +   @strCondition + '  order by  ' +   @fldSort   + '   ' +   @strSortType + ' ) AS TempTB ' + '  order by  ' +   @fldSort   + '   ' +   @strFSortType                 
             end     
         end

     -- ----返回查询结果-----
     -- print @strTmp
     exec  ( @strTmp )


     SET  NOCOUNT  OFF

end