[AC-2003] Ajouter 15j à une date issue d'une requête

[gomick]

Bonjour à tous,

Malgrè mes recherches, je n'ai pas trouvé la solution à mon problème, ou j'ai peut-être pas cherché les bons termes.

Je suis un peu débutant en Access et j'apprends en faisant ...

J'ai une table dans laquelle je rentre des évènements liés à un bac (aquarium), notamment les changements d'eau. Elle est "liée" avec la table "Bac" par le n° du bac.
J'ai une requête sur cette table (évènements_bac) qui sélectionne le dernier changement d'eau effectué.
Jusque là tout va bien.

Ce que j'aimerai, c'est mettre à jour "automatiquement" un champs dans ma table "Bac" s'intitulant "Date du dernier chgt d'eau" ainsi qu'un autre champs auquel je voudrai ajouter 15 jours : Date prochain changt d'eau.

Et .... je sais pas comment faire

merci d'avance pour votre aide. si je ne suis pas assez clair, n'hésitez pas à me le dire je tenterai de faire mieux !

[rjamin]

Bonjour,
La formule suivante

Code :

[Date prohain chgt eau] = [Date dernier chgt eau]+15

[pc75]

Bonjour,

Code :

1
2
3
 
update Bac
set [Date prochain changt d'eau] = DateAdd("d", [Date dernier chgt eau], 15)

[gomick]

Merci pour vos réponses ..

Dans mon formulaire où je saisit ce fameux changement d'eau (donc sa date), j'ai un bouton qui enregistre les données dans la table entretien.

Est-ce dans ce bouton que je dois entrer le code que vous me proposez ? Si oui où exactement ?
Et comment access va savoir quelle ligne updated (1 ligne = 1 bac différent) ?

Désolé je connais les basiques d'access mais dès qu'on touche à Vba ou un peu de prog je connais pas trop

Edit : j'ai fait un p'tit schéma plus parlant j'espère

[gomick]

P'tit up ... il est pas beau mon schéma ??

[pc75]

Re,

Code :

1
2
3
4
 
update Bac
set [Date prochain changt d'eau] = DateAdd("d", [Date dernier chgt eau], 5) 
where [N° bac] = '999'

[gomick]

Merci pour ta réponse.

Mais je mets ce code où ??

[pc75]

Re,

Envoyé par gomick

Merci pour ta réponse.

Mais je mets ce code où ??

Dans l'évenement Click du bouton.