分页存储过程,可支持多表查询,任意排序
/*
  说明:1.支持多表查询 2.支持任意排序 3.不支持表别名
 
 参考了
      evafly920:[分享]千万数量级分页存储过程(效果演示)
      地址:http://blog.csdn.net/evafly920/archive/2006/03/03/614813.aspx 
  
  
  IF(EXISTS(SELECT * FROM sysobjects WHERE [id]=OBJECT_ID('usp_PagingLarge') AND xtype='P'))
     DROP PROCEDURE usp_PagingLarge
 GO
 */ /*
 --调用例子:
     EXEC usp_PagingLarge 'YJ_Danger','Id','ID',15,1,'','','YJ_Danger.ZfName'    --1.单表/单排序
    EXEC usp_PagingLarge 'bigtable','d_id','d_id,d_title,d_content,d_time',20,0,'','','d_id'
    --2.单表/多排序
    EXEC usp_PagingLarge 'bigtable','d_id','*',20,0,'','','d_time asc,d_id desc'
    --3.多表/单排序
    EXEC usp_PagingLarge 'bigtable left join bigtable_author on bigtable.d_id=bigtable_author.BigTable_id ', 'bigtable.d_id', 'bigtable.d_id,bigtable.d_title,bigtable.d_content,bigtable.d_time,bigtable_author.d_author ', 20, 0, '', '', 'bigtable.d_id asc'
    --4.多表/多排序
    EXEC usp_PagingLarge 'bigtable left join bigtable_author on bigtable.d_id=bigtable_author.BigTable_id ', 'bigtable.d_id', 'bigtable.d_id,bigtable.d_title,bigtable.d_content,bigtable.d_time,bigtable_author.d_author ', 20, 0, '', '', 'bigtable.d_time asc,bigtable.d_id desc '
    */
 
 CREATE PROCEDURE usp_PagingLarge
 @Tables VARCHAR(200),         --表名,可以是多个表,但不能用别名
 @Identity VARCHAR(50),         --主键,可以为空,但@Order为空时该值不能为空
 @Fields    VARCHAR(200),         --要取出的字段,可以是多个表的字段,可以为空,为空表示select * 
 @PageSize INT,             --每页记录数
 @Page INT,             --当前页,0表示第1页
 @Filter VARCHAR(200) = '',    --条件,可以为空,不用填 where
 @Group VARCHAR(200) = '',    --分组依据,可以为空,不用填 group by 
 @Order VARCHAR(100) = ''    --排序,可以为空,为空默认按主键升序排列,不用填 order by  AS
 BEGIN
     DECLARE @SortColumn VARCHAR(50)
     DECLARE @Operator CHAR(2)
     DECLARE @SortTable VARCHAR(50)
     DECLARE @SortName VARCHAR(50)
     IF @Fields = ''
          SET @Fields = '*'
     IF @Filter = ''
          SET @Filter = 'WHERE 1=1'
     ELSE
          SET @Filter = 'WHERE ' +  @Filter
     IF @Group <>''
          SET @Group = 'GROUP BY ' + @Group
 
     IF @Order <> ''
     BEGIN
          DECLARE @pos1  INT, @pos2 INT
          SET @Order = REPLACE(REPLACE(@Order, ' asc', ' ASC'), ' desc', ' DESC')
          IF CHARINDEX(' DESC', @Order) > 0 AND CHARINDEX(' DESC', @Order) < CHARINDEX(' ASC', @Order)
              SET @Operator = '<='
          ELSE
              SET @Operator = '>='
          SET @SortColumn = REPLACE(REPLACE(REPLACE(@Order, ' ASC', ''), ' DESC', ''), ' ', '')
          SET @pos1 = CHARINDEX(',', @SortColumn)
          IF @pos1 > 0
              SET @SortColumn = SUBSTRING(@SortColumn, 1, @pos1-1)
          SET @pos2 = CHARINDEX('.', @SortColumn)
          IF @pos2 > 0
          BEGIN
              SET @SortTable = SUBSTRING(@SortColumn, 1, @pos2-1)
              IF @pos1 > 0 
                  SET @SortName = SUBSTRING(@SortColumn, @pos2+1, @pos1-@pos2-1)
              ELSE
                  SET @SortName = SUBSTRING(@SortColumn, @pos2+1, LEN(@SortColumn)-@pos2)
          END
          ELSE
          BEGIN
              SET @SortTable = @Tables
              SET @SortName = @SortColumn
          END
     END
     ELSE
     BEGIN
          SET @SortColumn = @Identity
          SET @SortTable = @Tables
          SET @SortName = @SortColumn
          SET @Order = @SortColumn
          SET @Operator = '>='
     END
 
     DECLARE @type varchar(50)
     DECLARE @prec int
     SELECT @type=t.name, @prec=c.prec
     FROM sysobjects o 
     JOIN syscolumns c on o.id=c.id
     JOIN systypes t on c.xusertype=t.xusertype
     WHERE o.name = @SortTable AND c.name = @SortName
     IF CHARINDEX('char', @type) > 0
     SET @type = @type + '(' + CAST(@prec AS varchar) + ')'
 
     DECLARE @TopRows INT
     SET @TopRows = @PageSize * @Page + 1
     EXEC('
         DECLARE @SortColumnBegin  ' + @type + '
         SET ROWCOUNT  ' + @TopRows + '
         SELECT @SortColumnBegin= ' + @SortColumn + ' FROM  ' + @Tables + ' ' + @Filter + ' ' + @Group + ' ORDER BY ' + @Order + '
         SET ROWCOUNT  ' + @PageSize + '
         SELECT  ' + @Fields + ' FROM  ' + @Tables + ' ' + @Filter  + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '    
     ')     END
GO现在我想给这个存储过程加上返回记录数功能。参照上面的
     EXEC('
         DECLARE @SortColumnBegin  ' + @type + '
         SET ROWCOUNT  ' + @TopRows + '
         SELECT @SortColumnBegin= ' + @SortColumn + ' FROM  ' + @Tables + ' ' + @Filter + ' ' + @Group + ' ORDER BY ' + @Order + '
         SET ROWCOUNT  ' + @PageSize + '
         SELECT  ' + @Fields + ' FROM  ' + @Tables + ' ' + @Filter  + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '    
     ')  试写了很久,不能成功,请帮下,谢谢

解决方案 »

  1.   

    EXEC(' SELECT  count(1) as cnt FROM  ' + @Tables + ' ' + @Filter  + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '     
         ')
      

  2.   

    谢谢
    出现以下提示:
    在 ORDER BY 子句中无效,因为该列未包含在聚合函数中,并且没有 GROUP BY 子句。
      

  3.   

    EXEC(' SELECT  count(1) as cnt FROM  ' + @Tables)
      

  4.   

    下面是我根据你的代码修改的, 参数足的时候可以通过测试,返回记录总数和分页数, 你本来的代码在多表查询部分条件不足时还存在缺陷,主要在主键和排序选择上USE [Test]
    GO
    /****** 对象:  StoredProcedure [dbo].[GetPageRecords]    脚本日期: 03/28/2008 11:19:21 ******/
    SET ANSI_NULLS ON
    GO
    SET QUOTED_IDENTIFIER ON
    GOCREATE PROCEDURE [dbo].[GetPageRecords]
    /*
    功能描述:通用分页存储过程,在后面有使用示例      1.支持多表查询
          2.支持自定义查询结果
          3.支持自定义多个检索条件 
          4.支持多字段任意排序 
    */
    @TableNames VARCHAR(200),    --表名,可以是多个表,但不能用别名
    @PrimaryKey VARCHAR(100),    --主键列,可以为空,但@Order为空时该值不能为空
    @Fields    VARCHAR(200),     --要取出的字段,可以是多个表的字段,可以为空,为空表示select *
    @PageSize INT,               --每页要返回的行数
    @CurrentPage INT,            --当前页,0表示第1页
    @Filter VARCHAR(200) = '',   --条件,可以为空,不用填 where
    @Group VARCHAR(200) = '',    --分组依据,可以为空,不用填 group by
    @Order VARCHAR(200) = '',     --排序,可以为空,为空默认按主键升序排列,不用填 order by
    @TotalPages int output,      --总页数
    @TotalRecords int output     --总记录数
    --@ErrorCode int output      --暂时未使用的参数,用于出错时返回错误代码,由于一些地方的异常未处理,用于改进时使用
    --@ErrorDesc nvarchar(1024) output    --暂时未使用的参数,用于出错时返回错误描述,由于一些地方的异常未处理,用于改进时使用
    AS
    BEGIN
        DECLARE @SortColumn VARCHAR(200)
        DECLARE @Operator CHAR(2)
        DECLARE @SortTable VARCHAR(200)
        DECLARE @SortName VARCHAR(200)
        IF @Fields = ''
            SET @Fields = '*'
        IF @Filter = ''
            SET @Filter = 'WHERE 1=1'
        ELSE
            SET @Filter = 'WHERE ' +  @Filter
        IF @Group <>''
            SET @Group = 'GROUP BY ' + @Group    IF @Order <> ''
        BEGIN
            DECLARE @pos1 INT, @pos2 INT
            SET @Order = REPLACE(REPLACE(@Order, ' asc', ' ASC'), ' desc', ' DESC')
            IF CHARINDEX(' DESC', @Order) > 0
                IF CHARINDEX(' ASC', @Order) > 0
                BEGIN
                    IF CHARINDEX(' DESC', @Order) < CHARINDEX(' ASC', @Order)
                        SET @Operator = '<='
                    ELSE
                        SET @Operator = '>='
                END
                ELSE
                    SET @Operator = '<='
            ELSE
                SET @Operator = '>='
            SET @SortColumn = REPLACE(REPLACE(REPLACE(@Order, ' ASC', ''), ' DESC', ''), ' ', '')
            SET @pos1 = CHARINDEX(',', @SortColumn)
            IF @pos1 > 0
                SET @SortColumn = SUBSTRING(@SortColumn, 1, @pos1-1)
            SET @pos2 = CHARINDEX('.', @SortColumn)
            IF @pos2 > 0
            BEGIN
                SET @SortTable = SUBSTRING(@SortColumn, 1, @pos2-1)
                IF @pos1 > 0 
                    SET @SortName = SUBSTRING(@SortColumn, @pos2+1, @pos1-@pos2-1)
                ELSE
                    SET @SortName = SUBSTRING(@SortColumn, @pos2+1, LEN(@SortColumn)-@pos2)
            END
            ELSE
            BEGIN
                SET @SortTable = @TableNames
                SET @SortName = @SortColumn
            END
        END
        ELSE
        BEGIN
            SET @SortColumn = @PrimaryKey
            SET @SortTable = @TableNames
            SET @SortName = @SortColumn
            SET @Order = @SortColumn
            SET @Operator = '>='
        END    DECLARE @type varchar(50)
        DECLARE @prec int
        SELECT @type=t.name, @prec=c.prec
        FROM sysobjects o 
        JOIN syscolumns c on o.id=c.id
        JOIN systypes t on c.xusertype=t.xusertype
        WHERE o.name = @SortTable AND c.name = @SortName
        IF CHARINDEX('char', @type) > 0
        SET @type = @type + '(' + CAST(@prec AS varchar) + ')'
        DECLARE @TopRows INT
        SET @TopRows = @PageSize * @CurrentPage+1
     
        DECLARE @sql nvarchar(max)
        SET @sql=N'select @rows=count(*) from ' + @TableNames + N' ' + @Filter + N' '
        EXEC sp_executesql @sql,N'@rows int output',@TotalRecords output
        SET @sql=null
        SET @TotalPages=(@TotalRecords +(@PageSize-1))/@PageSize    EXEC('
            DECLARE @SortColumnBegin ' + @type + '
            SET ROWCOUNT ' + @TopRows + '
            SELECT @SortColumnBegin=' + @SortColumn + ' FROM  ' + @TableNames + ' ' + @Filter + ' ' + @Group + ' ORDER BY ' + @Order + '
            SET ROWCOUNT ' + @PageSize + '
            SELECT ' + @Fields + ' FROM  ' + @TableNames + ' ' + @Filter  + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '    
           ')    --   --调用示例:
    --    DECLARE @TotalPages int      --总页数
    --    DECLARE @TotalRecords int    --总记录数
    ----单表/单排序
    --    EXEC GetPageRecords 'Users','UserId','UserId,UserName,UserPwd',20,0,'UserName like ''%test%''','','UserId asc',@TotalPages OUT,@TotalRecords OUT
    --    PRINT (@TotalPages)
    --    PRINT (@TotalRecords)
    ----多表表/多条件/多排序    
    --    EXEC GetPageRecords 'Users left join News on Users.UserId=News.UserId','Users.UserId','Users.*, News.*',20,0,'Users.UserId>10 and NewsKindId<4','','Users.UserId asc, News.NewsId desc',@TotalPages OUT,@TotalRecords OUT
    --    PRINT (@TotalPages)
    --    PRINT (@TotalRecords)END
      

  5.   

    其实排序有很多方法, 临时表法, set rowcount, 还有sql server2005里的 rownumber()