软件开发培训班 >> 编程开发 >> ASP


sql 存储过程分页

　　本文标签：sql,存储过程分页

CREATE PROC myx_prPageRecordset
@queryStr nvarchar(1000), 
@keyField nvarchar (200), 
@pageSize int, 
@pageNumber int 
AS
BEGIN
DECLARE @sqlText AS nvarchar(4000)
DECLARE @sqlTable AS nvarchar(4000)
SET @sqlTable = SELECT TOP  + CAST((@pageNumber + 1) * @pageSize AS varchar(30)) +   + @queryStr
SET @sqlText =
SELECT TOP  + CAST(@pageSize AS varchar(30)) +  *  + 
FROM ( + @sqlTable + ) AS tableA  +
WHERE  + @keyField +  NOT IN(SELECT TOP  +
CAST(@pageNumber * @pageSize AS varchar(30)) +   + @keyField + 
 FROM ( + @sqlTable + ) AS tableB)
EXEC (@sqlText)
END

GO

核心代码
Dim strsql As String
myComm = New SqlClient.SqlCommand("myx_prPageRecordset", myConn)
myComm.CommandType = CommandType.StoredProcedure
myComm.Parameters.Add(New SqlClient.SqlParameter("@queryStr", SqlDbType.NVarChar, 1000))
myComm.Parameters("@queryStr").Value = " * from tbpage order by id DESC"
myComm.Parameters.Add(New SqlClient.SqlParameter("@keyField", SqlDbType.NVarChar, 200))
myComm.Parameters("@keyField").Value = "[id]"
myComm.Parameters.Add(New SqlClient.SqlParameter("@pageSize", SqlDbType.NVarChar, 1000))
myComm.Parameters("@pageSize").Value = PageSize
myComm.Parameters.Add(New SqlClient.SqlParameter("@pageNumber", SqlDbType.NVarChar, 1000))
myComm.Parameters("@pageNumber").Value = myPage - 1

呵呵,执行几W条的代码只需150毫秒左右

建立一个test(id,name,fid)
向test添充几十条数据,使id=1,2,3,4.........(即递增的integer),其他任意
在T-sql Debugger给改存储过程分别传递如下参数:
@queryStr= * from test
@keyField=[ID] 
@pageSize=3 
@pageNumber=1
问题出来了,看输出结果(注意id):
id name fid
4 kwklover 2
5 kwklover 2
6 kwklover 2
根据传入参数,我们的预期应该是:
id name fid
1 kwklover 2
2 kwklover 2
3 kwklover 2

下面是我参照小春的存储分页写的分页存储过程,可以解决上面的问题:
CREATE Procedure prGetRecordByPage
(
@PageSize int, --每页的记录条数 
@PageNumber int, --当前页面
@QuerySql varchar(1000),--部分查询字符串,如* From Test order by id desc
@KeyField varchar(500) 
)
AS
Begin

Declare @SqlTable AS varchar(1000)
Declare @SqlText AS Varchar(1000)

Set @SqlTable=Select Top +CAST(@PageNumber*@PageSize AS varchar(30))+ +@QuerySql
Set @SqlText=Select Top +Cast(@PageSize AS varchar(30))+ * From 
+(+@SqlTable+) As TembTbA 
+Where +@KeyField+ Not In (Select Top +CAST((@PageNumber-1)*@PageSize AS varchar(30))+ +@KeyField+ From 
+(+@SqlTable+) AS TempTbB)
Exec(@SqlText)

End
GO