分页存储过程[转载]

SQL2000
CREATE PROCEDURE [dbo].[ProcCustomPage]
    (
     @Table_Name varchar(5000),    --表名
     @Sign_Record varchar(50),     --主键
     @Filter_Condition varchar(1000),    --筛选条件,不带where
     @Page_Size int,     --页大小
     @Page_Index int,       --页索引       
   @TaxisField varchar(1000), --排序字段
     @Taxis_Sign int,     --排序方式 1为 DESC, 0为 ASC
@Find_RecordList varchar(1000),   --查找的字段
     @Record_Count int     --总记录数
     )
     AS
      BEGIN 
      DECLARE @Start_Number int
      DECLARE @End_Number int
      DECLARE @TopN_Number int
     DECLARE @sSQL varchar(8000)
if(@Find_RecordList=\'\')
BEGIN
SELECT @Find_RecordList=\'*\'
END
     SELECT @Start_Number =(@Page_Index-1) * @Page_Size
      IF @Start_Number<=0
     SElECT @Start_Number=0
      SELECT @End_Number=@Start_Number+@Page_Size
      IF @End_Number>@Record_Count
     SELECT @End_Number=@Record_Count
     SELECT @TopN_Number=@End_Number-@Start_Number
     IF @TopN_Number<=0
     SELECT @TopN_Number=0
      print @TopN_Number
     print @Start_Number
     print @End_Number
     print @Record_Count
IF @TaxisField=\'\'
begin
select @TaxisField=@Sign_Record
end
     IF @Taxis_Sign=0
       BEGIN
         IF @Filter_Condition=\'\'
         BEGIN
           SELECT @sSQL=\'SELECT \'+@Find_RecordList+\' FROM \'+@Table_Name+\' 
           WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@TopN_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
            WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@End_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
          ORDER BY \'+@TaxisField+\') order by \'+@TaxisField+\' DESC)order by \'+@TaxisField
         END
        ELSE
        BEGIN
        SELECT @sSQL=\'SELECT \'+@Find_RecordList+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@TopN_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@End_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Filter_Condition+\' ORDER BY \'+@TaxisField+\') and \'+@Filter_Condition+\' order by \'+@TaxisField+\' DESC) and \'+@Filter_Condition+\' order by \'+@TaxisField
         END
      END
    ELSE
      BEGIN
      IF @Filter_Condition=\'\'
        BEGIN
          SELECT @sSQL=\'SELECT \'+@Find_RecordList+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@TopN_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@End_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     ORDER BY \'+@TaxisField+\' DESC) order by \'+@TaxisField+\')order by \'+@TaxisField+\' DESC\'
     END
      ELSE
      BEGIN
        SELECT @sSQL=\'SELECT \'+@Find_RecordList+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@TopN_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Sign_Record+\' in (SELECT TOP \'+CAST(@End_Number AS VARCHAR(10))+\' \'+@Sign_Record+\' FROM \'+@Table_Name+\' 
     WHERE \'+@Filter_Condition+\' ORDER BY \'+@TaxisField+\' DESC) and \'+@Filter_Condition+\' order by \'+@TaxisField+\') and \'+@Filter_Condition+\' order by \'+@TaxisField+\' DESC\'
     END
      END
      EXEC (@sSQL)
      IF @@ERROR<>0
      RETURN -3 
     RETURN 0
     END
     
     PRINT @sSQL
GO

2005

CREATE PROCEDURE [dbo].[GetRecordFromPage] 
@SelectList VARCHAR(2000), --欲选择字段列表
@TableSource VARCHAR(100), --表名或视图表 
@SearchCondition VARCHAR(2000), --查询条件
@OrderExpression VARCHAR(1000), --排序表达式
@PageIndex INT = 1, --页号,从0开始
@PageSize INT = 10 --页尺寸
AS 
BEGIN
IF @SelectList IS NULL OR LTRIM(RTRIM(@SelectList)) = \'\'
BEGIN
SET @SelectList = \'*\'
END
PRINT @SelectList

SET @SearchCondition = ISNULL(@SearchCondition,\'\')
SET @SearchCondition = LTRIM(RTRIM(@SearchCondition))
IF @SearchCondition <> \'\'
BEGIN
IF UPPER(SUBSTRING(@SearchCondition,1,5)) <> \'WHERE\'
BEGIN
SET @SearchCondition = \'WHERE \' + @SearchCondition
END
END
PRINT @SearchCondition

SET @OrderExpression = ISNULL(@OrderExpression,\'\')
SET @OrderExpression = LTRIM(RTRIM(@OrderExpression))
IF @OrderExpression <> \'\'
BEGIN
IF UPPER(SUBSTRING(@OrderExpression,1,5)) <> \'WHERE\'
BEGIN
SET @OrderExpression = \'ORDER BY \' + @OrderExpression
END
END
PRINT @OrderExpression

IF @PageIndex IS NULL OR @PageIndex < 1
BEGIN
SET @PageIndex = 1
END
PRINT @PageIndex
IF @PageSize IS NULL OR @PageSize < 1
BEGIN
SET @PageSize = 10
END
PRINT @PageSize

DECLARE @SqlQuery VARCHAR(4000)

SET @SqlQuery=\'SELECT \'+@SelectList+\',RowNumber 
FROM 
(SELECT \' + @SelectList + \',ROW_NUMBER() OVER( \'+ @OrderExpression +\') AS RowNumber 
FROM \'+@TableSource+\' \'+ @SearchCondition +\') AS RowNumberTableSource 
WHERE RowNumber BETWEEN \' + CAST(((@PageIndex - 1)* @PageSize+1) AS VARCHAR) 
+ \' AND \' + 
CAST((@PageIndex * @PageSize) AS VARCHAR) 
-- ORDER BY \' + @OrderExpression
PRINT @SqlQuery
SET NOCOUNT ON
EXECUTE(@SqlQuery)
SET NOCOUNT OFF

RETURN @@RowCount
END