CREATE PROCEDURE proc_pagination ( @tblName nvarchar(1000), ----要显示的表或多个表的连接,必须参数 @fldName nvarchar(4000) = '*', ----要显示的字段列表 @fldSort nvarchar(4000) = null, ----排序字段列表或条件 @fldFSort nvarchar(4000) = null, ----反向排序字段列表或条件(这个需要在调用前准备好,且一定要与原始排序完全相反) @strCondition nvarchar(4000) = null, ----查询条件,不需where @ID nvarchar(1000), ----主表的主键,必须参数 @Dist bit = 0, ----是否添加查询字段的 DISTINCT 默认0不添加/1添加 @pageSize int = 10, ----每页显示的记录个数 @currentpage int = 1, ----要显示那一页的记录 @pageCount int = 1 output, ----查询结果分页后的总页数 @Counts int = 1 output ----查询到的记录数 ) AS SET NOCOUNT ON Declare @sqlTmp nvarchar(4000) ----存放动态生成的SQL语句 Declare @strTmp nvarchar(4000) ----存放取得查询结果总数的查询语句 Declare @strID nvarchar(1000) ----存放取得查询开头或结尾ID的查询语句 Declare @strSort nvarchar(4000) ----数据排序规则A Declare @strFSort nvarchar(4000) ----数据排序规则B Declare @SqlSelect nvarchar(50) ----对含有DISTINCT的查询进行SQL构造 Declare @SqlCounts nvarchar(50) ----对含有DISTINCT的总数查询进行SQL构造 Declare @IDSords nvarchar(4000) ----ID和所有参加排序的字段,用于distinct和order by if @Dist = 0 --不带distinct begin set @SqlSelect = 'select ' set @SqlCounts = 'Count(1)' end else begin set @SqlSelect = 'select distinct ' set @SqlCounts = 'Count(DISTINCT '+@ID+')' end --本来应该在这里分析@fldSort,然后自动生成反向排序字段 set @strSort=@fldSort set @strFSort=@fldFSort --------生成查询语句-------- --此处@strTmp为取得查询结果数量的语句 if @strCondition is null or @strCondition='' --没有查询条件,不带where 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 ' + @strCondition set @strTmp = @SqlSelect+' @Counts='+@SqlCounts+' FROM '+@tblName + ' where ' + @strCondition set @strID = ' From ' + @tblName + ' where ' + @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 @currentpage>@pageCount set @currentpage=@pageCount --/*-----数据分页2分处理-------*/ declare @pageIndex int --总数/页大小 declare @lastcount int --总数%页大小 set @pageIndex = @tmpCounts/@pageSize set @lastcount = @tmpCounts%@pageSize if @lastcount > 0 set @pageIndex = @pageIndex + 1 ----@lastcount>0说明最后一页还有记录,所以就应该再多一页 else set @lastcount = @pageSize --//***显示分页 if @strCondition is null or @strCondition='' --没有查询条件where begin if @pageIndex<2 or @currentpage<=@pageIndex / 2 + @pageIndex % 2 --前半部分数据处理 begin if @fldSort is null or @fldSort='' --没有排序 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from ' +'('+ @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +') as TempTBL)' --取的是id不在前(@currentpage-1)页中,即不是前(@currentpage-1)*@pagesize条记录的前@pagesize条记录 else --如果有排序的话 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from (' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +' order by '+ @strSort+') as TempTBL)' +' order by '+ @strSort --按正序排序取前(@currentpage-1)*@pagesize条记录,然后再按正序排序把前(@currentpage-1)*@pagesize条记录排除取前@pagesize条记录 end else --后半部分数据处理 begin set @currentpage = @pageIndex-@currentpage+1 if @currentpage <= 1 --最后一页数据显示 if @fldSort is null or @fldSort='' --没有排序 set @strTmp=@SqlSelect+' '+@fldName+' from (' + @SqlSelect +' ' + @fldName+ ' from '+@tblName +' where '+@ID + ' not in (select '+@ID+' from(' +@SqlSelect+' top '+CAST(@pageSize*(@pageIndex-1) as VARCHAR(4))+' '+@fldName +' from '+@tblName +') as TempTBL)) AS TempTB' --如果是最后一页就没必要再用top了,直接把不在前@pagesize*(@pageindex-1)页中的记录取出就可以 else --如果有排序的话 set @strTmp=@SqlSelect+' '+@fldName+' from (' +@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' order by '+ @strFSort +') AS TempTB'+' order by '+ @strSort --先反向排序,取出前@lastcount条记录,再进行正向排序 else --不是最后一页,即后半部分的其他页 if @fldSort is null or @fldSort='' --没有排序时 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +') as TempTBL)' --不排序时跟前半部分应该一样处理 /* set @strTmp=@SqlSelect+' '+@fldName+' from (' +@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-2)+@lastcount as Varchar(20)) +' '+ @fldName +' from '+@tblName +')' +') AS TempTB' */ else --有排序时 set @strTmp=@SqlSelect+' '+@fldName+' from (' +@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-2)+@lastcount as Varchar(20)) +' '+ @fldName +' from '+@tblName +' order by '+ @strFSort +') as TempTBL)' +' order by '+ @strFSort +') AS TempTB' +' order by '+ @strSort --先反向排序取出前(@currentpage-1)页的记录(其中包括不满一整页的最后一页,所以是前@pagesize*(@currentpage-2)+@lastcount条记录) --然后仍然反向排序,这回取不在上一结果集里的前@pagesize条记录,即该得到的记录 --最后进行一次正向排序 end end else --有查询条件 begin if @pageIndex<2 or @currentpage<=@pageIndex / 2 + @pageIndex % 2 --前半部分数据处理 begin if @fldSort is null or @fldSort='' --没有排序 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +' Where ' + @strCondition + ') as TempTBL)' +' and ' + @strCondition --先取出带where后的前@pagesize*(@currentpage-1)条记录 --再取出不在这@pagesize*(@currentpage-1)条记录中的还where的前@pagesize条记录 else --有排序 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +' Where ' + @strCondition + ' order by '+ @strSort +') as TempTBL)' +' and ' + @strCondition + ' order by '+ @strSort --1、正向排序,取出带where后的前@pagesize*(@currentpage-1)条记录 --2、正向排序,取出不在这@pagesize*(@currentpage-1)条记录中的还where的前@pagesize条记录 end else --后半部分 begin set @currentpage = @pageIndex-@currentpage+1 --后半部分数据处理 if @currentpage <= 1 --最后一页数据显示 if @fldSort is null or @fldSort='' set @strTmp=@SqlSelect+' '+@fldName + ' from '+@tblName +' where '+@ID + ' not in (select '+@ID+' from(' +@SqlSelect+' top '+CAST(@pagesize*(@pageIndex-1) as VARCHAR(4))+' '+@fldName +' from '+@tblName +' where '+@strCondition +') as TempTBL) and '+@strCondition --取不在前@pageIndex-1页中的记录 else --有排序,即既有条件又有排序 set @strTmp=@SqlSelect+' '+@fldName+' from (' +@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName +' from '+@tblName+' where '+ @strCondition +' order by '+ @strFSort +') AS TempTB'+' order by '+ @strSort --先倒序排列,取前@lastcount条记录 --再正序排序 else --后半部分,但不是最后一页 if @fldSort is null or @fldSort='' --没有排序条件 set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in(select '+@ID+' from(' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-1) as Varchar(20)) +' '+ @fldName +' from '+@tblName +' Where ' + @strCondition + ') as TempTBL)' +' and ' + @strCondition --不排序时应该与前半部分相同处理 else --有排序字段、有查询条件、后半部分非最末页 set @strTmp=@SqlSelect+' '+@fldName+' from (' +@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in (' +'select '+@ID+' from (' + @SqlSelect+' top '+ CAST(@pageSize*(@currentpage-2)+@lastcount as Varchar(20)) +' '+ @fldName +' from '+@tblName +' where '+ @strCondition +' order by '+ @strFSort +') as TempTBL)' +' and ' + @strCondition +' order by '+ @fldFSort +') AS TempTB'+' order by '+ @strSort end end ------返回查询结果----- exec sp_executesql @strTmp --print @strTmp SET NOCOUNT OFF