|
第四种：DHTML法一。
数据记录显示在一个HTML表中。它利用DHTML中表的数据绑定特性来控制记录的分页显示。缺点就是你的翻页方法将被限制为一种特定的方式：只能“上页”和“下页”而不能“首页”和“末页”。由于是在客户端控制翻页，所以，这种和第五种方法是速度最快的，但遗憾的是它只能在支持DHTML的浏览器上使用。
在DHTML中，＜TABLE＞的DATASRC属性可使表格绑定到一个数据源，另一个属性DATAPAGESIZE可指定一页一次显示的记录数。
我们来看下面的例子：
第一步：拖Recordset控件到新建的网页emp4.htm中，设置其属性，方法同第三种，此处略。
第二步：输入下面的代码：
＜TABLE ID="Table1" DATASRC="#Recordset1_RDS" DATAPAGESIZE=5＞ //假定前面设定Recordset控件名为Recordset1。每页显示5条记录。
＜THEAD＞
＜TH ALIGN="left" WIDTH=150＞Emp ID＜/TH＞ //输出表头
＜TH ALIGN="left" WIDTH=200＞Last Name＜/TH＞
＜TH ALIGN="left" WIDTH=200＞First Name＜/TH＞
＜/THEAD＞
＜TR＞
＜TD＞＜DIV DATAFLD="Emp ID"＞＜/DIV＞＜/TD＞ //输出表内容
＜TD＞＜DIV DATAFLD="Last Name"＞＜/DIV＞＜/TD＞
＜TD＞＜DIV DATAFLD="First Name"＞＜/DIV＞＜/TD＞
＜/TR＞
＜/TABLE＞
第三步：然后,增加一对DTCs Button按钮控件来做翻页导航，一个命名为“btnPrevious”（上一页），一个命名为“btnNext”（下一页）。它们相应的脚本如下：
＜SCRIPT LANGUAGE=VBScript＞
Function btnPrevious_onclick()
Table1.previousPage()
End Function
Function btnNext_onclick()
Table1.nextPage()
End Function
＜/SCRIPT＞ 第五种：DHTML法二
这种方法是对第四种方法的完善。采用手工编写脚本的方法，使我们能做“首页”，“末页”翻页导航按钮，并能确定每条记录的位置（记录号）。由于篇幅的关系，我在下面只介绍一个具体例子，并给出简要说明。其它关于DHTML和Recordset控件的一些属性和方法请读者自行参照相关书籍。这里需要提请注意的是，Recordset控件与第一、二种方法中介绍的ADO的Recordset对象有些不同：Recordset控件没有直接给出pagesize和pagecount等属性，需要用下面介绍的方法来计算。
第一步：拖Recordset控件到新建的网页emp5.htm中，名字为Recordset1，设置其属性，方法同第三种，此处略。
第二步：定义三个全局变量和编写Recordset1的ondatasetcomplete（数据设置完成时）脚本。
Dim gCurrentPageNumber //当前页号
Dim gMaxPageNumber //最大页数
Dim gRecordsPerPage //每页显示记录数
gRecordsPerPage = 5 // 设置每页显示记录数为5条记录。
Function Recordset1_ondatasetcomplete()
totalRecordCount = Recordset1.getCount() //总的记录条数
gMaxPageNumber = Int(totalRecordCount / gRecordsPerPage) //获得最大页数
If (totalRecordCount Mod gRecordsPerPage) ＞ 0 then
gMaxPageNumber = gMaxPageNumber + 1
End If
End Function
第三步：创建翻页导航按钮。
（编辑：佛山站长网）
【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!
|
