Gerer lerreur 3704 du control adodc

Soyez le premier à donner votre avis sur cette source.

Snippet vu 7 657 fois - Téléchargée 29 fois

Contenu du snippet

ne pas afficher l'erreur 3704 du control adodc par ce code. concerne l'erreur "ne peut executer l'action qd l'objet est ouvert ou fermé"

Source / Exemple :


'lorsqu'une erreur 3704 du controle adodc se produit y a un message qu'on ne peut eviter (un bouton ok). il faut mettre ce code dans l'evenement error du adodc pour éviter qu'il s'affiche.

If ErrorNumber = 3704 Then 
   fCancelDisplay = True
End If

'vous aurez donc :

Private Sub Data1_Error(ByVal ErrorNumber As Long, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, fCancelDisplay As Boolean)
    If ErrorNumber = 3704 Then
       fCancelDisplay = True
    End If
End Sub

'pensez à un mettre un "on error resume next" juste avant l'instruction qui provoque l'erreur 3704

A voir également

Ajouter un commentaire

Commentaires

cs_Ksp
Messages postés
1
Date d'inscription
mardi 8 juin 2004
Statut
Membre
Dernière intervention
9 juin 2004
-
Merci a toi c'est simple et fonctionnel ^^
Philippe734
Messages postés
309
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
15 juin 2015
1 -
ce code concerne aussi les erreur 3703 ; 3705 ; 3706 en remplacant biensur 3704 par l'erreur concerné. ce code n'est pas de moi je l'ai trouvé sur un site anglais dont j'ai oublié le nom.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.