Freigeben über

Navigationsschaltflächen für Adressbuch

  • Artikel

Die Adressbuchanwendung zeigt die Navigationsschaltflächen unten auf der Webseite an. Sie können die Navigationsschaltflächen verwenden, um durch die Daten im HTML-Raster zu navigieren, indem Sie entweder die erste oder letzte Datenzeile oder Zeilen neben der aktuellen Auswahl auswählen.

Wichtig

Ab Windows 8 und Windows Server 2012 sind RDS-Serverkomponenten nicht mehr im Windows-Betriebssystem enthalten (weitere Details finden Sie unter Windows 8 und Windows Server 2012 Compatibility Cookbook). RDS-Clientkomponenten werden in einer zukünftigen Version von Windows entfernt. Vermeiden Sie die Verwendung dieses Features in neuer Entwicklungsarbeit, und planen Sie, Anwendungen zu ändern, die derzeit dieses Feature verwenden. Anwendungen, die RDS verwenden, sollten zu WCF Data Servicemigrieren.

Die Adressbuchanwendung enthält mehrere Verfahren, mit denen Benutzer auf die Schaltflächen First, Next, Previousund Last Schaltflächen klicken können, um die Daten zu navigieren.

Wenn Sie beispielsweise auf die Schaltfläche Erste klicken, wird die VBScript-First_OnClick Sub-Prozedur aktiviert. Die Prozedur führt eine MoveFirst-Methode aus, wodurch die erste Datenzeile zur aktuellen Auswahl wird. Wenn Sie auf die Schaltfläche Letzte klicken, wird die Sub-Prozedur Last_OnClick aktiviert, die wiederum die Methode MoveLast aufruft und die letzte Datenzeile zur aktuellen Auswahl macht. Die verbleibenden Navigationsschaltflächen funktionieren ähnlich.

' 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

Siehe auch

DataControl-Objekt (RDS)
Methoden MoveFirst, MoveLast, MoveNext und MovePrevious (RDS)