VB + ACCESS + CLE PRIMAIRES = PBS !!!Résolu

Question

Salut les gens !
J'ai un pb avec mes requetes : Je n'arrive pas à modifier mes clefs primaires
J'ai une table avec 3 champs : ch1, ch2, ch3
Actuellemnt , j'ai la clef primaire sur le doublon (ch1, ch2)
Et je veux passer ma clef primaire sur le doublon (ch1, ch3)... par un code VB (je peux pas passer par access)
Mais j'ai l'impression d'avoir tout essayé et rien ne marche
En plus, c'était un projet à livrer hier..... AIDEZ-MOI SVP!!!

Merci d'avance

cs_jperre · Accepted Answer

C'est très simple, il faut tout d'abord avoir chargé DAO dans les références du projet VB6. Ensuite, il faut ouvrir un objet Database.

Dim dbTrait as DAO.Database
Set dbTrait=DBEngine(0).OpenDatabase(CheminEtNomDeLaBaseDeDonnees)
dbTrait.Execute "ALTER TABLE NomDeLaTable DROP CONSTRAINT NomDeLaClePrimaire;"
dbTrait.Execute "ALTER TABLE NomDeLaTable ADD CONSTRAINT NomDuNouVelIndex PRIMARY KEY(Champ1, Champ2,...);"
dbTrait.Close

Voilà, c'est terminé. Avec Access, il y a les objets TableDef, Field, Index, Relation,Etc... mais il ne faut pas oublier que le code SQL est parfois beaucoup plus pratique.
Bon courage!...

Jo2pau · Answer

Merci beaucoup !!!!!!!!
Je peux boucler mon projet dans la journée... après deux jours entiers de galère

VB + ACCESS + CLE PRIMAIRES = PBS !!!

2 réponses

Discussions similaires