`
weimou66
  • 浏览: 1236549 次
文章分类
社区版块
存档分类
最新评论

--TOP n 实现的通用分页存储过程(转自邹建)

 
阅读更多
--TOP n 实现的通用分页存储过程(转自邹建)
CREATE PROC sp_PageView
@tbname sysname, --要分页显示的表名
@FieldKey nvarchar(1000), --用于定位记录的主键(惟一键)字段,可以是逗号分隔的多个字段
@PageCurrent int=1, --要显示的页码
@PageSize int=10, --每页的大小(记录数)
@FieldShow nvarchar(1000)='', --以逗号分隔的要显示的字段列表,如果不指定,则显示所有字段
@FieldOrder nvarchar(1000)='', --以逗号分隔的排序字段列表,可以指定在字段后面指定DESC/ASC
用于指定排序顺序
@Where nvarchar(1000)='', --查询条件
@PageCount int OUTPUT --总页数
AS
SET NOCOUNT ON
--检查对象是否有效
IF OBJECT_ID(@tbname) IS NULL
BEGIN
RAISERROR(N'对象"%s"不存在',1,16,@tbname)
RETURN
END
IF OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTable')=0
AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsView')=0
AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTableFunction')=0
BEGIN
RAISERROR(N'"%s"不是表、视图或者表值函数',1,16,@tbname)
RETURN
END

--分页字段检查
IF ISNULL(@FieldKey,N'')=''
BEGIN
RAISERROR(N'分页处理需要主键(或者惟一键)',1,16)
RETURN
END

--其他参数检查及规范
IF ISNULL(@PageCurrent,0)<1 SET @PageCurrent=1
IF ISNULL(@PageSize,0)<1 SET @PageSize=10
IF ISNULL(@FieldShow,N'')=N'' SET @FieldShow=N'*'
IF ISNULL(@FieldOrder,N'')=N''
SET @FieldOrder=N''
ELSE
SET @FieldOrder=N'ORDER BY '+LTRIM(@FieldOrder)
IF ISNULL(@Where,N'')=N''
SET @Where=N''
ELSE
SET @Where=N'WHERE ('+@Where+N')'

--如果@PageCount为NULL值,则计算总页数(这样设计可以只在第一次计算总页数,以后调用时,把总页数传回给存储过程,避免再次计算总页数,对于不想计算总页数的处理而言,可以给@PageCount赋值)
IF @PageCount IS NULL
BEGIN
DECLARE @sql nvarchar(4000)
SET @sql=N'SELECT @PageCount=COUNT(*)'
+N' FROM '+@tbname
+N' '+@Where
EXEC sp_executesql @sql,N'@PageCount int OUTPUT',@PageCount OUTPUT
SET @PageCount=(@PageCount+@PageSize-1)/@PageSize
END

--计算分页显示的TOPN值
DECLARE @TopN varchar(20),@TopN1 varchar(20)
SELECT @TopN=@PageSize,
@TopN1=(@PageCurrent-1)*@PageSize

--第一页直接显示
IF @PageCurrent=1
EXEC(N'SELECT TOP '+@TopN
+N' '+@FieldShow
+N' FROM '+@tbname
+N' '+@Where
+N' '+@FieldOrder)
ELSE
BEGIN
--处理别名
IF @FieldShow=N'*'
SET @FieldShow=N'a.*'

--生成主键(惟一键)处理条件
DECLARE @Where1 nvarchar(4000),@Where2 nvarchar(4000),
@s nvarchar(1000),@Field sysname
SELECT @Where1=N'',@Where2=N'',@s=@FieldKey
WHILE CHARINDEX(N',',@s)>0
SELECT @Field=LEFT(@s,CHARINDEX(N',',@s)-1),
@s=STUFF(@s,1,CHARINDEX(N',',@s),N''),
@Where1=@Where1+N' AND a.'+@Field+N'=b.'+@Field,
@Where2=@Where2+N' AND b.'+@Field+N' IS NULL',
@Where=REPLACE(@Where,@Field,N'a.'+@Field),
@FieldOrder=REPLACE(@FieldOrder,@Field,N'a.'+@Field),
@FieldShow=REPLACE(@FieldShow,@Field,N'a.'+@Field)
SELECT @Where=REPLACE(@Where,@s,N'a.'+@s),
@FieldOrder=REPLACE(@FieldOrder,@s,N'a.'+@s),
@FieldShow=REPLACE(@FieldShow,@s,N'a.'+@s),
@Where1=STUFF(@Where1+N' AND a.'+@s+N'=b.'+@s,1,5,N''),
@Where2=CASE
WHEN @Where='' THEN N'WHERE ('
ELSE @Where+N' AND ('
END+N'b.'+@s+N' IS NULL'+@Where2+N')'

--执行查询
EXEC(N'SELECT TOP '+@TopN
+N' '+@FieldShow
+N' FROM '+@tbname
+N' a LEFT JOIN(SELECT TOP '+@TopN1
+N' '+@FieldKey
+N' FROM '+@tbname
+N' a '+@Where
+N' '+@FieldOrder
+N')b ON '+@Where1
+N' '+@Where2
+N' '+@FieldOrder)
END
分享到:
评论

相关推荐

    两个分页存储过程的效率比较

    两个分页存储过程的效率比较 详细的比较两个分页存储过程

    邹建的分页存储过程改了一下

    邹建的分页存储过程–改了一下 因为邹建的分页存储过程不能返回记录总数,所以每次分页还又要统计一次,所以自己在里面加了个返回记录数,这下就好用了。 @iPageCount int OUTPUT –定义输出变量,放在@QueryStr...

    邹建 -《中文版SQL Server2000开发与管理应用实例》书的实例完全源代码

    邹建 -《中文版SQL Server2000开发与管理应用实例》书的实例完全源代码

    分页 SQLServer存储过程

    /*–用存储过程实现的分页程序 显示指定表、视图、查询结果的第X页 对于表中主键或标识列的情况,直接从原表取数查询,其它情况使用临时表的方法 如果视图或查询结果中有主键,不推荐此方法 –邹建 2003.09–*/ /*–...

    邹建 - 中文版SQL SERVER 2000开发与管理应用实例 1

    邹建老师写的《中文版SQL SERVER 2000开发与管理应用实例》。邹健的大名,应该都知道的吧。这本书不怎么清晰,想看清晰的,还是买一下他的书吧。也是对别人劳动的尊重。

    邹建大大笔记-sqlserver2000.rar

    邹建-中文版SQL Server2000开发与管理应用实例 一书的目录,可以对照一下 第 1 章 安装和配置SQL Server 1 1.1 SQL Server的版本和版本选择 1 1.2 安装SQL Server的常见问题 3 1.3 如何理解实例 5 ...

    sql server存储过程导出数据到Access文件

    sql server存储过程导出数据到Access文件 原版来源于邹建版本,稍有修改 sql server存储过程导出数据到Access文件

    SQLServer2000邹建开发实例脚本

    csdn sql server版块超级大版主的开发实例,共15章,包括安装和配置SQL Server、日期处理、字符处理、排序规则、编号处理、数据统计与汇总、分页处理、树形数据处理、数据导入与导出、作业、数据备份与还原。

    sql全角半角

    转换说明 全角字符从的unicode编码从65281~65374 半角字符从的unicode编码从 33~126 空格比较特殊,全角为 12288,半角为 32 而且除空格外,全角/半角按unicode编码排序在顺序...--邹建 2005.01(引用请保留此信息)--*/

    SQL SERVER 2000开发与管理应用实例

    7.2.1 使用TOP N实现分页 207 7.2.2 使用字符串 211 7.2.3 使用临时表 213 7.2.4 使用SQL Server的系统存储过程处理分页 216 7.3 特殊要求的分页处理 217 7.3.1 随机显示的分页处理 217 7.3.2 ...

    (邹建)中文版+SQL+Server+2000+开发与管理应用实例.源码.rar

    (邹建)中文版+SQL+Server+2000+开发与管理应用实例.源码.rar

    sql server 死锁处理

    很多朋友都遇到过sql死锁问题,本文档就是关于如何解决死锁问题的

    SQL Server 2005中文版关系数据库基础与实践教程

    这是一个很好的数据库课件,很全面,而且有很多实在的例子,是初学者的最好助手。

    sql处理数据库锁的存储过程分享

    邹建 2004.4 代码如下: /*–调用示例 exec p_lockinfo1 –*/ alter proc p_lockinfo1 @kill_lock_spid bit=1, –是否杀掉死锁的进程,1 杀掉, 0 仅显示 @show_spid_if_nolock bit=1 –如果没有死锁的进程,是否显示...

    溅射工艺对晶片碎片的影响

    关键词:溅射:辉光放电:溅射沉积功率中图分类号:TN305.92 文献标识码:A 文章编号:1003-353X(2004)04-0019-021 引言在半导体晶片制造过程中,一个重要的工序环节就是金属薄膜沉积,该工艺是作为电路引线用。...

    Server2000开发与管理应用实例[电子书_Part2]

    csdn sql 版主 邹建 编 你能找到这,不用我详细说明了吧 里面有3个文件 1.Server2000开发与管理应用实例.pdf 2.SQLServer2000开发,管理与应用实例(对应书的代码) 3.深入浅出SQL Server 2005开发,管理与应用实例(这...

    Server2000开发与管理应用实例[电子书_Part3]

    csdn sql 版主 邹建 编 你能找到这,不用我详细说明了吧 里面有3个文件 1.Server2000开发与管理应用实例.pdf 2.SQLServer2000开发,管理与应用实例(对应书的代码) 3.深入浅出SQL Server 2005开发,管理与应用实例(这...

    Server2000开发与管理应用实例[电子书_Part1]

    csdn sql 版主 邹建 编 你能找到这,不用我详细说明了吧 里面有3个文件 1.Server2000开发与管理应用实例.pdf 2.SQLServer2000开发,管理与应用实例(对应书的代码) 3.深入浅出SQL Server 2005开发,管理与应用实例(这...

    解决字符长度8000限制

    解决字符长度8000限制 作者: 邹建 经常有人提到,用动态生成SQL语句的方法处理数据时,处理语句超长,无法处理的问题

    SQL Server2000开发与管理应用实例源代码

    这是这本书配套的源代码,超级详细的!可以拿来直接看效果

Global site tag (gtag.js) - Google Analytics