通用的SQL Server数据库查询分页存储过程

基于web的应用程序，经常要执行返回大量数据的查询。ASP.Net的DataGrid或者GridView自带的分页功能虽然简单，但是并不适用于对性能和负载要求较高的应用场合。我们希望仅从数据库返回1页的数据给web客户端，而不是返回10000条数据只显示给用户20条。

网络上有大量分页查询存储过程的资源，本人也搜集了一些。现将本人认为最具有通用性、易用性的一个版本帖出来，与大家分享。

Code：

/*
使用说明：本存储过程可用于单表查询，或多表连接查询。支持的查询对象包括表、视图、自定义表值函数。
返回结果集：1）指定页的记录数量；2）记录总数
示例：
多表连接：
exec [UP_ListPaging]
'Customers inner join Orders on Customers.CustomerID=Orders.CustomerID',
'Orders.OrderID','Customers.CompanyName,Orders.*',20,0,
'Customers.CustomerID=''ROMEY''','','Customers.CompanyName asc'
单表查询：
exec [UP_ListPaging]
'Customers',
'CustomerID','',20,0,
'CompanyName>=''ROMEY''','','Customers.CompanyName asc'

表与表函数连接查询：
exec [UP_ListPaging]
'Customers inner join fn_GetOrdersByCustomer(''SUPRD'') on Customers.CustomerID=fn_GetOrdersByCustomer.CustomerID',
'fn_GetOrdersByCustomer.OrderID','Customers.CompanyName,fn_GetOrdersByCustomer.*',20,0,
'','','Customers.CompanyName asc'

*/

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

ALTER PROCEDURE [dbo].[UP_ListPaging]

@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

declare @SQL nvarchar(4000)

set @SQL = ''
set @SQL = @SQL + ' DECLARE @SortColumnBegin ' + @type
set @SQL = @SQL + ' SET ROWCOUNT ' + cast(@TopRows as varchar(10))
set @SQL = @SQL + ' SELECT @SortColumnBegin=' + @SortColumn
+ ' FROM ' + @TableNames + ' ' + @Filter + ' '
+ @Group + ' ORDER BY ' + @Order

set @SQL = @SQL + ' SET ROWCOUNT ' + cast(@PageSize as varchar(10))
set @SQL = @SQL + ' SELECT ' + @Fields + ' FROM ' + @TableNames + ' '
+ @Filter + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin '
+ @Group + ' ORDER BY ' + @Order

set @SQL = @SQL +
' SELECT COUNT(1) as num FROM '
+ @TableNames + ' ' + @Filter
+ @Group

print @SQL
exec (@SQL)

END
GO

SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/13651903/viewspace-1013869/，如需转载，请注明出处，否则将追究法律责任。