CYQ.Data 数据框架数据库分页方式及存储过程[SQL2000/SQL2005/Oracle]

谁借莪１个温暖的怀抱￠ 2022-01-14 11:27 165阅读 0赞

[2019独角兽企业重金招聘Python工程师标准>>> ][2019_Python_] ![hot3.png][]

**在 [CYQ.Data][] 分页是内部集成的功能，针对不同的数据库，使用不同的分页形式。**

**1：Access   ：集成：使用3次Top分页  
  
2：MySql    ：集成，使用Limit N分页  
  
3：Sqlite    ：集成，使用Limit N分页  
  
4：Sql2000：外置存储过程，使用临时表方式分页  
  
5：Sql2005：外置存储过程，使用ROW\_NUMBER方式分页  
  
6：Oracle   ：外置存储过程，使用RowNum 方式分页**

**下面是三种不同存储过程代码：**

** 1：****[CYQ.Data ][CYQ.Data]数据框架在 [SQL2000][CYQ.Data] 的 [分页存储过程][CYQ.Data] 的代码：**

create  procedure SelectBase  
           @PageIndex         int,  
           @PageSize      int,  
           @TableName    nvarchar(4000),  
           [@Where][Where]     nvarchar(2000)=''  
           as  
           Declare @rowcount    int  
           Declare @intStart    int  
           Declare @intEnd         int  
           declare @Column1 varchar(32) --第一列名称  
           Declare [@Sql][Sql] nvarchar(2000), @WhereR nvarchar(1000), @OrderBy nvarchar(1000)  
           set @rowcount=0  
           set nocount on  
           if @Where<>''  
           begin  
           set @Where=' and ['+][Link 1][@Where][Where]  
           end  
           if CHARINDEX('order by', @Where)>0  
           begin  
           set @WhereR=substring([@Where][Where] , 1, CHARINDEX('order by',@Where)-1) --取得条件  
           set @OrderBy=substring([@Where][Where] , CHARINDEX('order by',@Where), Len(@Where)) --取得排序方式(order by 字段 方式)  
           end  
           else  
           begin  
           set @WhereR=[@Where][Where]  
           set @OrderBy=' order by id asc'  
           end  
           set @Sql='SELECT @rowcount=count(\*) from '+cast(@TableName as varchar(4000))+' where 1=1 ['+@WhereR][Link 1]

exec sp\_executeSql [@Sql][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 ['+][Link 1][@Where][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+'][Link 1] from ['+@TableName+'][Link 1] where 1=1 ['+][Link 1][@Where][Where]    
           set @Sql=@Sql+' select \* from ['+@TableName+'][Link 1] left join \#tem  on ['+@Column1+'=\#tem.Row][Link 1] '   
           set @Sql=@Sql+' where  \#tem.tempID between '+cast(@intStart as varchar)+' and '+cast(@intEnd as varchar)  
           end  
           exec sp\_executeSql [@Sql][Sql]  
           return @rowcount  
           set nocount off   
GO

**Tip：**

**最近有使用** [**SQL2000**][CYQ.Data]** 的网友在分页上出了点问题，经过重重排查，竟然是由于分页里的注释代码引起的。**

**所以，使用此分页存储过程的网友注意一下，如果有问题，请把注释删除。**

**2：**[**CYQ.Data** ][CYQ.Data]**数据框架在** [**SQL2005**][CYQ.Data]** 的** [**分页存储过程**][CYQ.Data] **的代码：**

**Create procedure \[SelectBase\]  
@PageIndex         int,  
@PageSize      int,  
@TableName    nvarchar(4000),  
[@Where][Where]     nvarchar(max)=''  
as  
Declare @rowcount    int  
Declare @intStart    int  
Declare @intEnd         int  
Declare [@SQl][Sql] nvarchar(max), @WhereR nvarchar(max), @OrderBy nvarchar(max)  
set @rowcount=0  
set nocount on  
if @Where<>''  
begin  
set @Where=' and ['+][Link 1] [@Where][Where]  
end  
if CHARINDEX('order by', @Where)>0  
begin  
set @WhereR=substring( [@Where][Where] , 1, CHARINDEX('order by',@Where)-1) --取得条件  
set @OrderBy=substring( [@Where][Where] , CHARINDEX('order by',@Where), Len(@Where)) --取得排序方式(order by 字段 方式)  
end  
else  
begin  
set @WhereR= [@Where][Where]  
set @OrderBy=' order by id asc'  
end  
set @SQl='SELECT @rowcount=count(\*) from '+cast(@TableName as varchar(4000))+' where 1=1 ['+@WhereR][Link 1]  
exec sp\_executeSql [@SQl][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 ['+][Link 1] [@Where][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+'][Link 1] ) as a where row between '+cast(@intStart as varchar)+' and '+cast(@intEnd as varchar)  
end  
exec sp\_executeSql [@SQl][Sql]  
return @rowcount  
set nocount off**

** **

**3：Oracle 的分页存储过程代码**

**这里就不贴了，见帖子：[折腾Oracle问题小菜记\[分页存储过程/查询所有表、视图、存储过程/查询表、视图、存储过程字段结构与参数\](三)][Oracle]**

** **

转载于:https://my.oschina.net/secyaher/blog/274231

[2019_Python_]: https://my.oschina.net/u/2663968/blog/3061697
[hot3.png]: /images/20220114/4b76b63d16f94da688dfede8319fa007.png
[CYQ.Data]: http://www.cyqdata.com/cyqdata
[Where]: http://my.oschina.net/u/157820
[Sql]: http://my.oschina.net/sql
[Link 1]: http://www.cnblogs.com/cyq1162/archive/2011/05/18/mailto:'%20rel=
[Oracle]: http://www.cnblogs.com/cyq1162/archive/2010/09/28/1837692.html