第二种:表单传送参数法
这种方法在创建Recordset对象时与第一种相同,只是在翻页控制时,采用<input>和case语句配合来实现翻页。网页的名字为: emp2.asp。此方法在编程逻辑上有个缺点:就是在按过“上页”或“下页”钮后,再在浏览器上按刷新按钮时,会自动翻页。源代码如下:
| if Pagenum = "" Then Pagenum = 1 //从第一页开始显示 //建立数据库连接和Recordset对象实例rs。 与第一种方法相同,此处略过。 RS.Pagesize = 10 ’ 设置一页中显示的记录条数为10条 // 确定翻页的动作 Select Case Request("NAV") Case "" session("Pagenum") = 1 case "First" ’ First Record session("Pagenum") = 1 case "Prev" ’ Previous Record if session("Pagenum") > 1 then session("Pagenum") = session("Pagenum") - 1 End If case "Next" ’ Next Record if session("Pagenum")< RS.PageCount then session("Pagenum") = session("Pagenum") + 1 End if case "Last" ’ Last Record session("Pagenum") = RS.PageCount End Select RS.Absolutepage = Clng(session("Pagenum")) //确定当前页的第一条记录号 // 显示当前页 同第一种方法,此处略过。 // Nav 翻页按钮设置 <form method="GET" action="emp2.asp"> <input type="submit" name="NAV" Value="首页"> <input type="submit" value="上页" name="NAV"> <input type="submit" value="下页" name="NAV"> <input type="submit" value="末页" name="NAV"></form> |
我来说两句:
推荐文章
相关文章