日期:2014-05-18  浏览次数:20496 次

SQL2005 分页存储过程转为 SQL2003 分页存储过程
我这边有一段SQL2005 的分页存储过程 现在要放到SQL2000 上 但是会出错 请问要怎么修改?(或者能够写成跟2005功能一样的也行)
代码:

GO
/****** Object: StoredProcedure [dbo].[UtilPage] Script Date: 10/27/2011 17:43:39 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO


ALTER PROCEDURE [dbo].[UtilPage]
@datasrc nvarchar(200)
,@orderBy nvarchar(200)
,@fieldlist nvarchar(300) = '*'
,@filter nvarchar(1000) = ''
,@pageNum int = 1
,@pageSize int = NULL
AS
SET NOCOUNT ON
DECLARE
  @STMT nvarchar(4000) -- SQL to execute
  ,@recct int -- total # of records (for GridView paging interface)

IF LTRIM(RTRIM(@filter)) = '' SET @filter = '1 = 1'
IF @pageSize IS NULL BEGIN
  SET @STMT = 'SELECT ' + @fieldlist + 
  'FROM ' + @datasrc +
  'WHERE ' + @filter + 
  'ORDER BY ' + @orderBy
  EXEC (@STMT) -- return requested records 
END ELSE BEGIN
  SET @STMT = 'SELECT @recct = COUNT(*)
  FROM ' + @datasrc + '
  WHERE ' + @filter
  EXEC sp_executeSQL @STMT, @params = N'@recct INT OUTPUT', @recct = @recct OUTPUT
  SELECT @recct AS recct -- return the total # of records

  DECLARE
  @lbound int,
  @ubound int

  SET @pageNum = ABS(@pageNum)
  SET @pageSize = ABS(@pageSize)
  IF @pageNum < 1 SET @pageNum = 1
  IF @pageSize < 1 SET @pageSize = 1
  SET @lbound = ((@pageNum - 1) * @pageSize)
  SET @ubound = @lbound + @pageSize + 1
  IF @lbound >= @recct BEGIN
  SET @ubound = @recct + 1
  SET @lbound = @ubound - (@pageSize + 1) -- return the last page of records if -- no records would be on the
  -- specified page
  END
  SET @STMT = 'SELECT ' + @fieldlist + '
  FROM (
  SELECT ROW_NUMBER() OVER(ORDER BY ' + @orderBy + ') AS row, *
  FROM ' + @datasrc + '
  WHERE ' + @filter + '
  ) AS tbl
  WHERE
  row > ' + CONVERT(varchar(9), @lbound) + ' AND
  row < ' + CONVERT(varchar(9), @ubound)
  EXEC (@STMT) -- return requested records 
  print (@STMT)
END


------解决方案--------------------
SQL code
--参考吧:
set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go





ALTER PROC [dbo].[PROCE_PageView2000]
(
@tbname     nvarchar(100),               --要分页显示的表名
@FieldKey   nvarchar(1000),      --用于定位记录的主键(惟一键)字段,可以是逗号分隔的多个字段
@PageCurrent int=1,               --要显示的页码
@PageSize   int=10,                --每页的大小(记录数)
@FieldShow nvarchar(1000)='',      --以逗号分隔的要显示的字段列表,如果不指定,则显示所有字段
@FieldOrder nvarchar(1000)='',      --以逗号分隔的排序字段列表,可以指定在字段后面指定DESC/ASC
@WhereString    nvarchar(1000)=N'',     --查询条件
@RecordCount int OUTPUT             --总记录数
)
AS
SET NOCOUNT ON
--检查对象是否有效
--IF OBJECT_ID(@tbname) IS NULL
--BEGIN
--    RAISERROR(N'对象"%s"不存在',1,16,@tbname)
--    RETURN
--END
--IF OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTable')=0
--    AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsView')=0
--    AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTableFunction')=0
--BEGIN
--    RAISERROR(N'"%s"不是表、视图或者表值函数',1,16,@tbname)
--    RETURN
--END

--分页字段检查
IF ISNULL(@FieldKey,N'')='