在 CYQ.Data 分页是内部集成的功能,针对不同的数据库,使用不同的分页形式。
1:Access:集成:使用3次Top分页
2:MySql:集成,使用LimitN分页
3:Sqlite:集成,使用LimitN分页
4:Sql2000:外置存储过程,使用临时表方式分页
5:Sql2005:外置存储过程,使用ROW_NUMBER方式分页
6:Oracle:外置存储过程,使用RowNum方式分页
下面是三种不同存储过程代码:
1:CYQ.Data 数据框架在 SQL2000的
分页存储过程的代码:
create procedure SelectBase
@PageIndex int,
@PageSize int,
@TableName nvarchar(4000),
@Where nvarchar(2000)=''
as
Declare @rowcount int
Declare @intStart int
Declare @intEnd int
declare @Column1 varchar(32) --第一列名称
Declare @Sql nvarchar(2000), @WhereR nvarchar(1000), @OrderBy
nvarchar(1000)
set @rowcount=0
set nocount on
if @Where''
begin
set @Where=' and '+@Where
end
if CHARINDEX('order by', @Where)0
begin
set @WhereR=substring(@Where, 1, CHARINDEX('order
by',@Where)-1)--取得条件
set @OrderBy=substring(@Where, CHARINDEX('order by',@Where),
Len(@Where))--取得排序方式(order by 字段 方式)
end
else
begin
set @WhereR=@Where
set @OrderBy=' order by id asc'
end
set @Sql='SELECT @rowcount=count(*) from '+cast(@TableName as
varchar(4000))+' where 1=1 '+@WhereR
exec sp_executeSql @Sql,N'@rowcount int output',@rowcount
output
if @PageIndex=0 and @PageSize=0--不进行分页,查询所有数据列表
begin
set @Sql='SELECT * from '+cast(@TableName as varchar(4000))+' where
1=1 '+@Where
end
else--进行分页查询数据列表
begin
set @intStart=(@PageIndex-1)*@PageSize+1;
set @intEnd=@intStart+@PageSize-1
set @Column1=col_name(object_id(@tableName),1) --设置第一列名称
if @Column1 is null begin set @Column1='ID' end --设置默认为ID列
set @Sql='Create table #tem(tempID int identity(1,1) not null,Row
int) '
set @Sql=@Sql+'insert #tem(Row) select '+@Column1+' from
'+@TableName+' where 1=1 '+@Where
set @Sql=@Sql+' select * from '+@TableName+' left join #tem on
'+@Column1+'=#tem.Row '
set @Sql=@Sql+' where #tem.tempID between '+cast(@intStart as
varchar)+' and '+cast(@intEnd as varchar)
end
exec sp_executeSql @Sql
return @rowcount
set nocount off
GO
Tip:
最近有使用
SQL2000的网友在分页上出了点问题,经过重重排查,竟然是由于分页里的注释代码引起的。
所以,使用此分页存储过程的网友注意一下,如果有问题,请把注释删除。
2:CYQ.Data
数据框架在 SQL2005的
分页存储过程的代码:
Create procedure [SelectBase]
@PageIndex int,
@PageSize int,
@TableName nvarchar(4000),
@Where nvarchar(max)=''
as
Declare @rowcount int
Declare @intStart int
Declare @intEnd int
Declare @SQl nvarchar(max), @WhereR nvarchar(max), @OrderBy
nvarchar(max)
set @rowcount=0
set nocount on
if @Where''
begin
set @Where=' and '+@Where
end
if CHARINDEX('order by', @Where)0
begin
set @WhereR=substring(@Where, 1, CHARINDEX('order
by',@Where)-1)--取得条件
set @OrderBy=substring(@Where, CHARINDEX('order by',@Where),
Len(@Where))--取得排序方式(order by 字段 方式)
end
else
begin
set @WhereR=@Where
set @OrderBy=' order by id asc'
end
set @SQl='SELECT @rowcount=count(*) from '+cast(@TableName as
varchar(4000))+' where 1=1 '+@WhereR
exec sp_executeSql @SQl,N'@rowcount int output',@rowcount
output
if @PageIndex=0 and @PageSize=0--不进行分页,查询所有数据列表
begin
set @SQl='SELECT * from '+cast(@TableName as varchar(4000))+' where
1=1 '+@Where
end
else--进行分页查询数据列表
begin
set @intStart=(@PageIndex-1)*@PageSize+1;
set @intEnd=@intStart+@PageSize-1
set @SQl='select * from(select *,ROW_NUMBER() OVER('+cast(@OrderBy
as nvarchar(400))+') as row from '
set @SQl=@SQL+@TableName+' where 1=1 '+@WhereR+') as a where row
between '+cast(@intStart as varchar)+' and '+cast(@intEnd as
varchar)
end
exec sp_executeSql @SQl
return @rowcount
set nocount off
3:Oracle 的分页存储过程代码
这里就不贴了,见帖子:折腾Oracle问题小菜记[分页存储过程/查询所有表、视图、存储过程/查询表、视图、存储过程字段结构与参数](三)