在 网上 讨论 如何 实现 分页 有很多程序，我在这里向大家 介绍一种实现分页的新的方法，使用 存储过程 来实现分页
由于 这段程序写的 比较早，那个时候 还没有 SQL 7,每一个 Varchar 只能 支持 255 个字符，所以 采取了一种比较笨的办法，如果大家有兴趣，请去 http://www.chinaasp.com/sqlbbs/default.asp 的数据库论坛发表意见，我会看情况，决定是否将这个 存储过程修改成为SQL 7 的存储过程；
并在此起到 一个 抛砖引玉 的 作用
这个 程序只能 达到 10 个 分页
if exists (select * from sysobjects where id = object_id('dbo.sp_productPage') and sysstat & 0xf = 4)
drop procedure dbo.sp_productPage
GO
CREATE PROCEDURE sp_productPage
@intStart TINYINT=1,
@intEnd TINYINT=10
with ENCRYPTION
AS
Declare @strProductID VARCHAR(8),@strProductName VARCHAR(20),
@strSQL1 VARCHAR(100),
@strSQL2 VARCHAR(100),
@strSQL3 VARCHAR(100),
@strSQL4 VARCHAR(100),
@strSQL5 VARCHAR(100),
@strSQL6 VARCHAR(100),
@strSQL7 VARCHAR(100),
@strSQL8 VARCHAR(100),
@strSQL9 VARCHAR(100),
@strSQL10 VARCHAR(100),
@intCCount TINYINT,
@intCount TINYINT,
@i TINYINT
select @i=1
Declare cur_Product SCROLL CURSOR For
Select ProductID,ProductName from KF_Product order by ProductID
Select @intCCount=count(productId) From KF_Product
open cur_Product
Fetch ABSOLUTE @intStart From cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Select @intCount=@intStart
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL1='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount) +' Union '
End
else
Begin
Select @strSQL1='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL2='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL2='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL3='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL3='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL4='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL4='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL5='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL5='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL6='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL6='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL7='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL7='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL8='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL8='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL9='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)+' Union '
End
else
Begin
Select @strSQL9='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
Fetch cur_Product Into @strProductID,@strProductName
if @@FETCH_STATUS=0
Begin
Select @intCount=@intCount+1
Select @strSQL10='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
End
else
Begin
Select @strSQL10='Select productId=''' + @strProductID + ''',productName=''' + @strProductName+ ''',ProductCount=' + convert(VARCHAR,@intcCount)+',ProductSumCount='+ convert(VARCHAR,@intCCount)
Goto EndPro
End
EndPro:
close cur_Product
DEALLOCATE cur_Product
print @strSQL1
print @strSQL2
print @strSQL3
exec(@strSQL1 + @strSQL2+ @strSQL3+@strSQL4+@strSQL5+@strSQL6+@strSQL7+@strSQL8+@strSQL9+@strSQL10)
GO
存储 过程创建 成功后，就可以在ASP 中 做 如下 调用
strSQL="sp_productPage 1,10
rst.open strSQL,conn,3,1
就可以了
|