VB + ACCESS + CLE PRIMAIRES = PBS !!!

Résolu
Jo2pau Messages postés 2 Date d'inscription jeudi 9 mars 2006 Statut Membre Dernière intervention 16 mars 2006 - 15 mars 2006 à 17:29
Jo2pau Messages postés 2 Date d'inscription jeudi 9 mars 2006 Statut Membre Dernière intervention 16 mars 2006 - 16 mars 2006 à 09:01
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

2 réponses

cs_jperre Messages postés 268 Date d'inscription lundi 9 janvier 2006 Statut Membre Dernière intervention 19 janvier 2017 2
15 mars 2006 à 18:32
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 Messages postés 2 Date d'inscription jeudi 9 mars 2006 Statut Membre Dernière intervention 16 mars 2006
16 mars 2006 à 09:01
Merci beaucoup !!!!!!!!
Je peux boucler mon projet dans la journée... après deux jours entiers de galère
Rejoignez-nous