Discussion :

[willytito]

Bonjour à tous,

J'utilise access 2003

Lors de la fermeture d'un formulare, je récupère un numéro d'erreur (Dataerr) dans l'évèneemnt form_Error()

J'aimerais savoir si c'est possible de faire une l'action suivante :
Proposer un message du genre (Voulez-vous fermer la fenêtre OK Annuler)
Je sais comment réaliser le message avec Msgbox
Mais je ne sais pas comment faire pour annuler la fermeture du formulaire en cours quand on se truve dans l'évènement Form_Error()

Si vous pouvez m'aider

Merci
Willy

[Heureux-oli]

Si tu va dans l'aide, tu verra que lorsqu'une erreur survient et que tu la gère, access exécute le code qui suit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
On Erreur Resume Next

Tu fais continuer la procédure comme si de rien était.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
On Erreur Goto etiquette
 
etiquette :

Si un erreur survient, le code va directement exécuter ce qui suit l'étiquette.

Si tu mets ton MsgBox juste après l'étiquette, c'est lui qui sera affiché.

[willytito]

Ce n'est pas exactement ce que je voulais
Ma gestion d'erreur fonctionne
Mais je n'arrive pas à annuler la fermetrue du formulaire
Je précise que je suis dans l'évèvènement form_Error()

Willy

[Heureux-oli]

Tu le fermes comment ton formulaire ?

[willytito]

En cliquant sur la croix du formulaire (Bouton fermer)

[Heureux-oli]

Une petite recherche dans la Foire Aux Questions et hop
Ici

[Heureux-oli]

Perso, je désactive les boutons du formulaire et oblige l'utilisateur à utiliser les bouton que je fais dans le formulaire.
Alors, il est simple d'activer le bouton fermeture sur une action ou un contrôle quelqconque

[willytito]

Je vais modifier mon code
En rajoutant une variable qui récupère le numéro d'erreur (Dans l'évèneemnt Form_Error())
Et dans l'évènement Form_Unload()
Je vais utiliser le code que tu m'as donnée (Dans le Faq)
Je te remercie pour ton aide
Willy