Bnojour a tous,

dans une table, j ai une reference avec la date et l heure (champs format) de production de cette reference.Seulement tous les produits qui ont ete produit avant 06:15:00 le 01.09.2006 par ex, je veux leur attribuer le 31.08.2006 comme date de production (1 jour avant).

Dans une requete, j ai crée une expression

Datum2:MAN_Arbeitstag(Timestamp)


J ai codé MAN_Arbeitstag en vba:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Function MAN_Arbeitstag(Datum_Uhrzeit As Date) As Date
 
Dim Datum As Date
Dim Uhrzeit As Date
 
Datum = DateValue(Datum_Uhrzeit)
Uhrzeit = TimeValue(Datum_Uhrzeit)
 
If Uhrzeit < "06:15:00" Then
    Datum = Datum - 1
End If
 
 
MAN_Arbeitstag = FormatDateTime(Datum)
End Function

existe une fonction en sql aussi que je pourrai utiliser?

Mon probleme vient de la. C est a dire que maintenant je cherche tte les ref qui ont été produites a partir du 01.09.2006 (donc a partir de 06:15:00 ).

Donc dans ma requete je rajoute comme critere de Datum2 : >=#01.09.2006#


Qd je lance ma requete j ai un message d erreur qui me dit que le type de donnee du critere n est pas correct...

J ai jusqu ici pas mal essayé, comme de changer le format de date ds les propriéte, essayer les formats a l amrericaine, mais rien n y fait.

Qun a t il une idee?

Merci d avance