对于大数据量的数据显示,如果一次性绑定所有的数据,效率问题就会比较突出。本人平时在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
描述: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