Problème de recordSet avec Access 2003
GuestCam
Messages postés
56
Statut
Membre
-
blux Messages postés 4993 Date d'inscription Statut Modérateur Dernière intervention -
blux Messages postés 4993 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
A voir également:
- Problème de recordSet avec Access 2003
- Access appdata - Guide
- Hns-self-wan-access-ipv6 - Forum Access
- Get access - Télécharger - Récupération de données
- Migration base access vers sql server - Télécharger - Gestion de données
- Télécharger word 2003 gratuit 01net - Forum Word
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 :
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 ?
Bonne fin de journée