Discussion :

[mawelle]

Bonjour,

j'ai un problème que je n'arrive absolument pas à résoudre.
je dispose d'une table avec 2 champs de type date/heure (masque de saisie: 00/00/0000).
A partir d'une liste déroulante de ZAC d'un formulaire nommé rechercher_zac, je souhaite afficher les dates (mais peut être Null) associées à la ZAC sélectionnées dans F_modification_ZAC.

J'ai essayé ce code :

Code :

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

1
2
3
4
5
If (rs.Fields("DATECREA").Value) = "" Then
        Forms![F_modification_ZAC]!date_création = ""
    Else
        Forms![F_modification_ZAC]!date_création = rs.Field ("DATECREA").Value
       End If

mais ce reçois un message :
erreur '3021'
BOF ou EOF est égale à ture ou l'enregistrement actuel a été supprimé. l'opération demandée nécessite un enregistrement actuel.

Voyez vous d'où provient mon erreur??

Merci par avance pour la moindre aide.

[mawelle]

personne ne voit??

[LedZeppII]

Bonsoir,

Soit le recordset rs est vide, soit il n'est pas positionné sur un enregistrement (BOF=True ou EOF=True).
Un recordset se présente ainsi :

BOF (en deça du premier enregistrement)
1er Enregistrement
2ème Enregistrement
...
avant dernier Enregistrement
dernier Enregistrement
EOF (au dela du dernier enregistrement)

Code vb :

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

1
2
3
4
5
6
7
8
9
If (rs.BOF=False And rs.EOF=False) Then
   If (rs.Fields("DATECREA").Value) = "" Then
           Forms![F_modification_ZAC]!date_création = ""
       Else
           Forms![F_modification_ZAC]!date_création = rs.Field ("DATECREA").Value
   End If
Else
   ' recordset vide ou non positionné sur un enregistrement
Endif

A+