copier table dans une autre base accessRésolu

Question

Bonjour

J'ai chercher sur le forum mais les réponses que je trouve sont trop confuse.

J'ai une table. 2 bases. Et je veux copier ma table dans l'autre base.

Je commence comme ceci



'connection base1   
Set db = CurrentDb
 
'trouver chemin courant
mon_fichier = CurrentProject.Path '
       

'recherche chemin base 2
mon_fichier = mon_fichier & Right$("\modele\modele_suivi_enquêtes_AIRBUS.mdb", 43)

'ouverture base 2
Set db1 = DBEngine.OpenDatabase(mon_fichier)

'efface la table de la base 2
sql2 = "DROP TABLE  infos_enquêtes"
db1.Execute sql2

'recopi table
???????me manke cette commande


vraiment j'ai du mal parce ke je ne sais pas comment exprimer en fonction de kelle base copier  %-6 

Merci de votre aide :)

Longue vie au VB 
hihi

lezardjet · Answer

lé con ce lezard

voila la commande que je cherchais : 

DoCmd.CopyObject mon_fichier, "table", acTable, "table"


J'ai fait sa a l'ancienne c'est a dire macro a 3 bath puis enregsiter en module puis cut paste ;)

le pire c'est que cela marche!

cs_CanisLupus · Answer

Salut,

Je le faisais encore plus à l'ancienne :

db.Execute "SELECT * INTO table IN '" & BaseCible & "' From table"

Cordialement

CanisLupus

lezardjet · Answer

ou mais C encore mieu...
sa me permet direct de supprimer les champs que je ne voulais pas copier.....

merci C kool tu m'évite de chercher!!!!!!

bonne continuation ;)

bouv · Answer

Super, juste ce que je cherchais.

Quelqu'un sait comment passer le mot de passe de la BaseCible en parametre ?

Bonne prog
++

Copier table dans une autre base access

4 réponses

Discussions similaires