Sujet Précédent Sujet Suivant

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

tedtheOrs Messages postés 37 Date d'inscription samedi 12 avril 2008 Statut Membre Dernière intervention 27 janvier 2010 - 26 janv. 2010 à 11:49
tedtheOrs Messages postés 37 Date d'inscription samedi 12 avril 2008 Statut Membre Dernière intervention 27 janvier 2010 - 27 janv. 2010 à 14:42
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

Réponse 1 / 1
tedtheOrs Messages postés 37 Date d'inscription samedi 12 avril 2008 Statut Membre Dernière intervention 27 janvier 2010
27 janv. 2010 à 14:42
Personne?
0

Discussions similaires

"Option base 1" ??
dream2ticia -
crenaud76 -

4 réponses
Option base 1
CrisseTof -
rene38 -

12 réponses
VBA =>desactiver Option Explicit
cs_Zock -
jmf0 -

5 réponses
[vba] recopier la valeur d'une cellule dans une autre feuille.
cokinoumasterflash -
cokinoumasterflash -

5 réponses
comment créer base de donnée access avec excel avec un champs auto incrémenté
nesaipas -
nesaipas -

7 réponses
Rejoignez-nous