分页存储过程

 对于大数据量的数据显示，如果一次性绑定所有的数据，效率问题就会比较突出。本人平时在ASP.NET开发过程中,常采用上述分页存储过程，与AspnetPager分页控件一起使用，效果还不错。

/**/ /***************************************************************************
描述：1.支持多表查询 2.支持任意排序 3.不支持表别名
　　　参考了evafly920:[分享]千万数量级分页存储过程（效果演示）
　　　地址：http://blog.csdn.net/evafly920/archive/2006/03/03/614813.aspx 
修改人:zcy
修改日期:

IF(EXISTS(SELECT * FROM sysobjects WHERE [id]=OBJECT_ID('sp_GetRecordsByPage') AND xtype='P'))
    DROP PROCEDURE sp_GetRecordsByPage
******************************************************************************/
ALTER         PROCEDURE  sp_GetRecordsByPage
@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
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 )  +   1
     print   @TopRows
     print   @Operator     
     EXEC ( '
        DECLARE @SortColumnBegin  '   +   @type   +   '
        SET ROWCOUNT  '   +   @TopRows   +   '
        SELECT @SortColumnBegin= '   +   @SortColumn   +   '  FROM   '   +   @TableNames   +   '   '   +   @Filter   +   '  AND  '   +   @SortColumn   +   '  IS NOT NULL  '   +   @Group   +   '  ORDER BY  '   +   @Order   +   '
        SET ROWCOUNT  '   +   @PageSize   +   '
        SELECT  '   +   @Fields   +   '  FROM   '   +   @TableNames   +   '   '   +   @Filter    +   '  AND  '   +   @SortColumn   +   ''   +   @Operator   +   ' @SortColumnBegin  '   +   @Group   +   '  ORDER BY  '   +   @Order   +   '     
     ' )

-- --------------------------------------------------------------------------------------------------------
/**/ /*    DECLARE @sql varchar(1000)
     SET @sql='
        DECLARE @SortColumnBegin ' + @type + '
        SELECT @SortColumnBegin=' + @SortColumn + ' FROM  ' + @TableNames + ' ' + @Filter + ' ' + @Group + ' ORDER BY ' + @Order + '
        SELECT ' + @Fields + ' FROM  ' + @TableNames + ' ' + @Filter  + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '    
    '
    PRINT @sql
*/
-- -------------------------------------------------------------------------------------------------------------
END