|
|
|
|
Bonjour,
j'ai deux tables: OBSERVATION et T_ESPECE, liées par le champ ESPECE
dans OBSERVATION, 2 champs: DATE et ESPECE
dans T_ESPECE, 3 champs: ESPECE, DATE_DEBUT, DATE_FIN
j'aimerai dans une requête créer un champ où s'affiche "1" si DATE est compris entre DATE_DEBUT et DATE_FIN et "0" dans le cas contraire.
pour l'instant mes champs DATE, DATE_DEBUT et DATE_FIN sont au format jj/mm/aaaa, mais il faudrait que cette requête ne prenne pas en compte l'année.
merci de votre aide
matthias
Configuration: Windows XP Internet Explorer 6.0
Bonjour,
'exemple d'appel
'e=TestDate(Date,Date_Debut,Date_Fin)
'Retourne 1 si compris et 0 si pas.
'
Function TestDate(DT As Date, DD As Date, DF As Date) As Integer
Dim D1 As Long, D2 As Long, D3 As Long
D1 = DateSerial(2000, Month(DT), Day(DT))
D2 = DateSerial(2000, Month(DD), Day(DD))
D3 = DateSerial(2000, Month(DF), Day(DF))
If D1 >= D2 And D1 <= D3 Then
TestDate = 1
End If
End Function
NB: ne tient pas compte de l'année, mais ça me semble bizard, si entre décembre et janvier ? Renvoi 0 A+ L'expérience instruit plus sûrement que le conseil. (André Gide) Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius) |
Slt,
|
Re,
|