[AC-2007] Créer un message d'alerte evenement "sur changement" [Résolu]

[samsab]

Bonjour à tous
je débute......
dans un formulaire, il est possible très facilement de changer la valeur d'un champs si on ne fait pas attention.
Il est simple de verrouiller les champs, mais cela est trop restrictif.
Comment créer un message d'alerte, apparaissant quand la valeur du champs non verrouillé est modifiée, permettant ainsi d'exiger une confirmation pour que le changement soit pris en compte et remonte jusqu'à la table?

merci pour votre patience à me lire et surtout à me répondre.
A+
Emmanuel

[loufab]

Bonjour,

Il s'agit d'un question purement IHM (je transfere sur le bon forum).

Utilise l'événement Avant Maj (avant mise à jour) du champ concerné.
Il y a le Cancel qui te permet d'annuler la mise à jour.

Regarde le tuto sur les événements http://loufab.developpez.com/tutorie...ss/evenements/ pour y voir plus clair.

Cordialement,

[dok flint]

Bonjour ,

Tu pourra mettre sur l'événement "Avant mise à jour" un petit code du style :

Code :

1
2
3
4
5
6
 
If MsgBox("Voulez vous confirmer la saisie", vbYesNo, "Confirmation") = vbYes Then
Cancel = False
Else
Cancel = True
End If

A+

[samsab]

Merci pour vos réponses
cela me fait avancer
A+

[dok flint]

Bonjour ,
N'oublies pas le si c'est OK.
A+

[samsab]

pas tout à fait résolu en fait.
si la confirmation ne se fait pas, j'aurais aimé retrouver la valeur initiale du champ. ce qui n'est pas le cas avec ce code.
autrement dit
soit il faudrait un message d'alerte avant changement de la valeur (et là quel est l'évenement à surveiller? onfocus?)
soit il faudrait que le code mémorise la valeur initiale, et la garde si le changement est infirmé.

auriez vous des pistes pour cela?
Merci mille fois
A+

[dok flint]

Bonjour ,
Il faudra juste ajouter un petit Undo et ça donne :

Code :

1
2
3
4
5
6
7
 
If MsgBox("Voulez vous confirmer la saisie", vbYesNo, "Confirmation") = vbYes Then
Cancel = False
Else
Cancel = True
Me![champ].undo
End If

[samsab]

hello
marche pô.
je suis sous AC 2007
le débogueur coince sur

Code :

Me![champ].Undo

[Mat08]

Bonsoir, avez-vous bien mis le nom réel de votre champ ?

[samsab]

bon gland! mais c'est bien dur!!!
Ah quel benet!
merci

[dok flint]

Bonjour ,
Bonne continuation
A+