Problème de recordSet avec Access 2003

Fermé
GuestCam Messages postés 56 Date d'inscription jeudi 28 septembre 2006 Statut Membre Dernière intervention 8 mars 2008 - 29 nov. 2006 à 14:39
blux Messages postés 26013 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 26 avril 2024 - 26 déc. 2007 à 20:37
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
A voir également:

2 réponses

blux Messages postés 26013 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 26 avril 2024 3 289
29 nov. 2006 à 15:11
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.MoveFirst
Ca irait mieux ?
0
GuestCam Messages postés 56 Date d'inscription jeudi 28 septembre 2006 Statut Membre Dernière intervention 8 mars 2008
29 nov. 2006 à 15:55
merçi bien. ça marche à merveille.
Bonne fin de journée
0
aide moi pour enrigistrer l'access
0
blux Messages postés 26013 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 26 avril 2024 3 289
26 déc. 2007 à 20:37
aide moi à être plus clair...
0