Discussion :

[gentoo]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub Form_Current()
Dim Db As DAO.Database
Dim oNumDoublon As DAO.Recordset
Dim NumDoublon As Long
 
Set Db = CurrentDb
Set oNumDoublon = CurrentDb.OpenRecordset("ReqNumCourrierFicheNavette")
 
                                    NumDoublon = oNumDoublon.RecordCount
                                    MsgBox NumDoublon                                            
End Sub

Bonjour,

J'ai une requête nommée :ReqNumCourrierFicheNavette
C'est une requête de regroupement.

Je dois poser une condition posée sur le nombre d'enregistrements de la requête.
Le problème est le suivant. J'ai deux enregistrements retournés dans ma requête,et bizarrement "oNumDoublon.RecordCount" me retourne =1

Où ai-je l'erreur?

Merci de votre aide

Cordialement,

Gentoo

[keita]

bonjour

Où ai-je l'erreur?

Pas d'erruer sauf que tu dois ajouter ceci: oNumDoublon.MoveLast

Code :

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

1
2
3
4
..................
oNumDoublon.MoveLast
NumDoublon = oNumDoublon.RecordCount
                                    MsgBox NumDoublon

@+

[gentoo]

Un Grand Merci keita!


J'ai appliqué ton conseil, et surtout je n'avais pas fait de regroupement
et là, ça change tout!


Merci!!!