通讯簿导航按钮

地址簿应用程序在网页底部显示导航按钮。 使用导航按钮，选择数据的第一行或最后一行，或者与当前所选内容相邻的行，可以浏览 HTML 网格显示中的数据。

重要

从 Windows 8 和 Windows Server 2012 开始，Windows 操作系统不再包含 RDS 服务器组件（有关更多详细信息，请参阅 Windows 8 和 Windows Server 2012 兼容性实用手册）。 Windows 的未来版本中将移除 RDS 客户端组件。 请避免在新的开发工作中使用该功能，并着手修改当前还在使用该功能的应用程序。 使用 RDS 的应用程序应迁移到 WCF 数据服务。

导航 Sub 过程

地址簿应用程序包含几个过程，用户可以单击“第一项”、“下一项”、“上一项”和“最后一项”按钮在数据间移动。

例如，单击“第一项”按钮会激活 VBScript First_OnClick Sub 过程。 该过程执行 MoveFirst 方法，使第一行数据成为当前所选内容。 单击“最后一项”按钮会激活 Last_OnClick Sub 过程，该过程调用 MoveLast 方法，使最后一行数据成为当前所选内容。 其余导航按钮的工作方式类似。

' Move to the first record in the bound Recordset.  
Sub First_OnClick  
   DC1.Recordset.MoveFirst  
End Sub  
  
' Move to the next record from the current position   
' in the bound Recordset.  
Sub Next_OnClick  
   If Not DC1.Recordset.EOF Then    ' Cannot move beyond bottom record.  
      DC1.Recordset.MoveNext  
      Exit Sub  
   End If     
End Sub  
  
' Move to the previous record from the current position in the bound   
' Recordset.  
Sub Prev_OnClick  
   If Not DC1.Recordset.BOF Then    ' Cannot move beyond top record.  
      DC1.Recordset.MovePrevious  
      Exit Sub  
   End If  
End Sub  
  
' Move to the last record in the bound Recordset.  
Sub Last_OnClick  
   DC1.Recordset.MoveLast  
End Sub  

另请参阅

DataControl 对象 (RDS)
MoveFirst、MoveLast、MoveNext 和 MovePrevious 方法 (RDS)