SQL Server 2000下的通用分页存储过程,感觉比较实用就发出来了

参数注释得比较清晰,就不另外说明了。


create proc spPagination


(


@TName nvarchar(100), --表名


@FName nvarchar(255), --字段名


@OName nvarchar(255), --排序字段名


@ODirect bit=1, --排序方向,Desc


@PSize int=10, --页大小


@PIndex int=1, --页数


@sWhere nvarchar(1000)='', --查询条件


@iCount int=0 output --记录数


)




/**//***********************


* name: spPagination


* author: zzcv


* version: 1.1


* date: 2007-6-9


************************/


as


set nocount on


declare @sSQL nvarchar(1000) --临时变量




set @sSQL='select @iCount=count(*) from '+@TName


if @sWhere!=''


set @sSQL=@sSQL+' where '+@sWhere


exec sp_executesql @sSQL,N'@iCount int out',@iCount out




set @sSQL='select top '+str(@PSize)+' '+@FName+' from '+@TName+' where '+@OName


if @ODirect=0


set @sSQL=@sSQL+'>=(select max'


else


set @sSQL=@sSQL+'<=(select min'


set @sSQL=@sSQL+'('+@OName+') from (select top '+str((@PIndex-1)*@PSize+1)+' '+@OName+' from '+@TName


if @sWhere!=''


set @sSQL=@sSQL+' where '+@sWhere


set @sSQL=@sSQL+' order by '+@OName


if @ODirect=1


set @sSQL=@sSQL+' desc'


set @sSQL=@sSQL+')t)'


if @sWhere!=''


set @sSQL=@sSQL+' and '+@sWhere


set @sSQL=@sSQL+' order by '+@OName


if @ODirect=1


set @sSQL=@sSQL+' desc'


exec sp_executesql @sSQL


set nocount off


GO