Discussion :

[jam92400]

Bonjour

pourriez vous me dire ce qui ne va pas dans ma clause "Else" (en gras) car jamais il entre dedans alors que j'ai des cas ou il devrait:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
If g_int_flagDateFin = 1 Then
                        If Not IsNull(rsBafiCrit.Fields("MatDateIEMD")) Then
                            rsBafi400.Fields("DATEFIN") = rsBafiCrit.Fields("MatDateIEMD")
                        End If
                    Else
                    'trouble date here (jam)
                        If Not IsNull(rsBafiCrit.Fields("MatDateLFMD")) Then
                            rsBafi400.Fields("DATEFIN") = rsBafiCrit.Fields("MatDateLFMD")
                            Else
                            rsBafi400.Fields("DATEFIN") = "29991231"
                                                   End If
                         
                    End If

[Hatchepsout]

bonsoir
pardon mais cette expression "29991231" est une date ????????

[LeXo]

moi je te propose de regarder ta base pour voir si un de tes enregistrements contient un maDateFmd contient un Null et faire afficher celui pour etre sur.

tu mets des mouchards comme des msgbox ou de debug.print pour voir tes infos qui passent dans tes if

[Najdar]

Bonjour jam92400,

Essaie d'utiliser explicitement la propriété Value du champ.

Code :

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

rsBafiCrit.Fields("MatDateLFMD").Value