Salut
Ne serait-ce pas plus simple ainsi
Set rec = CurrentDb.OpenRecordset(StrSqlNbPaiement, dbOpenDynaset)
If rec.RecordCount > 0 Then
Me.txtPaiementAdh.Value = rec.RecordCount
Else
...
Salut
Ne serait-ce pas plus simple ainsi
Set rec = CurrentDb.OpenRecordset(StrSqlNbPaiement, dbOpenDynaset)
If rec.RecordCount > 0 Then
Me.txtPaiementAdh.Value = rec.RecordCount
Else
...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.