Où suis-je dans mon code ?

bonjour,

pour personnaliser mon code de gestion d'erreur je souhaite connaitre automatiquement le nom de la fonction ou du sub qui a généré une erreur.

Pour le module en cours je passe par me.name mais pour le code en cours, j'ai pas trouvé...

merci.

Bonjour,

Ca m'intéresse aussi, mais je ne crois pas que ca soit possible. Si tu regardes dans tous les exemples fournis ici et ailleurs , le nom de la procédure ou de la fonction est tapé en dur... Dur dur...

Bonjour,
Je confirme également que ce n'est pas possible. Pour connaître la procédure ou la fonction où se produit l'erreur, il faut inscrire le nom de la fonction ou de la sub en dur.

Salut.

Pourtant dans la fenetre espion, Access affiche le contexte et donc la procedure en cours d'exécution.

Salut,

Pas de solution native par contre il est tout a fait possible de mettre en place son propre gestionnaire d'erreur avec récupération du nom de la fonction, du module, du controle, du formulaire, ...
il suffit d'utiliser un utilitaire comme mz-tools pour faciliter la mise en place en définissant un modèle d'entête de module, un modèle d'entête de procédure et un modèle de gestion d'erreur. Les noms des modules et fonctions sont automatiquement récupérés sans avoir besoin de les saisir. Cet utilitaire est un 'must have' 8-)

ex les modèles que j'utilise

Code:

---

1 2 3 4 5 6 7

'********************************************************************************* ' Module : {MODULE_NAME} (Type module : {MODULE_TYPE}) (Projet : {PROJECT_NAME}) ' Date : {DATE} {TIME} ' Auteur : {AUTHOR} ' But : '********************************************************************************* Private Const conModule = "{MODULE_NAME}"

---

Code:

---

1 2 3 4 5 6 7

'--------------------------------------------------------------------------------- 'Procédure : {PROCEDURE_NAME} 'Auteur : {AUTHOR} 'But : 'Valeur renvoyée : {FUNCTION_RETURN_TYPE_NAME} 'Version : 1.0 '---------------------------------------------------------------------------------

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Const conProcedure = "{PROCEDURE_NAME}" On Error GoTo {PROCEDURE_NAME}_Erreur   {PROCEDURE_BODY} {PROCEDURE_NAME} = True Exit {PROCEDURE_TYPE}   LibereObjet:   {PROCEDURE_NAME}_Erreur: {PROCEDURE_NAME} = False NumeroErreur = Err.Number DescriptionErreur = Err.Description LogErreur conModule, conProcedure, NumeroErreur, DescriptionErreur Resume LibereObjet

---

LogErreur étant ma fonction de gestion globale d'erreur qui va stocker ensuite les messages d'erreur dans un table avec date/heure, module, fonction, utilisateur, pc, version de l'appli ...

Merci pour vos réponses et j'ai découvert un utilitaire très pratique.
Philippe

Lequel ???

Celui de Nohant ou un autre. Si c'est un autre, peux tu nous en dire plus ?

Merci

Oui, celui de Nohant.