漫步.net

学然后知不足

 

一个简单的分页存储过程

CREATE   PROCEDURE   sp_page  

    @strTable       varchar(50),   --表名  
    @strColumn      varchar(50),   --按该列来进行分页  
    @intColType     int,           --@strColumn列的类型,0-数字类型,1-字符类型,2-日期时间类型  
    @intOrder       bit,           --排序,0-顺序,1-倒序  
    @strColumnlist  varchar(800),  --要查询出的字段列表,*表示全部字段  
    @intPageSize    int,           --每页记录数  
    @intPageNum     int,           --指定页  
    @strWhere       varchar(800),  --查询条件  
    @intPageCount   int   OUTPUT   --总页数  
  AS  
  DECLARE   @sql    nvarchar(4000) --用于构造SQL语句
  DECLARE   @where1 varchar(800)   --构造条件语句
  DECLARE   @where2 varchar(800)   --构造条件语句
  IF   @strWhere   is   null   or   rtrim(@strWhere)=''  
  -- 为了避免SQL关键字与字段、表名等连在一起,首先为传入的变量添加空格
  BEGIN  --没有查询条件  
      SET   @where1=' WHERE '  
      SET   @where2=' '  
  END  
  ELSE  
  BEGIN  --有查询条件  
      SET   @where1=' WHERE  ('+@strWhere+')  AND  '
      SET   @where2=' WHERE  ('+@strWhere+')  '  
  END  

  set @strColumn = ' ' + @strColumn + ' '
  set @strColumnlist = ' ' + @strColumnlist + ' '
  --构造SQL语句,计算总页数。计算公式为 总页数 = Ceiling ( 记录个数 / 页大小 )

  SET   @sql='SELECT   @intPageCount=CEILING((COUNT(*)+0.0)/'
        + CAST(@intPageSize   AS   varchar)
        + ')   FROM   ' + @strTable + @where2  

  --执行SQL语句,计算总页数,并将其放入@intPageCount变量中

  EXEC sp_executesql  @sql,N'@intPageCount   int   OUTPUT',@intPageCount   OUTPUT

  --将总页数放到查询返回记录集的第一个字段前,此语句可省略

  SET  @strColumnlist= Cast(@intPageCount as varchar(30)) + ' as PageCount,' + @strColumnlist  

  IF   @intOrder=0   --构造升序的SQL

      SET @sql='SELECT TOP '+ CAST(@intPageSize   AS   varchar)  +
               @strColumnlist +  
               ' FROM ' + @strTable + @where1 +
               @strColumn + '>(SELECT MAX('+@strColumn+')  '+  
               ' FROM (SELECT TOP '+ CAST(@intPageSize*(@intPageNum - 1)  AS  varchar) +  
               @strColumn + ' FROM '+ @strTable+@where2+'ORDER  BY '+@strColumn+')  t)  ORDER  BY '+ @strColumn  

  ELSE              --构造降序的SQL  

      SET @sql='SELECT TOP '+ CAST(@intPageSize   AS   varchar)  +
               @strColumnlist+  
               ' FROM '+ @strTable + @where1 +
               @strColumn + '<(SELECT   MIN('+@strColumn+')   '+  
               ' FROM (SELECT TOP '+ CAST(@intPageSize*(@intPageNum - 1)  AS  varchar) +  
               @strColumn + ' FROM '+ @strTable+@where2+'ORDER   BY '+@strColumn+'   DESC)   t)   ORDER   BY   '+  
               @strColumn + ' DESC'       

  IF   @intPageNum=1--第一页  

      SET   @sql='SELECT   TOP   '+CAST(@intPageSize   AS   varchar) + @strColumnlist + ' FROM '+@strTable+  
                 @where2+'ORDER   BY   '+@strColumn+CASE   @intOrder WHEN  0 THEN  ''  ELSE  '  DESC' 

  END  
  --PRINT   @sql  
  EXEC(@sql)  

  GO  

posted on 2008-10-15 17:53  情同锁  阅读(183)  评论(0编辑  收藏  举报

导航