[AC-2007] Problème de format de date érronné lors de l'insertion dans une table [Résolu]

[dumas.blr]

Bonjour,

Je me retrouve face à un problème que je n'arrive pas à résoudre.

Dans mon application, j'ai créé une table de log qui me permet de tracer tous les évènements.

le format de Cette table est le suivant :
NoUnique (clé) -> (num auto)
...
Date évènement -> date/heure format : date, général
...

Pour alimenter cette table, j'ai créé la fonction suivante :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Sub insert_Evenement(NumEnr As Long, CodeEvenement As Integer, Optional _
                                                               ParamEvt As Variant, Optional Comment As String)
    Dim NumPAram As Variant, Commentaire As String, SQLInsertEvt As String
    NumPAram = "Null"
    Commentaire = ""
    If Not (IsMissing(ParamEvt)) Then: NumPAram = ParamEvt
    If Not (IsMissing(Comment)) Then: Commentaire = Comment
    SQLInsertEvt = _
    "INSERT INTO [Trace opérations] " & _
                   "(ENR,[Date evenement], [Type évenement], [Paramètre optionnel], Commentaire) values(" & _
                   NumEnr & ", " & _
                       "#" & Now() & "#, " & _
    CodeEvenement & ", " & _
    NumPAram & ",""" & _
    Commentaire & """);"
    DoCmd.SetWarnings False
    DoCmd.RunSQL SQLInsertEvt
    DoCmd.SetWarnings True
End Sub

Or, lorsque j'insère un enregistrement dans la base, le format du champ Date évènement est du type "MM/JJ/AAAA hh:mm:SS" alors que je m'attends à obtenir un format du type "JJ/MM/AAAA hh:mm:SS"

en utilisant le débugger je lance

Code :

 debug.print now

et je récupère bien

Code :

1
2
 
07/04/2011 11:40:17

alors que dans ma table je trouve :

Code :

1
2
 
04/07/2011 11:40:17

Nota : ce problème n'arrive que pour les date inférieures au 13 du mois

Quelqu'un a-t-il une idée ?

[vodiem]

salut dumas.blr,

l'insertion des dates en sql sont toujours à faire au format us. il te faut formater now().

[pier.antoine]

Bonjour

Personnellement, pour résoudre les problème de comparaison, ou d'insertion, je n'utilise plus le format "Date".

Toutes mes dates sont en "réel double". Au moment de l'affichage, je les formate comme je le souhaite.

Cela me semble beaucoup plus facile.

Pierre

[dumas.blr]

OK, merci,

Je verrai s'il n'y a pas de régression à partir du 13/04