Problème de recordSet avec Access 2003
GuestCam
Messages postés
56
Statut
Membre
-
blux Messages postés 2045 Date d'inscription Statut Modérateur Dernière intervention -
blux Messages postés 2045 Date d'inscription Statut Modérateur Dernière intervention -
salut à tous,
je programme en VBA sous access 2003.
J'ai écrit un bout de code juste pour afficher le numéro du premier enregistrement, mais au résultat j'ai un numéro d'un autre enregistrement .Voiçi le code:
Dim db As DAO.Database 'pointeur sur la base de données
Dim rstDatabase As DAO.Recordset 'pointeur sur la table
Set db = CurrentDb
Set rstDatabase = db.OpenRecordset("ANCIEN_DATABASE")
MsgBox "premier numero" & rstDatabase!NUMERO
Même quand j'ajoute rstDatabase.MoveFirst, ça ne change rien.
Merçi d'avance pour votre aide
je programme en VBA sous access 2003.
J'ai écrit un bout de code juste pour afficher le numéro du premier enregistrement, mais au résultat j'ai un numéro d'un autre enregistrement .Voiçi le code:
Dim db As DAO.Database 'pointeur sur la base de données
Dim rstDatabase As DAO.Recordset 'pointeur sur la table
Set db = CurrentDb
Set rstDatabase = db.OpenRecordset("ANCIEN_DATABASE")
MsgBox "premier numero" & rstDatabase!NUMERO
Même quand j'ajoute rstDatabase.MoveFirst, ça ne change rien.
Merçi d'avance pour votre aide
2 réponses
-
Salut,
ACCESS ne range pas les enregistrements dans l'ordre croissant des clés...
Si tu veux le premier enregistrement (celui avec la clé primaire la plus faible, ou sur un index particulier), alors il faut utiliser la proriété index :Set rstDatabase = db.OpenRecordset("ANCIEN_DATABASE") rstDatabase.Index = "PrimaryKey" ' ou nom de la colonne indexée rstDatabase.MoveFirstCa irait mieux ?
-
