# 毫秒级百万数据分页存储过程[欢迎转载]

2种算法可以选择 1. 使用  BETWEEN   ;  2.  TOP  ; 代码中已经注释了.

USE [DATA_TEMP]
GO
/****** 对象:  StoredProcedure [dbo].[im531_Page]    脚本日期: 11/26/2010 10:52:35 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:		im531
-- Create date: 2010-10-25
-- Description: SQL 2005 ROW_NUMBER 分页
-- Modify Date: 2010-10-26
-- =============================================

CREATE PROCEDURE [dbo].[im531_Page]
@TabeName AS NVARCHAR(50),
@Fields AS NVARCHAR(1024),
@SearchWhere AS NVARCHAR(1024),
@OrderFields AS NVARCHAR(1024),
@pageNumber AS INT,
@page AS INT
AS
BEGIN
SET NOCOUNT ON;
DECLARE @sqlType AS TINYINT
SET @sqlType = 0  -- 0 BETWEEN   1 TOP
DECLARE @sql AS NVARCHAR(MAX)
IF @SearchWhere <> '' SET @SearchWhere = ' WHERE ' + @SearchWhere
IF @page < 2 SET @page = 1
IF @page = 1
BEGIN
SET @sql = 'SELECT TOP ' + CONVERT(NVARCHAR(20),@pageNumber) + ' ' + @Fields
+ 'FROM [' + @TabeName + '][a] WITH(NOLOCK) ' + @SearchWhere + ' ORDER BY ' + @OrderFields
END
ELSE
BEGIN
--临时表
SET @sql = ';WITH [Page_____Table] AS('
+ 'SELECT ROW_NUMBER() OVER(ORDER BY ' + @OrderFields + ') AS [RowNow],' + @Fields
+ 'FROM ['+ @TabeName +' ][a] WITH(NOLOCK) ' + @SearchWhere
+ ')'
--查找当前页面记录
IF @sqlType = 0
BEGIN
-- A USE BETWEEN
SET @sql = @sql + 'SELECT *'
+ 'FROM [Page_____Table] WITH(NOLOCK)'
+ 'WHERE [RowNow] BETWEEN ' + CONVERT(NVARCHAR(20),(@page - 1) * @pageNumber + 1) + ' AND ' + CONVERT(NVARCHAR(20),@page * @pageNumber)
+ 'ORDER BY [RowNow]'
END
ELSE
BEGIN
-- B USE TOP
SET @sql = @sql + 'SELECT TOP ' + CONVERT(NVARCHAR(20),@pageNumber) + ' *'
+ 'FROM [Page_____Table] WITH(NOLOCK)'
+ 'WHERE [RowNow] > ' + CONVERT(NVARCHAR(20),(@page - 1) * @pageNumber)
+ 'ORDER BY [RowNow]'
END
END
EXEC(@sql)
END



DECLARE @d DATETIME
SET @d = GETDATE()

DECLARE @M AS INT;DECLARE @N AS INT;DECLARE @cPage AS INT
SET @M = 50000;SET @N = 1
SET @cPage = CAST((rand()*(@M-@N)+@N) AS INT)

EXECUTE [im531_Page]
@TabeName = 'Table_1',
@Fields = '[a],[b]',
@SearchWhere = '[a] > 0',
@OrderFields = '[a] DESC',
@pageNumber = 20,
@page = @cPage

SELECT [当前页] = @cPage,[分页执行耗时间(毫秒)] = DATEDIFF(ms,@d,GETDATE())


--------------------------------------- 我是华丽的分割线 ---------------------------------------

posted @ 2010-11-26 11:11  im531  阅读(...)  评论(... 编辑 收藏