实现千万级数据的分页显示！

实现千万级数据的分页显示！

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

declare @strSQL varchar(6000) -- 主语句
declare @strTmp varchar(100) -- 临时变量
declare @strOrder varchar(400) -- 排序类型

if @OrderType != 0
begin
set @strTmp = "<(select min"
set @strOrder = " order by [" + @fldName +"] desc"
end
else
begin
set @strTmp = ">(select max"
set @strOrder = " order by [" + @fldName +"] asc"
end

set @strSQL = "select top " + str(@PageSize) + " * 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) + " * from ["
+ @tblName + "] where [" + @fldName + "]" + @strTmp + "(["
+ @fldName + "]) from (select top " + str((@PageIndex-1)*@PageSize) + " ["
+ @fldName + "] from [" + @tblName + "] where " + @strWhere + " "
+ @strOrder + ") as tblTmp) and " + @strWhere + " " + @strOrder

if @PageIndex = 1
begin
set @strTmp = ""
if @strWhere != ''
set @strTmp = " where " + @strWhere

set @strSQL = "select top " + str(@PageSize) + " * from ["
+ @tblName + "]" + @strTmp + " " + @strOrder
end

if @IsCount != 0
set @strSQL = "select count(*) as Total from [" + @tblName + "]"

exec (@strSQL)

GO

发表于 2004年07月04日 2:58 PM

评论

# 回复：实现上千万条数据的分页显示！ 2004-07-05 2:17 PM 飞扬
呵呵，好思路，
但是当@fldName指定的字段有重复相同值会会有漏或多的可能性吧



# 实现上千万条数据的分页显示！ 2004-07-05 2:27 PM 铁拳
摘要里面说到了，如果对 @fldName 建立索引之后速度会稳定很多。



# 回复：实现上千万条数据的分页显示！ 2004-07-05 4:41 PM 超级大笨狼
如果在本页上加上多个搜索条件，再分页，不知怎么做？



# 实现上千万条数据的分页显示！ 2004-07-05 4:52 PM 铁拳
在条件中的字段都有索引的情况下可以使用这样的语法：

exec GetRecordFromPage news,newsid,10,100000,0,1,'newsid>10000 and hits>100 and author=''铁拳'''

注意字符串要加两个单引号。



# 回复：实现上千万条数据的分页显示！ 2004-07-09 11:29 AM grief
历害，学习。。。。



# 回复：实现上千万条数据的分页显示！ 2004-07-09 11:33 AM Paradox
很有启发性.请问如果我要返回表中的指定某些列,而不是全部列.那么怎样修改这个SP比较合理?



# 实现千万级数据的分页显示！ 2004-07-09 12:34 PM 铁拳
把 SP 再增加一个参数
@strGotFields varchar(1000) = '*' -- 需要返回的列
然后把 @strSQL 中的 * 处改为 @strGotFields 即可，记得之间的空格，调用时如下：
exec GetRecordFromPage news,newsid,10,100000,0,1,'newsid>10000 and hits>100 and author=''铁拳''','newsid'



# 实现千万级数据的分页显示！ 2004-07-09 12:35 PM 铁拳
如果有多个列的话就用逗号隔开。



# 回复：实现千万级数据的分页显示！ 2004-07-09 1:21 PM grief
我给改造成了ASP的函数了，呵呵
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'分页SQL语句生成代码
Function GetPageSQL(tblName,fldName,PageSize,PageIndex,OrderType,strWhere)
Dim strTemp,strSQL,strOrder

'根据排序方式生成相关代码
if OrderType=0 then
strTemp=">(select max([" & fldName & "])"
strOrder=" order by [" & fldName & "] asc"
else
strTemp="<(select min([" & fldName & "])"
strOrder=" order by [" & fldName & "] desc"
end if

'若是第1页则无须复杂的语句
if PageIndex=1 then
strTemp=""
if strWhere<>"" then
strTmp = " where " + strWhere
end if
strSQL = "select top " & PageSize & " * from [" & tblName & "]" & strTmp & strOrder
else '若不是第1页，构造SQL语句
strSQL="select top " & PageSize & " * from [" & tblName & "] where [" & fldName & "]" & strTemp & _
" from (select top " & (PageIndex-1)*PageSize & " [" & fldName & "] from [" & tblName & "]"
if strWhere<>"" then
strSQL=strSQL & " where " & strWhere
end if
strSQL=strSQL & strOrder & ") as tblTemp)"
if strWhere<>"" then
strSQL=strSQL & " And " & strWhere
end if
strSQL=strSQL & strOrder
end if
GetPageSQL=strSQL '返回SQL语句
End Function
response.write(GetPageSQL("message","messageid",10,1,0,""))
%>



# 回复：实现千万级数据的分页显示！ 2004-07-09 1:40 PM 毒药
拳头，我想模仿你（实际上照抄）blog上的字跟着光标移动，没成功！

（羞愧ing）



# 回复：实现千万级数据的分页显示！ 2004-07-10 9:59 AM BOMB
厉害，学习ing



# 回复：实现千万级数据的分页显示！ 2004-07-10 2:19 PM 铁拳
to 毒药，请见：
http://blog.csdn.net/sun_jianhua/archive/2004/07/09/37931.aspx