Set Cmd=server.CreateObject("Adodb.Command")

　　Cmd.ActiveConnection=conn

　　Cmd.CommandText="ycuu_gb_getmsg"

　　Cmd.CommandType=4'adCmdStoredProc

　　cmd.prepared=true'

　　set param=Cmd.CreateParameter("@iPageNo",adInteger,1,2,Page)

　　Cmd.Parameters.Append param

　　set param=Cmd.CreateParameter("@iPageSize",adInteger,1,2,PageSizeConst)

　　Cmd.Parameters.Append param

　　set rs=Cmd.execute　　

　　第二种，使用connection对象的执行方法直接执行，具体如下：　　

　　set rs=conn.execute ("execute ycuu_gb_getmsg "&page&", "&pagesizeConst)　　

　　第三种，不使用存储过程，直接使用ADODB.RecordSet的功能来分页，具体代码如下：　　

　　Set rs = Server.CreateObject("ADODB.Recordset")

　　sql = "Select * FROM Guestbook Order By dateandtime Desc"

　　rs.open sql,conn,1,1

　　rs.pagesize = 150'每页显示的留言数量，

　　total = rs.RecordCount

　　mypagesize = rs.pagesize

　　rs.absolutepage = page　

　　为了更加明显地显示出速度，我把每页显示的留言数量加大到150(事实上当然不会设置这么大的数值啦)。至于我机器的配置，就省略不说了，因为主要是速度对比。　　

　　发现，执行的时候时间分别如下：　

　　第一种：稳定于0.1953125 秒到0.2109375 秒之间，平均值大概是：0.20秒　　

　　第二种：稳定于0.1716875 秒到0.1857秒之间，平均值大概是：0.177秒　　

　　第三种：稳定于0.4375 秒到0.4632秒之间，平均值大概是：0.45秒　　

　　但是，当读取的记录条数为20的时候，结果如下：

　　发现，执行的时候时间分别如下：　　

　　第一种：稳定于.0390625 秒到.0546875 秒之间，平均值大概是：0.045秒　　

　　第二种：稳定于0.046875 秒到.0546875 秒之间，平均值大概是：0.050秒　　

　　第三种：稳定于.09375 秒到0.1015625 秒之间，平均值大概是：0.97秒　　

　　在这样看来，似乎conn.execute和command.execute这两种方式似乎差别并不大，

　　而前者的调用方式好像更加简单一点。

　　同时，在这里可以看出分页的存储过程速度确实比recordset的分页速度要快很多。