Bonjour,

Depuis ma frontale, je veux mettre à jour ma dorsale, je procéde donc comme suit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim oDB  As DAO.Database
 
    Set oDB = DBEngine.OpenDatabase(CurrentProject.Path & "\DU_dorsale.mdb", True)
 
    oDB.Execute "ALTER TABLE tbl_moyen ADD COLUMN jour_homme NUMERIC", dbFailOnError
    oDB.Execute "ALTER TABLE tbl_moyen ADD COLUMN cout currency", dbFailOnError
    oDB.Execute "CREATE TABLE tbl_touche_maj (touche_maj INTEGER)", dbFailOnError
 
    oDB.Close: Set oDB = Nothing
    MsgBox "Mise à jour réussie"
Maintenant, j'aimerai supprimer la clé primaire d'une table, qui en fait m'empéche de faire certaines choses. il faut donc que je la supprime par le code, et là, je bloque

Autre petite question, est t-il possible de changer la nature des liaisons entre deux tables, toujours en VBA ?

Merci d'avance !