Table Access : ajout d'un champ depuis VB6

Bonjour à tout le monde.

Comment puis-je faire, depuis mon programme écrit en VB6, pour ajouter un champ dans une table Access.

P.S. : J'utilise une connection ADO.

Merci d'être précis dans vos explications car je suis débutant.

Bonsoir tout le monde.

(je suis poli hein)...

donc si tu utilises une connexion ADO

Code:

---

Conn.Execute "ALTER TABLE Table1 ADD COLUMN MonChamp TEXT(25);"

---

Pour les explications, je t'invite à lire les cours sur ADO présent sur le site, ils seraient bien plus complet que ma réponse

Merci de ta réponse et je suis désolé pour ce qui c'est passé tout à l'heure : problème de compréhension de message.

Avant de poser ma question j'ai effectivement cherché mais je n'ai pas réussi à trouver quelque chose d'exploitable pour moi.

Je vais m'y remettre.

Je suis enfin arrivé au but recherché et je souhaite faire partager ma recherche à ceux qui auraient le même besoin que moi.

Ajouter Référence : Mircosoft ADO 3.6

Code:

---

1 2 3 4 5

Dim dbs As Database   Set dbs = OpenDatabase(Chemin & "\" & "Base.mdb") dbs.Execute "ALTER TABLE [Table] " & "ADD COLUMN [Champ] INTEGER;" dbs.Close

---

Merci à ceux qui m'ont aidé.

je pense que c'est DAO 3.6 que tu as ajouté.

Pour ma curiosité, pourquoi n'as tu pas continué d'utiliser ADO ?

Oui, toutes mes excuses. C'est bien Microsoft DAO 3.6

En fait j'ai trouvé ce code qui a fonctionné du 1er coup et je n'ai pas trop cherché + loin.

Et pour conclure, effectivement, avec une connection ADO c'est encore + simple

Reference : Microsoft ADO Ext. 2.7

Rx0.Open "ALTER TABLE [NomTable] ADD COLUMN [NomChamp] Integer;"

Pas de close.

ok. Merci