|
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＞
第三种：用Grid控件设计分页
所有的方法中，这种方法最容易。你只需拖DTC中的Recordset控件和Grid控件到asp网页中就行了。而且，你还能选择是在服务器平台还是在客户端平台控制翻页。缺点就是你必须用它给定的格式显示，而不能自己自由控制表格的显示格式。
方法如下：
在VI6.0中建一个工程emp.vip。再在工程中添加一个asp网页：emp3.asp。
第一步：选VI6.0菜单条上的“add data connect…”，按开发工具的导航提示，你就可以很容易地建立与Employee.mdb数据库的连接。从DTC工具栏中拖一个Recordset控件到网页中，并设置其属性。具体如图：
当你拖控件到网页中时，VI6.0会自动提示你“是否使用Scripting object model”，按yes。
第三步：从DTC工具栏中拖一个Grid控件到网页中，然后单击鼠标右键，设置其属性，如：选在第二步中创建的Recordset控件名，选择emp表中的字段，每页显示多少条记录以及显示格式等。非常简单方便，只要照着导航提示做就行了。
（编辑：佛山站长网）
【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!
|
