分页存储过程-01（转）
Code1
CREATE PROCEDURE CN5135_SP_Pagination2
/**//*3
***************************************************************4
** 千万数量级分页存储过程 **5
***************************************************************6
参数说明:7
1.Tables :表名称,视图8
2.PrimaryKey :主关键字9
3.Sort :排序语句，不带Order By 比如：NewsID Desc,OrderRows Asc10
4.CurrentPage :当前页码11
5.PageSize :分页尺寸12
6.Filter :过滤语句，不带Where 13
7.Group :Group语句,不带Group By14
效果演示：http://www.cn5135.com/_App/Enterprise/QueryResult.aspx15
***************************************************************/16
(17
@Tables varchar(1000),18
@PrimaryKey varchar(100),19
@Sort varchar(200) = NULL,20
@CurrentPage int = 1,21
@PageSize int = 10,22
@Fields varchar(1000) = '*',23
@Filter varchar(1000) = NULL,24
@Group varchar(1000) = NULL25
)26
AS27
/**//*默认排序*/28
IF @Sort IS NULL OR @Sort = ''29
SET @Sort = @PrimaryKey30
DECLARE @SortTable varchar(100)31
DECLARE @SortName varchar(100)32
DECLARE @strSortColumn varchar(200)33
DECLARE @operator char(2)34
DECLARE @type varchar(100)35
DECLARE @prec int36
/**//*设定排序语句.*/37
IF CHARINDEX('DESC',@Sort)>038
BEGIN39
SET @strSortColumn = REPLACE(@Sort, 'DESC', '')40
SET @operator = '<='41
END42
ELSE43
BEGIN44
IF CHARINDEX('ASC', @Sort) = 045
SET @strSortColumn = REPLACE(@Sort, 'ASC', '')46
SET @operator = '>='47
END48
IF CHARINDEX('.', @strSortColumn) > 049
BEGIN50
SET @SortTable = SUBSTRING(@strSortColumn, 0, CHARINDEX('.',@strSortColumn))51
SET @SortName = SUBSTRING(@strSortColumn, CHARINDEX('.',@strSortColumn) + 1, LEN(@strSortColumn))52
END53
ELSE54
BEGIN55
SET @SortTable = @Tables56
SET @SortName = @strSortColumn57
END58
SELECT @type=t.name, @prec=c.prec59
FROM sysobjects o 60
JOIN syscolumns c on o.id=c.id61
JOIN systypes t on c.xusertype=t.xusertype62
WHERE o.name = @SortTable AND c.name = @SortName63
IF CHARINDEX('char', @type) > 064
SET @type = @type + '(' + CAST(@prec AS varchar) + ')'65
DECLARE @strPageSize varchar(50)66
DECLARE @strStartRow varchar(50)67
DECLARE @strFilter varchar(1000)68
DECLARE @strSimpleFilter varchar(1000)69
DECLARE @strGroup varchar(1000)70
/**//*默认当前页*/71
IF @CurrentPage < 172
SET @CurrentPage = 173
/**//*设置分页参数.*/74
SET @strPageSize = CAST(@PageSize AS varchar(50))75
SET @strStartRow = CAST(((@CurrentPage - 1)*@PageSize + 1) AS varchar(50))76
/**//*筛选以及分组语句.*/77
IF @Filter IS NOT NULL AND @Filter != ''78
BEGIN79
SET @strFilter = ' WHERE ' + @Filter + ' '80
SET @strSimpleFilter = ' AND ' + @Filter + ' '81
END82
ELSE83
BEGIN84
SET @strSimpleFilter = ''85
SET @strFilter = ''86
END87
IF @Group IS NOT NULL AND @Group != ''88
SET @strGroup = ' GROUP BY ' + @Group + ' '89
ELSE90
SET @strGroup = ''91
/**//*执行查询语句*/92
EXEC(93
'94
DECLARE @SortColumn ' + @type + '95
SET ROWCOUNT ' + @strStartRow + '96
SELECT @SortColumn=' + @strSortColumn + ' FROM ' + @Tables + @strFilter + ' ' + @strGroup + ' ORDER BY ' + @Sort + '97
SET ROWCOUNT ' + @strPageSize + '98
SELECT ' + @Fields + ' FROM ' + @Tables + ' WHERE ' + @strSortColumn + @operator + ' @SortColumn ' + @strSimpleFilter + ' ' + @strGroup + ' ORDER BY ' + @Sort + '99
'100
)101
GO102
原帖地址：http://www.qqgb.com/DataDB/MSSQL/sqlMemory/DataDB_116338.html
