[déplacé VB.NET -> VBA] Import depuis une base A dans une Base B

Signaler
Messages postés
37
Date d'inscription
samedi 12 avril 2008
Statut
Membre
Dernière intervention
27 janvier 2010
-
Messages postés
37
Date d'inscription
samedi 12 avril 2008
Statut
Membre
Dernière intervention
27 janvier 2010
-
Bonjour,

Comment fait-on pour importer un fichier dans une base B depuis une base A.
J'ai le code suivant, lancé depuis ma base A mais l'import ne se fait pas dans la Base B comme je le souhaiterai:



Dim oDb As DAO.Database
    strMotPasse = ""
    strCheminBd = "C:\Base A.mdb"
    'Définit la chaine de connexion permettant la liaison des tables
    strConnect = "MS Access;pwd=" & strMotPasse & ";DATABASE=C:\Base A.mdb"
    'Instancie l'objet Database de la base protégée
    Set oDb = DBEngine.OpenDatabase(strCheminBd, True, True, strConnect)
 
'*************************
' Import du fichier Text *
'*************************
Dim Fichier01 As String
Fichier01 = OpenFile("", Mono_Sélection, True, allfiles, , True, "*.txt", True)
If Not Nz(Fichier01, "") = "" Then
    DoCmd.TransferText acImportFixed, "01", "01", Fichier01
    MsgBox "Import fichier 01 terminé"


comment faire pour que le fichier s'importe dans la base B?

D'avance merci.

1 réponse

Messages postés
37
Date d'inscription
samedi 12 avril 2008
Statut
Membre
Dernière intervention
27 janvier 2010

Personne?