通用存储过程代码实现高效分页

2008-12-16

1. DECLARE @rows_per_page AS INTEGER
2. DECLARE @current_page AS INTEGER
3. DECLARE @total_pages AS INTEGER
4. DECLARE @start_item AS INTEGER
5. DECLARE @items_count AS INTEGER
6. -- 设置每页的行数
7. SET @rows_per_page = 10
8. -- 设置要显示的页号(从1开始)
9. SET @current_page = 3
10. SELECT @total_pages = COUNT(*) / @rows_per_page + 1,
11.  @items_count= COUNT(*) 
12.  FROM BarefootIndex;--表名（这是修改的地方）
13. --计算此页中从第几个开始显示
14. SET @start_item = @rows_per_page * (@current_page - 1)
15. select * from 
16. (
17.  select ROW_NUMBER() OVER (order by ID) as item--用什么排序(返回正在显示第几条)
18.   ,@items_count AS items_count --一共有多少条
19.   ,@current_page AS current_page  --当前页
20.   ,@total_pages AS total_pages --一共多少页
21.   ,* from BarefootIndex--表名（这是修改的地方）
22. ) as T 
23. where T.item >= @start_item + 1 
24. AND T.item <= @start_item + @rows_per_page 

2007-5-5 15:52:00

-- 获取指定页的数据 
CREATE PROCEDURE pagination
@tblName varchar(255), -- 表名 
@strGetFields varchar(1000) = '*', -- 需要返回的列 
@fldName varchar(255)='', -- 排序的字段名 
@PageSize int = 10, -- 页尺寸 
@PageIndex int = 1, -- 页码 
@doCount bit = 0, -- 返回记录总数, 非 0 值则返回 
@OrderType bit = 0, -- 设置排序类型, 非 0 值则降序 
@strWhere varchar(1500) = '' -- 查询条件 (注意: 不要加 where) 
AS 

declare @strSQL varchar(5000) -- 主语句 
declare @strTmp varchar(110) -- 临时变量 
declare @strOrder varchar(400) -- 排序类型 
if @doCount != 0 
begin 
if @strWhere !='' 
set @strSQL = "select count(*) as Total from [" + @tblName + "] where "+@strWhere 
else 
set @strSQL = "select count(*) as Total from [" + @tblName + "]" 
end 
--以上代码的意思是如果@doCount传递过来的不是0，就执行总数统计。以下的所有代码都是@doCount为0的情况 

else 
begin 
if @OrderType != 0 
begin 
set @strTmp = "<(select min" 
set @strOrder = " order by [" + @fldName +"] desc" 
--如果@OrderType不是0，就执行降序，这句很重要！ 
end 

else 
begin 
set @strTmp = ">(select max" 
set @strOrder = " order by [" + @fldName +"] asc" 
end 
if @PageIndex = 1 
begin 
if @strWhere != '' 
set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from [" + @tblName + "] where " + @strWhere + " " + @strOrder 
else 
set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from ["+ @tblName + "] "+ @strOrder 
--如果是第一页就执行以上代码，这样会加快执行速度 
end 

else 
begin 
--以下代码赋予了@strSQL以真正执行的SQL代码 
set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from [" 
+ @tblName + "] where [" + @fldName + "]" + @strTmp + "(["+ @fldName + "]) from (select top " + str((@PageIndex-1)*@PageSize) + " ["+ @fldName + "] from [" + @tblName + "]" + @strOrder + ") as tblTmp)"+ @strOrder 
if @strWhere != '' 
set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from [" 
+ @tblName + "] where [" + @fldName + "]" + @strTmp + "([" 
+ @fldName + "]) from (select top " + str((@PageIndex-1)*@PageSize) + " [" 
+ @fldName + "] from [" + @tblName + "] where " + @strWhere + " " 
+ @strOrder + ") as tblTmp) and " + @strWhere + " " + @strOrder 
end 
end 
exec (@strSQL)
GO