添加代码在显示的记录集 (RDS) 中移动

目录

可对 RDS.DataControl 对象中的 Recordset 使用 Move 方法,以此定位显示在 Web 页中数据绑定控件的数据记录。例如,假设通过绑定 RDS.DataControl 对象来显示网格中的 Recordset。那么,就可以将“第一”、“最后”、“下一个”和“上一个”按钮包括进来,使用户可以单击这些按钮移动到所显示的 Recordset 中的第一、最后、下一个和上一个记录。实现该功能的方法是在这些按钮的 OnClick 过程中,分别地调用 RDS.DataControl 对象的 MoveFirst, MoveLast, MoveNext, 和 MovePrevious 方法。

请查找字串“教程:在显示的记录集中移动”。复制如下脚本并粘贴在注释后面。

SUB First_OnClick
   ADC.Recordset.MoveFirst
END SUBSUB Next_OnClick
   If ADC.Recordset.EOF Then   '移动无法超出末端记录
      ADC.Recordset.MoveFirst 
      Exit Sub
   End If      ADC.Recordset.MoveNext
END SUBSUB Prev_OnClick
   If ADC.Recordset.BOF Then   '移动无法超出顶端记录
      ADC.Recorset.MoveFirst   '移出 BOF 缓冲区
      ADC.Recordset.MoveLast
      Exit Sub
   End If
   ADC.Recordset.MovePrevious
END SUBSUB Last_OnClick
   ADC.Recordset.MoveLast
END SUB

下一页

www.2mysite.net