recuperer un message d'erreur vbRésolu

Question

salut a tous, lors de l'execution d'un programme vb me met une erreur et je voudrai faire un "on error resume next ou goto X" donc continuer comme si tou allai bien mai je veu pouvoir r&#233;cup&#233;rer ce message d'erreur dans une variable pour pouvoir l'afficher a l'utilisateur. est ce que quelqu'un sait quelle fonction vb permet de resoudre mon probleme ??? merci d'avance, et si vou n'avai pa compri ce que je voulai faire dite le , j'aissairai de faire mieux.

cs_Jack · Accepted Answer

Salut
Bah simplement en appliquant une structure standard de captage d'erreur :

On Error Goto MaGestionErreur
   Debug.Print 2 / 0   ' &#231;a, il va pas aimer
   Exit Sub

MaGestionErreur:
   MsgBox "Erreur " & CStr(Err.Number) & " - " & Err.Description
   Resume Next   ' repart &#224; la ligne qui suit l'erreur

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)
(je

cs_hassen · Answer

tu peut recupere l'erreur dans l'objet err

on error goto erreur

' TRAITEMENT

exit sub
erreur:
msgbox err.number & ":" & err.description

Hassen TUNISIE

Zlub · Answer

Salut,

regardes la variable Err



Exemple :



Sub toto()



On Error Goto erreur



'

' code

'



Exit sub



erreur:

   msgbox Err.description

End sub

++

Zlub

Gobillot · Answer

rien de plus &#224; rajouter

sauf la simulation d'erreur et le Resume Next







Private Sub Command1_Click()



    On Error GoTo ERREUR

    

    Error (5)

    

    MsgBox "suite du programme"

    

    Exit Sub

    

ERREUR:

    MsgBox Err.Description

    Resume Next



End Sub


Daniel

Recuperer un message d'erreur vb

4 réponses

Discussions similaires