SQLServer2005 分页程序

 

set  ANSI_NULLS  ON
set  QUOTED_IDENTIFIER  ON
go



ALTER   PROCEDURE   [ dbo ] . [ DividePage ]
   @tabname   nvarchar ( 2000 ), -- 要查询表名
   @fidlelist   nvarchar ( 1000 ), -- 要查询字段
   @wheresql   nvarchar ( 1000 ), -- 查询条件
   @pk   nvarchar ( 20 ), -- 主键
   @order   nvarchar ( 100 ), -- 排序字段
   @pagenum   int , -- 要查询的页号
   @rowsum   int , -- 每页要显示的行数
   @allpage   int  output, -- 计算总页数
   @allrow   int  output -- 计算总行数
AS
   declare   @sqlstr   nvarchar ( 4000 ), @tmpwhere   nvarchar ( 4000 ), @tmporder   nvarchar ( 100 )
BEGIN
     if ( @order != '' )
       begin
        set   @tmporder = @order
       end  
      else
        set   @tmporder = @pk ;
     set   @tmpwhere = '' ;
     if ( @wheresql != '' )
     begin
        set   @tmpwhere = '  where  ' + @wheresql ;
     end
     set   @sqlstr = N ' select * from(select   ' + @fidlelist + ' , ROW_NUMBER() OVER(order by  ' + @tmporder + ' ) as row from  ' + @tabname + @tmpwhere + ' ) tmp where row between  ' + cast ((( @pagenum - 1 ) * @rowsum + 1 )  as   nvarchar ) + '  and  ' + cast ( @pagenum * @rowsum   as   nvarchar );  
exec  sp_executesql  @sqlstr
     set   @sqlstr = N ' select @allrow1 =count( ' + @pk + ' ) from  ' +   @tabname + @tmpwhere
     exec  sp_executesql  @sqlstr ,N ' @allrow1 int OUTPUT ' , @allrow1 = @allrow  output    
     if ( @allrow % @rowsum <> 0 )
         begin
           set   @allpage = @allrow / @rowsum + 1 -- 获得总页数
         end
     else
           set   @allpage = @allrow / @rowsum   -- --获得总页数

END

关键的函数ROW_NUMBER() 是sqlserver 2000 中没有的。