明天的明天 永远的永远 未知的一切 我与你一起承担 ??

是非成败转头空 青山依旧在 几度夕阳红 。。。
  博客园  :: 首页  :: 管理

Sql : 多表联合查询分页

Posted on 2008-01-03 15:12  且行且思  阅读(2433)  评论(0编辑  收藏  举报
  --功能:通用数据库分页   

    
  CREATE   PROCEDURE   Ture_Page  
   
          @PageSize         int,                 --每页的行数  
          @PageIndex         int,                 --1   代表第一页  
          @Col                 varchar(200),         --要显示的字段  
          @Table                 varchar(200),         --所用到的表,复条的话就写from与where之间的内容  
          @Where         varchar(200)='',         --所用到的条件  
          @OKey                 varchar(50),         --排序字段  
          @Order                 varchar(20)='ASC'         --排序方式  
   
  as  
    declare   @cmdstr   varchar(2000)  
    set   nocount   on  
                   
                  set   @cmdstr='select   top   '  
                  set   @cmdstr=@cmdstr+convert(nvarchar,@PageSize)  
                  if   @Order='DESC'   and   @PageIndex>1  
    set   @cmdstr=@cmdstr+'   '+@Col+'   from   '+@Table+'   where   '+@OKey+'<'  
                  else   if   @PageIndex=1  
    set   @cmdstr=@cmdstr+'   '+@Col+'   from   '+@Table+'   where   '+@OKey+'>='  
                  else  
    set   @cmdstr=@cmdstr+'   '+@Col+'   from   '+@Table+'   where   '+@OKey+'>'  
                  if   @PageIndex>1  
                      begin  
      if   @Order='ASC'  
                            set   @cmdstr=@cmdstr+'(select   max   ('+@OKey+')   from   (select   top   '  
    else  
                  set   @cmdstr=@cmdstr+'(select   min   ('+@OKey+')   from   (select   top   '    
                          set   @cmdstr=@cmdstr+convert(nvarchar,(@PageIndex-1)*@PageSize)  
                          set   @cmdstr=@cmdstr+'   '+@OKey+'   from   '+@Table+'   order   by   '+@OKey+'   '+@Order+')   as   t)   '  
                      end  
                  else  
                      set   @cmdstr=@cmdstr+'0   '  
                  if   @Where<>''  
                          set   @cmdstr=(@cmdstr+'   and   '+@Where+'   order   by   '+@OKey+'   '+@Order)  
                  else  
                          set   @cmdstr=(@cmdstr+'order   by   '+@OKey+'   '+@Order)  
                   
    print   @cmdstr  
                  exec(@cmdstr)  
          set   nocount   off  
  GO