create procedure sp_page
@tb varchar(50), --表名
@col varchar(50), --按该列来进行分页
@coltype int, --@col列的类型,0-数字类型,1-字符类型,2-日期时间类型
@orderby bit, --排序,0-顺序,1-倒序
@collist varchar(800),--要查询出的字段列表,*表示全部字段
@pagesize int, --每页记录数
@page int, --指定页
@condition varchar(800),--查询条件
@pages int output --总页数
as
/*
功能描述：对指定表中满足条件的记录按指定列进行分页查询，分页可以顺序、倒序
查询可以指定页大小、指定查询任意页、指定输出字段列表，返回总页数
作 者：pbsql
版 本：1.10
最后修改：2004-11-29
*/
declare @sql nvarchar(4000),@where1 varchar(800),@where2 varchar(800)
if @condition is null or rtrim(@condition)=''
begin--没有查询条件
set @where1=' where '
set @where2=' '
end
else
begin--有查询条件
set @where1=' where ('+@condition+') and '--本来有条件再加上此条件
set @where2=' where ('+@condition+') '--原本没有条件而加上此条件
end
set @sql='select @pages=ceiling((count(*)+0.0)/'+cast(@pagesize as varchar)+
') from '+@tb+@where2
exec sp_executesql @sql,n'@pages int output',@pages output--计算总页数
if @orderby=0
set @sql='select top '+cast(@pagesize as varchar)+' '+@collist+
' from '+@tb+@where1+@col+'>(select max('+@col+') '+
' from (select top '+cast(@pagesize*(@page-1) as varchar)+' '+
@col+' from '+@tb+@where2+'order by '+@col+') t) order by '+@col
else
set @sql='select top '+cast(@pagesize as varchar)+' '+@collist+
' from '+@tb+@where1+@col+'<(select min('+@col+') '+
' from (select top '+cast(@pagesize*(@page-1) as varchar)+' '+
@col+' from '+@tb+@where2+'order by '+@col+' desc) t) order by '+
@col+' desc'
if @page=1--第一页
set @sql='select top '+cast(@pagesize as varchar)+' '+@collist+' from '+@tb+
@where2+'order by '+@col+case @orderby when 0 then '' else ' desc' end
exec(@sql)
go
本存储过程高效，曾用500万条数据测试（已建索引），只返回分页只需3秒，影响效率的地方是计算总页数，若不需要可以注释掉
--测试示例
declare @pages int
select identity(int,1,1) id,getdate() dt,xx=cast('' as varchar(10)) into #t
