Partage via

Boutons de navigation du carnet d’adresses

  • Article

L’application Carnet d’adresses affiche les boutons de navigation en bas de la page Web. Vous pouvez utiliser les boutons de navigation pour parcourir les données de la grille HTML en sélectionnant la première ou la dernière ligne de données, ou les lignes adjacentes à la sélection actuelle.

Important

À compter de Windows 8 et Windows Server 2012, les composants serveur RDS ne sont plus inclus dans le système d’exploitation Windows (voir Windows 8 et livre de recettes de compatibilité Windows Server 2012 pour plus de détails). Les composants clients RDS seront supprimés dans une prochaine version de Windows. Évitez d’utiliser cette fonctionnalité dans le nouveau travail de développement et prévoyez de modifier les applications qui utilisent actuellement cette fonctionnalité. Les applications utilisant RDS doivent migrer vers le service de données WCF .

L’application Carnet d’adresses contient plusieurs procédures qui permettent aux utilisateurs de cliquer sur les boutons Premier, Suivant, Précédentet Dernier pour naviguer dans les données.

Par exemple, en cliquant sur le bouton First, on active la sub-procédure First_OnClick de VBScript. La procédure exécute une méthode MoveFirst, qui rend la première ligne de données la sélection actuelle. Cliquer sur le bouton Dernier active la procédure Sub Last_OnClick, qui appelle la méthode MoveLast, rendant la dernière ligne de données la sélection actuelle. Les boutons de navigation restants fonctionnent de la même manière.

' 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

Voir aussi

Objet DataControl (RDS)
Méthodes MoveFirst, MoveLast, MoveNext et MovePrevious (RDS)