USE [MFProNew]GO/****** 對象: StoredProcedure [dbo].[GetRecordByPage] 腳本日期: 02/12/2011 10:13:23 ******/SET ANSI_NULLS ONGOSET QUOTED_IDENTIFIER ONGOALTER PROCEDURE [dbo].[GetRecordByPage](@tblName nvarchar(400), ----要顯示的表或多個表的連接@fldName nvarchar(4000) = '*', ----要顯示的字段列表@pageSize int = 1, ----每頁顯示的記錄個數(shù)@page int = 10, ----要顯示那一頁的記錄@pageCount int = 1 output, ----查詢結果分頁后的總頁數(shù)@Counts int = 1 output, ----查詢到的記錄數(shù)@fldSort nvarchar(200) = null, ----排序字段列表或條件@Sort bit = 1, ----排序方法，0為升序，1為降序(如果是多字段排列Sort指代最后一個排序字段的排列順序(最后一個排序字段不加排序標記)--程序傳參如：' SortA Asc,SortB Desc,SortC ')@strCondition nvarchar(4000) = null, ----查詢條件,不需where@ID nvarchar(150), ----主表的主鍵@Dist bit = 0 ----是否添加查詢字段的 DISTINCT 默認0不添加/1添加)ASSET NOCOUNT ONDeclare @sqlTmp nvarchar(4000) ----存放動態(tài)生成的SQL語句Declare @strTmp nvarchar(4000) ----存放取得查詢結果總數(shù)的查詢語句Declare @strID nvarchar(4000) ----存放取得查詢開頭或結尾ID的查詢語句Declare @strSortType nvarchar(10) ----數(shù)據(jù)排序規(guī)則ADeclare @strFSortType nvarchar(10) ----數(shù)據(jù)排序規(guī)則BDeclare @SqlSelect nvarchar(50) ----對含有DISTINCT的查詢進行SQL構造Declare @SqlCounts nvarchar(50) ----對含有DISTINCT的總數(shù)查詢進行SQL構造if @Dist = 0begin set @SqlSelect = 'select ' set @SqlCounts = 'Count(*)'endelsebegin set @SqlSelect = 'select distinct ' set @SqlCounts = 'Count(DISTINCT '+@ID+')'endif @Sort=0begin set @strFSortType=' ASC ' set @strSortType=' DESC 'endelsebegin set @strFSortType=' DESC ' set @strSortType=' ASC 'end--------生成查詢語句----------此處@strTmp為取得查詢結果數(shù)量的語句if @strCondition is null or @strCondition='' --沒有設置顯示條件begin set @sqlTmp = @fldName + ' From ' + @tblName set @strTmp = @SqlSelect+' @Counts='+@SqlCounts+' FROM '+@tblName set @strID = ' From ' + @tblNameendelsebegin set @sqlTmp = + @fldName + 'From ' + @tblName + ' where (1>0) ' + @strCondition set @strTmp = @SqlSelect+' @Counts='+@SqlCounts+' FROM '+@tblName + ' where (1>0) ' + @strCondition set @strID = ' From ' + @tblName + ' where (1>0) ' + @strConditionend----取得查詢結果總數(shù)量-----exec sp_executesql @strTmp,N'@Counts int out ',@Counts outprint @strTmpdeclare @tmpCounts intif @Counts = 0 set @tmpCounts = 1else set @tmpCounts = @Counts --取得分頁總數(shù) set @pageCount=(@tmpCounts+@pageSize-1)/@pageSize /**//**當前頁大于總頁數(shù) 取最后一頁**/ if @page>@pageCount set @page=@pageCount --/*-----數(shù)據(jù)分頁2分處理-------*/ declare @pageIndex int --總數(shù)/頁大小 declare @lastcount int --總數(shù)%頁大小 set @pageIndex = @tmpCounts/@pageSize set @lastcount = @tmpCounts%@pageSize if @lastcount > 0 set @pageIndex = @pageIndex + 1 else set @lastcount = @pagesize --//***顯示分頁 if @strCondition is null or @strCondition='' --沒有設置顯示條件 begin if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 --前半部分數(shù)據(jù)處理 begin set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-1) as Varchar(20)) +' '+ @ID +' from '+@tblName +' order by '+ @fldSort +' '+ @strFSortType+')' +' order by '+ @fldSort +' '+ @strFSortType end else begin set @page = @pageIndex-@page+1 --后半部分數(shù)據(jù)處理 if @page <= 1 --最后一頁數(shù)據(jù)顯示 set @strTmp=@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' order by '+ @fldSort +' '+ @strSortType else set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in('+ @SqlSelect+' top '+ CAST(@lastcount as Varchar(20)) +' '+ @ID +' from '+@tblName +' order by '+ @fldSort +' '+ @strSortType+')' +' order by '+ @fldSort +' '+ @strSortType end end else --有查詢條件 begin if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 --前半部分數(shù)據(jù)處理 begin set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName +' from '+@tblName +' where '+@ID+' not in('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-1) as Varchar(20)) +' '+ @ID +' from '+@tblName +' Where (1>0) ' + @strCondition + ' order by '+ @fldSort +' '+ @strFSortType+')' +' ' + @strCondition + ' order by '+ @fldSort +' '+ @strFSortType end else begin set @page = @pageIndex-@page+1 --后半部分數(shù)據(jù)處理 if @page <= 1 --最后一頁數(shù)據(jù)顯示 set @strTmp=@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where (1>0) '+ @strCondition +' order by '+ @fldSort +' '+ @strSortType else set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName +' where '+@ID+' not in('+ @SqlSelect+' top '+ CAST(@lastcount as Varchar(20)) +' '+ @ID +' from '+@tblName +' where (1>0) '+ @strCondition +' order by '+ @fldSort +' '+ @strSortType+')' + @strCondition +' order by '+ @fldSort +' '+ @strSortType end end------返回查詢結果-----print @strTmpexec sp_executesql @strTmp--print @strTmpSET NOCOUNT OFF ?