数据库

本类阅读TOP10

·SQL语句导入导出大全
·SQL Server日期计算
·SQL语句导入导出大全
·SQL to Excel 的应用
·Oracle中password file的作用及说明
·MS SQLServer OLEDB分布式事务无法启动的一般解决方案
·sqlserver2000数据库置疑的解决方法
·一个比较实用的大数据量分页存储过程
·如何在正运行 SQL Server 7.0 的服务器之间传输登录和密码
·SQL中两台服务器间使用连接服务器

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
一个比较实用的大数据量分页存储过程

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

create proc sp_PublicTurnPageWebSite(
 @TBName  nvarchar(100)='', --表名,如 pinyin
 @PageSize int=10,   --每页的记录数,默认为 10
 @CurPage int=1,   --表示当前页 1
 @KeyField nvarchar(100)='ID', --关键字段名,默认为 ID,该字段要求是表中的索引 或 无重复和不为空的字段
 @KeyAscDesc nvarchar(4)='ASC', --关键字的升、降序,默认为升序 ASC , 降序为 DESC
 @Fields  nvarchar(500)='*', --所选择的列名,默认为全选
 @Condition nvarchar(200)='', --where 条件,默认为空
 @Order  nvarchar(200)='' --排序条件,默认为空
) with encryption as
 if @TBName = ''
    begin
        raiserror('请指定表名!',11,1)
        return
    end
 if @PageSize <=0 or @CurPage <0
    begin
        raiserror('当前页数和每页的记录数都必须大于零!',11,1)
        return
    end
 if @KeyAscDesc = 'DESC'
  set @KeyAscDesc = '<'
 else
  set @KeyAscDesc = '>'
 if @Condition <> ''
  set @Condition = ' where ' + @Condition
 declare @SQL nvarchar(2000)

 set @SQL = ''
 if @CurPage = 1
    set @SQL = @SQL + 'SELECT Top ' + cast(@PageSize as nvarchar(20)) + ' ' + @Fields + ' FROM ' + @TBName + @Condition + ' ' + @Order
 else
    begin
  declare @iTopNum int
  set @iTopNum = @PageSize * (@CurPage - 1)
  set @SQL = @SQL + 'declare @sLastValue nvarchar(100)' + char(13)
  set @SQL = @SQL + 'SELECT Top ' + cast(@iTopNum as nvarchar(20)) + ' @sLastValue=' + @KeyField + ' FROM ' + @TBName + @Condition + ' ' + @Order + char(13)
  
  declare @Condition2 nvarchar(200)
  if @Condition = ''
     set @Condition2 = ' where ' + @KeyField + @KeyAscDesc + '@sLastValue '
  else
     set @Condition2 = ' and ' + @KeyField + @KeyAscDesc + '@sLastValue '
  set @SQL = @SQL + 'SELECT Top ' + cast(@PageSize as nvarchar(20)) + ' ' + @Fields + ' FROM ' + @TBName + @Condition + @Condition2 + @Order
    end
 EXECUTE sp_executesql @SQL




相关文章

相关软件