阅读:        作者:迪克猪

数据库分页存储过程(6)

/*
******************************************************************************************
  过程名称:Common_Type_Pagination
  过程功能:
  代码设计:小朱(zsy619@163.com)
  设计时间:2005-11-3 13:58:26
******************************************************************************************
  功能描述:

******************************************************************************************
  如果您修改了我的程序,请留下修改记录,以便对程序进行维护,谢谢  !!!
==========================================================================================
  修改人            修改时间                修改原因
------------------------------------------------------------------------------------------

==========================================================================================

******************************************************************************************
  备注:
*****************************************************************************************
*/

Create Procedure [dbo].[Common_Type_Pagination]
    
@tblName   varchar(255),               -- 表名 
    @strGetFields varchar(1000= "*",     -- 需要返回的列名  
    @strWhere  varchar(1500= "",         -- 查询条件 (注意: 不要加 where) 
    @fldName varchar(255)="",              -- 排序的字段名 
    @orderType bit = 0,              -- 设置排序类型, 0 值为升序, 非 0 值为降序 
    @pageSize   int = 10,                 -- 页尺寸 
    @pageIndex  int = 1,                   -- 页码 
    @returnType  bit = 0              -- 设置返回类型,0 值为返回记录集, 非 0 值为返回记录总数 
AS
    
Declare @intResult Int
    
Begin Tran
    
-----------------------------------------------------------------代码设计--------------------------------------------------------------------
    declare @strSQL   varchar(5000)           -- 主语句 
    declare @strTmp   varchar(110)           -- 临时变量 
    declare @strOrder varchar(400)           -- 排序类型 
    if @returnType != 0    -- 返回记录总数
    begin
        
if @strWhere != ""
            
set @strSQL = "select count(*) as total from [" + @tblName + "] where " + @strWhere
        
else
            
set @strSQL = "select count(*) as total from [" + @tblName + "]" 
    
end
    
else    -- 返回记录集
    begin
        
if @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    --以下代码赋予了@strSQL以真正执行的SQL代码
        begin
            
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 
            
else
                
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
        
end
    
end
    
exec(@strSQL
    
Set @intResult = @@ROWCOUNT
    
----------------------------------------------------------------------------------------------------------------------------------------------------
    If @@Error <> 0
    
Begin
        
RollBack Tran
        
Return -1
    
End
    
Else
    
Begin
        
Commit Tran
        
Return @intResult
    
End
GO

Tags: 过程   数据库分页   数据库   数据   存储过程