A l'ouverture d'une base je souhaite automatiser l'importation
D'une table qui se trouve dans une autre base sur un serveur dans
Un dossier BaseDonnee voici mon code :
Function ImporterTables()
'Objectif: Importer des tables
On Error GoTo TraitementErreur:
DoCmd.TransferDatabase acImport, "Microsoft Access", _
"G:\BaseDonnee\Adherents.mdb", acTable, _
"Tchasseur", "Tchasseur"
Exit Function
TraitementErreur:
Select Case Err
Case Is = 3011
MsgBox "Ne trouve pas la table.", vbOKOnly
Case Is = 2043
MsgBox "Ne trouve pas la base de données.", vbOKOnly
End Select
End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau
est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais
pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
la table ne peut pas être liée avec acimport, il faudrait mettre acLink pour la lier ce qui n'est pas le cas. il faut uniformiser et organiser les lecteurs réseau dans une entreprise. Si ce n'est pas possible il faut passer par le chemin complet du genre reseau.......mabase.mdb
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ALAIN" a écrit dans le message de news:
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation D'une table qui se trouve dans une autre base sur un serveur dans Un dossier BaseDonnee voici mon code :
Function ImporterTables() 'Objectif: Importer des tables On Error GoTo TraitementErreur: DoCmd.TransferDatabase acImport, "Microsoft Access", _ "G:BaseDonneeAdherents.mdb", acTable, _ "Tchasseur", "Tchasseur" Exit Function TraitementErreur: Select Case Err Case Is = 3011 MsgBox "Ne trouve pas la table.", vbOKOnly Case Is = 2043 MsgBox "Ne trouve pas la base de données.", vbOKOnly End Select End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
Comment résoudre ces deux problèmes
Merci
Cordialement,
Alain
Bonjour.
la table ne peut pas être liée avec acimport, il faudrait mettre acLink pour
la lier ce qui n'est pas le cas.
il faut uniformiser et organiser les lecteurs réseau dans une entreprise. Si
ce n'est pas possible il faut passer par le chemin complet du genre
\reseau.......mabase.mdb
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"ALAIN" <alaincorai@wanadoo.fr> a écrit dans le message de
news:569fa480.0401150854.535543cc@posting.google.com...
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation
D'une table qui se trouve dans une autre base sur un serveur dans
Un dossier BaseDonnee voici mon code :
Function ImporterTables()
'Objectif: Importer des tables
On Error GoTo TraitementErreur:
DoCmd.TransferDatabase acImport, "Microsoft Access", _
"G:BaseDonneeAdherents.mdb", acTable, _
"Tchasseur", "Tchasseur"
Exit Function
TraitementErreur:
Select Case Err
Case Is = 3011
MsgBox "Ne trouve pas la table.", vbOKOnly
Case Is = 2043
MsgBox "Ne trouve pas la base de données.", vbOKOnly
End Select
End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau
est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais
pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
la table ne peut pas être liée avec acimport, il faudrait mettre acLink pour la lier ce qui n'est pas le cas. il faut uniformiser et organiser les lecteurs réseau dans une entreprise. Si ce n'est pas possible il faut passer par le chemin complet du genre reseau.......mabase.mdb
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ALAIN" a écrit dans le message de news:
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation D'une table qui se trouve dans une autre base sur un serveur dans Un dossier BaseDonnee voici mon code :
Function ImporterTables() 'Objectif: Importer des tables On Error GoTo TraitementErreur: DoCmd.TransferDatabase acImport, "Microsoft Access", _ "G:BaseDonneeAdherents.mdb", acTable, _ "Tchasseur", "Tchasseur" Exit Function TraitementErreur: Select Case Err Case Is = 3011 MsgBox "Ne trouve pas la table.", vbOKOnly Case Is = 2043 MsgBox "Ne trouve pas la base de données.", vbOKOnly End Select End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
Comment résoudre ces deux problèmes
Merci
Cordialement,
Alain
Maxence HUBICHE
Il importe une table liée, certainement parce que, dans l'autre base, cette table est liée :)
-- ---------------------------------------------------------------- Maxence HUBICHE Formateur et développeur indépendant Modérateur/rédacteur sur http://www.developpez.com Site perso : http://perso.club-internet.fr/mhubiche (en cours de construction) "ALAIN" a écrit dans le message de news:
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation D'une table qui se trouve dans une autre base sur un serveur dans Un dossier BaseDonnee voici mon code :
Function ImporterTables() 'Objectif: Importer des tables On Error GoTo TraitementErreur: DoCmd.TransferDatabase acImport, "Microsoft Access", _ "G:BaseDonneeAdherents.mdb", acTable, _ "Tchasseur", "Tchasseur" Exit Function TraitementErreur: Select Case Err Case Is = 3011 MsgBox "Ne trouve pas la table.", vbOKOnly Case Is = 2043 MsgBox "Ne trouve pas la base de données.", vbOKOnly End Select End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
Comment résoudre ces deux problèmes
Merci
Cordialement,
Alain
Il importe une table liée, certainement parce que, dans l'autre base, cette
table est liée :)
--
----------------------------------------------------------------
Maxence HUBICHE
Formateur et développeur indépendant
Modérateur/rédacteur sur http://www.developpez.com
Site perso : http://perso.club-internet.fr/mhubiche (en cours de
construction)
"ALAIN" <alaincorai@wanadoo.fr> a écrit dans le message de news:
569fa480.0401150854.535543cc@posting.google.com...
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation
D'une table qui se trouve dans une autre base sur un serveur dans
Un dossier BaseDonnee voici mon code :
Function ImporterTables()
'Objectif: Importer des tables
On Error GoTo TraitementErreur:
DoCmd.TransferDatabase acImport, "Microsoft Access", _
"G:BaseDonneeAdherents.mdb", acTable, _
"Tchasseur", "Tchasseur"
Exit Function
TraitementErreur:
Select Case Err
Case Is = 3011
MsgBox "Ne trouve pas la table.", vbOKOnly
Case Is = 2043
MsgBox "Ne trouve pas la base de données.", vbOKOnly
End Select
End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau
est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais
pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
Il importe une table liée, certainement parce que, dans l'autre base, cette table est liée :)
-- ---------------------------------------------------------------- Maxence HUBICHE Formateur et développeur indépendant Modérateur/rédacteur sur http://www.developpez.com Site perso : http://perso.club-internet.fr/mhubiche (en cours de construction) "ALAIN" a écrit dans le message de news:
Bonsoir,
A l'ouverture d'une base je souhaite automatiser l'importation D'une table qui se trouve dans une autre base sur un serveur dans Un dossier BaseDonnee voici mon code :
Function ImporterTables() 'Objectif: Importer des tables On Error GoTo TraitementErreur: DoCmd.TransferDatabase acImport, "Microsoft Access", _ "G:BaseDonneeAdherents.mdb", acTable, _ "Tchasseur", "Tchasseur" Exit Function TraitementErreur: Select Case Err Case Is = 3011 MsgBox "Ne trouve pas la table.", vbOKOnly Case Is = 2043 MsgBox "Ne trouve pas la base de données.", vbOKOnly End Select End Function
- Sur certain poste client il ne touve pas la Base ? le lecteur réseau est différent, comment résoudre ce problème ?
- Sur d'autre poste il trouve la base et importe la table mais pourquoi la table importée est liée ? Il ne faut pas quelle soit liée.
