复制代码 代码如下: --使用说明 本代码适用于MsSql2000,对于其它数据库也可用.但没必要 --创建存储过程 CREATE PROCEDURE pagination @tblName varchar(255), -- 表名 @strGetFields varchar(1000) = "*", -- 需要返回的列 @fldName varchar(255)="", -- 排序的字段名(可包含如TABLE.FLDNAME形式) @PageSize int = 10, -- 页尺寸 @PageIndex int = 1, -- 页码 @doCount bit = 0, -- 返回记录总数, 非 0 值则返回 @OrderType bit = 0, -- 设置排序类型, 非 0 值则降序 @strWhere varchar(1500) = "" -- 查询条件 (注意: 不要加 where) AS declare @strSQL varchar(5000) -- 主语句 declare @strTmp varchar(110) -- 临时变量 declare @strOrder varchar(400) -- 排序类型 declare @fldName_t varchar(255) -- 在分页时用的排序字段名,不包含多表并列时的表名 set @fldName_t = right(@fldName,len(@fldName)-CHARINDEX(".",@fldName)) if @doCount != 0 begin if @strWhere !="" set @strSQL = "select count(*) as Total from " + @tblName + " where "+@strWhere else set @strSQL = "select count(*) as Total from " + @tblName + "" end --以上代码的意思是如果@doCount传递过来的不是0,就执行总数统计。以下的所有代码都是@doCount为0的情况 else begin if @OrderType != 0 begin set @strTmp = "<(select min" set @strOrder = " order by " + @fldName +" desc" --如果@OrderType不是0,就执行降序,这句很重要! end else begin set @strTmp = ">(select max" set @strOrder = " order by " + @fldName +" asc" end if @PageIndex = 1 begin if @strWhere != "" set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from " + @tblName + " where " + @strWhere + " " + @strOrder else set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from "+ @tblName + " "+ @strOrder --如果是第一页就执行以上代码,这样会加快执行速度 end else begin --以下代码赋予了@strSQL以真正执行的SQL代码 set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from "+ @tblName + " where " + @fldName + " " + @strTmp + " ("+ @fldName_t + ") from (select top " + str((@PageIndex-1)*@PageSize) + " "+ @fldName + " from " + @tblName + "" + @strOrder + ") as tblTmp)"+ @strOrder if @strWhere != "" set @strSQL = "select top " + str(@PageSize) +" "+@strGetFields+ " from "+ @tblName + " where " + @fldName + " " + @strTmp + " ("+ @fldName_t + ") from (select top " + str((@PageIndex-1)*@PageSize) + " "+ @fldName + " from " + @tblName + " where " + @strWhere + " "+ @strOrder + ") as tblTmp) and " + @strWhere + " " + @strOrder end end exec (@strSQL) go --测试 create table news --建表 ( n_id int iDENTITY(1,1) primary key, n_title char(200), n_content text ) --写循环插入1000000条的数据 create proc tt as declare @i int set @i=0 while(@i<1000000) begin insert into news(n_title,n_content) values("sb","dsfsdfsd") set @i=@i+1 end exec tt exec pagination "news","*","n_id",1000,2,0,0,""
第二篇
复制代码 代码如下: 自己改写的一个分页存储过程 CREATE PROC Paging ( @pageSize int, @pageIndex int, @pageField nvarchar(32), @countTotal bit=1, @fieldQuery nvarchar(512), @tableQuery nvarchar(512), @whereQuery nvarchar(2048), @orderQuery nvarchar(512) ) AS DECLARE @bdate Datetime SET @bdate = getdate() DECLARE @itemcount int SET @itemcount=@pageIndex*@pageSize DECLARE @itemlowwer int SET @itemlowwer=(@pageIndex-1)*@pageSize DECLARE @cmd nvarchar(3062)
IF @pageIndex=1 SET @cmd ="SELECT TOP ‘+CAST(@pageSize AS NVARCHAR)+" ‘+@fieldQuery+" FROM ‘+@tableQuery+" WHERE ‘+@whereQuery+" ORDER BY ‘+@orderQuery ELSE SET @cmd="SELECT ‘+@fieldQuery+" FROM ‘+@tableQuery+" WHERE ‘+@pageField+" IN (SELECT TOP ‘+CAST(@itemcount as nvarchar)+" ‘+@pageField+" FROM ‘+@tableQuery+" WHERE ‘+@whereQuery+" ORDER BY ‘+ @orderQuery+") AND ‘+@pageField+" NOT IN (SELECT TOP ‘ +CAST(@itemlowwer as nvarchar)+" ‘+@pageField+" FROM ‘+@tableQuery+" WHERE ‘+@whereQuery+" ORDER BY ‘+ @orderQuery+")" –print @cmd EXEC(@cmd)
SELECT DATEDIFF( ms , @bdate , getdate() )
IF @countTotal =1 BEGIN SET @cmd = ‘SELECT COUNT( 0) FROM ‘+@tableQuery+" WHERE ‘+@whereQuery EXEC(@cmd) END GO