[AC-2003] Contrôle de cohérence [Résolu]

[flomen]

Bonjour,
Je recherche un moyen pour contrôler la cohérence d'un enregistrement. En résumé, je recherche à associer une fonction VBA qui me permettra de contrôler la cohérence de l'enregistrement en cours. Si l'enregistrement en cours d'un formulaire est incohérent, empêcher : de passer au suivant, au précédent, de fermer le formulaire, enfin tous les cas qui permettent de quitter l'enregistrement en cours.
Merci

[Philippe JOCHMANS]

Bonjour

Lorsque tu parles d'incohérence, c'est en fonctions de critères.

Il faudrait donc que tu les énumères, car certains contrôles peuvent se faire au niveau des tables, d'autres au niveau du formulaire.

Donc sans nous donner des détails sur ces contrôles d'incohérence, c'est

Philippe

[flomen]

Bonjour,
Merci d'avoir passé un peu de temps pour me répondre.
Tout simplement, ce que je recherche c'est de prendre la main (événement) avant de quitter l'enregistrement en cours (Formulaire).
Les contrôles à effectuer : c'est la valeur d'un champ par rapport à un autre,
vérifier que tous les champs obligatoires ont biens été renseignés, etc...
D'avance Merci

[flomen]

Bonjour,
J'ai trouvé la réponse à ma question, il suffissait d'utiliser l'événement : avant MAJ et si un erreur d'incohérence est constatée, il suffit de terminer par l'instruction END et on reste sur l'enregistrement quelque soit le moyen utilisé pour passer à un autre enregistrement (roulette souris, suivant, flèche haut ou bas, etc ....)
Merci

[flomen]

Bonjour,
J'ai été un peu vite, avec l'instruction End pour sortir de l'événement : Avant MAJ ça fonctionne, je reste bien sur l'enregistrement en cours mais le gros problème c'est que j'ai perdu toutes les valeurs Public.
Exemple :

Code :

Public ANNEE as long

Cette variable est initalisée au début de l'application, mais après avoir passé sur l'instruction End, elle a perdue sa valeur !
Si vous avez des idées, merci de me les communiquer

[pgz]

Bonsoir.

Si tu utilises l'évènement BeforUpdate du formulaire,

Code :

Cancel = True

devrait empêcher l'enregistrement, non?

PGZ

[flomen]

Bonsoir,
As-tu une explication sur la perte de la valeur des variables Public après une instruction End ?
Merci

[flomen]

Bonsoir,
Une autre question toujours pour le même problème
Comment annuler une command (enr suivant, enr précédent, fermeture formulaire) dans une fonction déclenchée sur événement avant MAJ ou Après MAJ ?
Dans une function (Av MAJ) Je controle les données de l'enregistrement en cours, si je détecte une anomalie je souhaite envoyer un message pour demander de corriger, dans ce cas je dois rester sur l'enregistrement en cours.
Merci

[pgz]

Bonsoir

Envoyé par flomen

As-tu une explication sur la perte de la valeur des variables Public après une instruction End ?

Oui, c'est dans la doc :

END : Termine l'exécution immédiatement. Utilisée seule, cette instruction n'est pas obligatoire. Elle peut être placée en tout point d'une procédure pour mettre fin à l'exécution du code, fermer des fichiers ouverts à l'aide de l'instruction Open et effacer des variables.

PGZ

[flomen]

Bonjour,
Enfin je crois avoir trouvé la solution à mon problème.
Pour annuler un événement il suffit d'utiliser l'instruction

Code :

    DoCmd.cancelevent