Gestion des erreurs en Lotus Script

[Stephane Maillard]

Exemple de gestion d'erreur possible avec Lotus Script

Code : Tout sélectionner

On Error Goto ErrorHandler ' Si erreur aller à l'étiquette

'
'  Votre code
'

ErrorHandler:
  Messagebox "Erreur:" & Error(Err), 0+64, "Erreur!!" ' Un avertissement
  Print "Erreur No. : " Err             ' Numéro du code d'erreur
  Print "Description : " Error(Err)     ' La description
  Print "Ligne No. : " Erl              ' La ligne ou se trouve l'erreur
  Resume Next                           ' Reprend le prog à l'instruction suivante
  Exit Sub                              ' Sort de la procédure

[Michael DELIQUE]

un exemple de message d'erreur "pré-formaté"

Code : Tout sélectionner

Msgbox "("+Cstr(Getthreadinfo (1))+" Call by "+Cstr(Getthreadinfo(10))+")"+Chr(10)+"Erreur " + Cstr(Err) + " : "+Chr(10) + Cstr(Error)+". "+Chr(10)+"Ligne N° "+Cstr(Erl),16," ERREUR !"