Discussion :

[tibofo]

Bonjour,

Je viens de m'apercevoir que le code que j'avais récupéré ne marche pas.
Je l'ai modifié en pointant sur une de mes requêtes mais il ne trouve qu'une 1 ligne (sur 15).

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 Set bds = DBEngine.Workspaces(0).Databases(0)
 
 
            Set Rst1 = dbs.OpenRecordset(Requete_Commandes)  'XXXX   NOM REQUETE
            NBF = Rst1.RecordCount
            MsgBox ("nbre de BC : " & NBF)

NBF me sot 1 au lieu de 15


J'ai essayé de mettre directement le code SQL de ma requête (qui marche) mais à la place, j'obtiens erreur d'exécution 3075 erreur de syntaxe... Alors que celle-ci marche ailleurs ?!

Savez-vous comment je peux faire un openrecordset sur une requête ?

Merci
Thibault

[nico84]

Bonjour,

Je me souviens avoir lu que si rst1 est sur une table externe, rst1.recordcount renvoie le nombre d'enregistrements lus !

As-tu essayé de parcourir ton recordset pour voir s'il n'a bien qu'une ligne ?

[olive_tp]

Je confirme ce que dit nico84: pour avoir le nombre d'enregistrements d'un recordset, il faut au préalable placer celui-ci sur le dernier enregistrement. Dans le cas contraire, les données fournies par Recordset.RecordCount sont erronées.

Soit la toute petite modif dans le code envoyé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 Set bds = DBEngine.Workspaces(0).Databases(0)
            Set Rst1 = dbs.OpenRecordset(Requete_Commandes)  'XXXX   NOM REQUETE
            Rst1.Movelast
            NBF = Rst1.RecordCount
            MsgBox ("nbre de BC : " & NBF)

Là, ça affiche le bon décompte...

[Tofalu]

Je confirme ce que dit nico84: pour avoir le nombre d'enregistrements d'un recordset, il faut au préalable placer celui-ci sur le dernier enregistrement.

Incomplet

Recordcount retourne le nombre d'enregistrements total dans un recordset de type dbOpenTable et le numéro du dernier enregistrement atteint dans les recordset d'un autre type

[olive_tp]

...au temps pour moi: je n'avais pas connaissance de cette subtilité. Merci donc pour l'info.