Bonjour,
Pour concaténer plusieurs bases de structure identique, mais possédant chacune un index basé sur le champ 'Adhérent', je dois supprimer cet index qu crée une erreur de violation de validation.
Le code numérique 'Adhérents' qui se trouve dans chaque base concerne une activité différente d'une base à l'autre.
Lors de la concaténation, ce code est multiplié par 10 et on ajoute un chiffre des unités caractérisant la base.
J'ai essayé d'employer le code suivant tiré du forum.
Manuellement j'ai supprimé les index et la concaténation se fait bien sans erreurs.
mais erreur à la ligne 5 / le curseur se place sur 'Adhérents' avec erreur de syntaxe.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Dim dbs As Database chB=chemin complet de la base externe à traiter NomB = nom de la table à traiter Set dbs = OpenDatabase(chB) dbs.Execute "DROP INDEX Adhérents ON NomB ;" dbs.Close
Votre aide me serait utile ...
Merci
Partager