邹建的分页存储过程中怎么给总记录数赋值
ALTER   PROC   sp_PageView
@tbname           sysname,                       --要分页显示的表名
@FieldKey       nvarchar(1000),     --用于定位记录的主键(惟一键)字段,可以是逗号分隔的多个字段
@PageCurrent   int=1,                       --要显示的页码
@PageSize       int=10,                         --每页的大小(记录数)
@FieldShow   nvarchar(1000)= ' ',     --以逗号分隔的要显示的字段列表,如果不指定,则显示所有字段
@FieldOrder   nvarchar(1000)= ' ',     --以逗号分隔的排序字段列表,可以指定在字段后面指定DESC/ASC用于指定排序顺序                                                                                    
@Where         nvarchar(1000)= ' ',   --查询条件
@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 ' ')= ' '
BEGIN
RAISERROR(N '分页处理需要主键（或者惟一键） ',1,16)
RETURN
END

--其他参数检查及规范
IF   ISNULL(@PageCurrent,0) <1   SET   @PageCurrent=1
IF   ISNULL(@PageSize,0) <1   SET   @PageSize=10
IF   ISNULL(@FieldShow,N ' ')=N ' '   SET   @FieldShow=N '* '
IF   ISNULL(@FieldOrder,N ' ')=N ' '
SET   @FieldOrder=N ' '
ELSE
SET   @FieldOrder=N 'ORDER   BY   '+LTRIM(@FieldOrder)

IF   ISNULL(@Where,N ' ')=N ' '
SET   @Where=N ' '
ELSE
SET   @Where=N 'WHERE   ( '+@Where+N ') '

--如果@RecordCount为NULL值,则计算总记录数(这样设计可以只在第一次计算总记录数,以后调用时,把总记录数传回给存储过程,避免再次计算总记录数,对于不想计算总记录数的处理而言,可以给@RecordCount赋值)
IF   @RecordCount   IS   NULL
BEGIN
DECLARE   @sql   nvarchar(4000)
SET   @sql=N 'SELECT   @RecordCount=COUNT(1) '
+N '   FROM   '+@tbname
+N '   '+@Where
EXEC   sp_executesql   @sql,N '@RecordCount   int   OUTPUT ',@RecordCount   OUTPUT
--SET   @RecordCount=(@PageCount+@PageSize-1)/@PageSize
END

--计算分页显示的TOPN值
DECLARE   @TopN   varchar(20),@TopN1   varchar(20)
SELECT   @TopN=@PageSize,
@TopN1=(@PageCurrent-1)*@PageSize

--第一页直接显示
IF   @PageCurrent=1
EXEC(N 'SELECT   TOP   '+@TopN
+N '   '+@FieldShow
+N '   FROM   '+@tbname
+N '   '+@Where
+N '   '+@FieldOrder)
ELSE
BEGIN
--处理别名
IF   @FieldShow=N '* '