Question : Traiteur global des erreurs et sur le résumé d'erreur après

J'ai un traiteur des erreurs dans la routine de point d'entrée de mon $$etAPP. Je veux toutes les erreurs des procédures descendant à GoTo ce traiteur des erreurs. L'ennui est moi ont beaucoup de procédures descendant qui emploient sur le résumé d'erreur après… sur l'erreur 0 GoTo qui dépasse dessus l'erreur Error_Handler que GoTo au point d'entrée routine.

I ont essayé le remplacement sur l'erreur 0 GoTo par sur l'erreur Error_Handler GoTo mais qui produit une ligne erreur non trouvée d'étiquette. Dans des fonctions descendant, y a-t-il une manière d'employer sur le résumé d'erreur après et de remettre à zéro alors dessus le comportement des erreurs à sur l'erreur Error_Handler GoTo au lieu de sur l'erreur 0 GoTo ? class= de

Réponse : Traiteur global des erreurs et sur le résumé d'erreur après

Je vous applaudis pour vouloir un traiteur commun des erreurs.  Me laisser expliquer comment je les fais.

Créer une fonction globale pour votre logique commune de traiteur des erreurs.  « Le point d'entrée de votre $$etAPP » peut fonctionner--Je ne sais pas--il doit être accessible de n'importe où. Appelons ce functio ErrorRoutine ().

Coder alors tous les suboutines n'importe quoi de pareil :


MySub secondaire privé ()
Sur la finition GoTo des erreurs
….

Sur le résumé d'erreur après
…
Sur la finition GoTo des erreurs

….

Finition :
Si err.number puis si ErrorRoutine (vbRetry) = vbRetry reprennent alors  
…
Sortir le sous-marin



Ma version d'ErrorRoutine évalue pour le paramètre et si le présent publie un arrêt, l'annulation de tentative, réessayent le message de sollicitation.  Ceci permet à l'opération failing d'être réessayée (que je trouve utile pour le debuggin).