Discussion :

[Domi2]

Bonjour,

Cela doit te provoquer une erreur.

Si tu récupères sont numéro, je pense que tu peux t'en servir dans une gestion d'erreur pour reprendre l'exécution de code immédiatement après l'instruction qui la provoque.

Quel est le numéro d'erreur ?

Domi2

[tyrael5]

------- EDIT : Message à ne pas prendre en compte -----------

Google et la FAQ sont de très bons amis sinon :
Lien

FAQ

FAQ2

Citation de la FAQ :

Tout d'abord ajouter les références suivantes dans votre projet :


Microsot ADO Ext 2.X for dll and security Microsof ActiveX Data Object 2.X Library.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function ExisteChamp(NomTable As String, NomChamp As String) As Boolean
On Error GoTo err:
Dim MCat As New ADOX.Catalog
Dim MTable As ADOX.Table
Dim MField As ADOX.Column
Set MCat.ActiveConnection = CurrentProject.Connection
Set MTable = MCat.Tables(NomTable)
Set MField = MTable.Columns(NomChamp)
ExisteChamp = True
err:
Set MCat = Nothing
Set MTable = Nothing
Set MField = Nothing
End Function

Utilisation :
Debug.print ExisteChamp("Produit", "stock")


Affiche dans la fenêtre de débogage True si le champ existe dans la table Produit , false sinon.

A adapter selon ton code évidemment. Mais la logique est là

Tyrael

[Domi2]

Pourquoi changer de bibliothèque ?

Récupérer une erreur DAO pour exécuter un code ADO, franchement

C'est également possible avec DAO !

Pour les idées, voir ici.

Domi2

[tyrael5]

Ma faute, j'ai voulu aller un peu vite, pour lui montrer que même en étant pressé, la FAQ est un outil puissant et très utile.
Et qu'un problème est une bonne situation pour apprendre.

Tu as parfaitement raison.

Tyrael

[PapyAccess]

Bonjour
Ton problème est il résolu , sinon j'ai la solution sous forme d'une fonction compléte trés simple à utiliser pour tous les types de champs sauf hyper texte .
Papy