·您的位置: 首页 » 资源教程 » 编程开发 » ASP » 通用分页的存储过程函数

通用分页的存储过程函数

类别: ASP教程  评论数:0 总得分:0
ALTER 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 --如果@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

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)
-= 资 源 教 程 =-
文 章 搜 索
关键词:
类型:
范围:
纯粹空间 softpure.com
Copyright © 2006-2008 暖阳制作 版权所有
QQ: 15242663 (拒绝闲聊)  Email: faisun@sina.com
 纯粹空间 - 韩国酷站|酷站欣赏|教程大全|资源下载|免费博客|美女壁纸|设计素材|技术论坛   Valid XHTML 1.0 Transitional
百度搜索 谷歌搜索 Alexa搜索 | 粤ICP备19116064号-1