Verifier existance d'un champ dans access....Résolu

Question

bjr
comment avec du code en vb6, en ouverture du prog,
Vérifier l'existance d'un champ dans une table access,
puis 
si il existe ne rien faire ,passer,
si il n'existe pas : le créer.

merci d'avance

cs_Nicko11 · Accepted Answer

C'est un truc que j'ai fait il n'y a pas longtemps en VBA (adapter si difference avec VB6)

tu rajoute dans projet reference ADO Ext 2.8 for DLL and Security.

ensuite dans le code,

dim champ as ADOX.column
dim BDD as ADOX.catalog

set champ = New ADOX.column
set BDD = New ADOX.catalog

set BDD.activeconnection = ta_connexion_a_la_base

For Each champ In bdd.Tables("Nom_De_La_Table").Columns
   msgbox champ
Next

tu dois juste templacer ce qu'il y a en gras.

Si tu ne sais pas te connecter a une base, fais le nous savoir

jrivet · Answer

Salut,
est ce par Champ tu entends ligne dans la table ou bien réellement Champ comme colonne de ta table?

@+: Ju£i?n
Pensez: Réponse acceptée

ecranbleu27 · Answer

je parle bien de colonne de la table.

cs_MPi · Answer

Et si tu travailles avec DAO, regarde du côté de TableDef

MPi

ecranbleu27 · Answer

bjr
pour :   set BDD.activeconnection =   ta_connexion_a_la_base 

je lui met : "provider =msdatashape;data provider=" & _
               "microsoft etc..........mabase.mdb;jet oledb:;"
mais il n'en veut pas, il me dit qu'un "objet est requis".......

ecranbleu27 · Answer

bjr
merci NICKO11
en cherchant du coté d'adox J'ai trouvé mon bonheur....
au plaisir....

Verifier existance d'un champ dans access....

6 réponses

Votre réponse

Discussions similaires