毫秒级百万数据分页存储过程

USE [DATA_TEMP]
02 GO
03 /****** 对象:  StoredProcedure [dbo].[im531_Page]    脚本日期: 11/26/2010 10:52:35 ******/
04 SET ANSI_NULLS ON
05 GO
06 SET QUOTED_IDENTIFIER ON
07 GO
08   
09 -- =============================================
10 -- Author:      im531 
11 -- Create date: 2010-10-25
12 -- Description: SQL 2005 ROW_NUMBER 分页
13 -- Modify Date: 2010-10-26
14 -- =============================================
15   
16 CREATE PROCEDURE [dbo].[im531_Page]
17     @TabeName AS NVARCHAR(50),
18     @Fields AS NVARCHAR(1024),
19     @SearchWhere AS NVARCHAR(1024),
20     @OrderFields AS NVARCHAR(1024),
21     @pageNumber AS INT,
22     @page AS INT
23 AS
24 BEGIN
25     SET NOCOUNT ON;
26     DECLARE @sqlType AS TINYINT
27     SET @sqlType = 0  -- 0 BETWEEN   1 TOP
28     DECLARE @sql AS NVARCHAR(MAX)
29     IF @SearchWhere <> '' SET @SearchWhere = ' WHERE ' + @SearchWhere
30     IF @page < 2 SET @page = 1
31     IF @page = 1
32         BEGIN
33             SET @sql = 'SELECT TOP ' + CONVERT(NVARCHAR(20),@pageNumber) + ' ' + @Fields
34                 + 'FROM [' + @TabeName + '][a] WITH(NOLOCK) ' + @SearchWhere + ' ORDER BY ' + @OrderFields
35         END
36     ELSE
37         BEGIN
38             --临时表
39             SET @sql = ';WITH [Page_____Table] AS('
40                 + 'SELECT ROW_NUMBER() OVER(ORDER BY ' + @OrderFields + ') AS [RowNow],' + @Fields
41                 + 'FROM ['+ @TabeName +' ][a] WITH(NOLOCK) ' + @SearchWhere
42                 + ')'
43             --查找当前页面记录
44             IF @sqlType = 0
45                 BEGIN
46                 -- A USE BETWEEN
47                     SET @sql = @sql + 'SELECT *'
48                         + 'FROM [Page_____Table] WITH(NOLOCK)'
49                         + 'WHERE [RowNow] BETWEEN ' + CONVERT(NVARCHAR(20),(@page - 1) * @pageNumber + 1) + ' AND ' + CONVERT(NVARCHAR(20),@page * @pageNumber)
50                         + 'ORDER BY [RowNow]'
51                 END
52             ELSE
53                 BEGIN
54                 -- B USE TOP
55                     SET @sql = @sql + 'SELECT TOP ' + CONVERT(NVARCHAR(20),@pageNumber) + ' *'
56                         + 'FROM [Page_____Table] WITH(NOLOCK)'
57                         + 'WHERE [RowNow] > ' + CONVERT(NVARCHAR(20),(@page - 1) * @pageNumber)
58                         + 'ORDER BY [RowNow]'
59                 END
60         END
61     EXEC(@sql)
62 END

 

 

然后测试分页性能;每页显示20条记录, 百万数据最大50000页,当前页采用随机数取值;

 

01 DECLARE @d DATETIME
02 SET @d = GETDATE()
03   
04 DECLARE @M AS INT;DECLARE @N AS INT;DECLARE @cPage AS INT
05 SET @M = 50000;SET @N = 1
06 SET @cPage = CAST((rand()*(@M-@N)+@N) AS INT)
07   
08 EXECUTE [im531_Page]
09     @TabeName = 'Table_1',
10     @Fields = '[a],[b]',
11     @SearchWhere = '[a] > 0',
12     @OrderFields = '[a] DESC',
13     @pageNumber = 20,
14     @page = @cPage
15   
16   
17 SELECT [当前页] = @cPage,[分页执行耗时间(毫秒)] = DATEDIFF(ms,@d,GETDATE())

 

在我的机器上面测试均为毫秒级!!!!

posted @ 2010-11-26 12:34  郭小俊  阅读(138)  评论(0编辑  收藏  举报