Doublons récalcitrants, l'erreur est maintenue

Question

Slt tt le monde,

Y a un hic dans mon prog.
Je traite des données venant d'un fichier texte pour les rangées dans ma base.
Le pb est ke, y a parfois des doublons.
Je traite l'erreur pour le 1er, mais ce fada continue a appliquer le code  d'erreur pour les autres sans doublons meme apres un Exit, voir carrément un Err.Clear.

Y a un preneur ?
J'ai failli devenir fou hier après 2h à tenter de solutionner le pb. Aujourd'hui je veux garder ce qui me reste de santé mentale...!

Merci d'av,

PrX

cs_PrX · Answer

Pour ceux qui rencontreraient le meme problème.

Lorsque l'on obtient une erreur de type "doublon existant".
1- elle apparait lors d'une operation de type Recordset.Update
2- il faut alors creer une gestion d'erreur du type :

Private Sub je_remplis_ma_base
    On error goto remplis_erreur
    
    'code de remplissage avec le Recordset.Update

     Exit Sub   '/!\ ne pas l'oublier
remplis_erreur:
     If Err.Number = -2147217387 Then _
     Recordset.CancelUpdate

End Sub

Voila, c'est tout.

J'ai galerais pendant 4 bonnes heures pour trouver ca (2h/jour sur 2 jours), (Ben ouais je suis debutant!)
mais j'ai quand meme reussi.  :) 

Merci a ceux qui ont lu mon message en 1er.

A plus

PrX   :sad)

Doublons récalcitrants, l'erreur est maintenue

1 réponse

Discussions similaires