[Access] Récupération du nb d'enregistrements
erwan51
Messages postés
634
Statut
Contributeur
-
erwan51 Messages postés 634 Statut Contributeur -
erwan51 Messages postés 634 Statut Contributeur -
Bonjour à tous,
J'aimerais savoir comment récupérer le nombre d'enregistrements dans une base Access soit en VBA soit en VB 6.0
D'avance merci
A+
A+
Erwan51
J'aimerais savoir comment récupérer le nombre d'enregistrements dans une base Access soit en VBA soit en VB 6.0
D'avance merci
A+
A+
Erwan51
1 réponse
-
Salut,
Pour retirer le nombre d'enregistrements contenus dans une tables tu dois la parcourir entièrement. Exemple:
Function CountR() as int
Dim mDb As Database
Dim mRs As Recordset
Set mDb=CurrentDb
Set mRs = mDb.OpenRecordset("Nom_de_laTable", dbOpenDynaset, dbSeeChanges, dbPessimistic)
mRs.MoveLast
mRs.MoveFirst
CountR = mRs.RecordCount
End Function
Rien n'est plus dangereux qu'une idée quand on a
qu'une idée :-)
