Discussion :

[-Space-]

Bonjour,
Voila j'ai un nouveau problème qui est le suivant :
Après remplissage d'un champs, j'aimerai creer une procédure évenementielle (donc après mise à jour).
J'epxlique le principe :
J'ai 4 champs :
- heure départ
- heure arrivée
- temps sur chantier
- heures supp

Quand je soustrais l'heure de départ à l'heure d'arrivée, c'est niquel, la valeur se stocke dans temps sur place.
Après j'aimerai faire en sorte que temps sur place - 4h me donne le nombre d'heures supp et qu'il n'accepte pas les valeurs inférieur à 0.

J'ai donc tapper le bout de code suivant dans après mise à jour de temps sur chantier qui ne marche pas :

Const forfait As Date = #4:00:00 AM#

If tps_sur_chantier > forfait Then
Me.heures_supp.Value = Me.tps_sur_chantier - forfait
Else
msg = "Pas d'heure supplémentaires !"
retour = MsgBox(msg, vbOKOnly, "Facturation Transport")
DoCmd.GoToControl "tps_sur_chantier"
End If

Quelqu'un pourrait-il m'aider?
Merci

[Lou Pitchoun]

Salut
C'est à quel niveau que ça ne marche pas ?? Il y a un message d'erreur ?? quelque chose qui te dit que ça marche pas ??

[-Space-]

Non, il n'y a aucun message d'erreur et c'est pour ca que je ne comprends pas.
Il n'y pas d'erreur de syntaxe dans mon code ou qq chose comme ca?

D'autant plus que quand ya pas d'heures supp, il m'affiche bien le message, en revanche il ne m'affiche pas les heures supp quand il y en a.

[Arkham46]

bjr,

attention les champs de type Date ne sont pas des durées...

http://access.developpez.com/faq/?page=dates#durees

[Lou Pitchoun]

Met un point d'arrêt sur la ligne du If et regarde ce qui se passe. Pour voir si le code s'exécute correctement à chaque fois.

[-Space-]

j'ai trouvé.
J'avais mis une valeur ds le "valide si " de ma table en question ^^
Pb résolu.
Merci à tous