Le complement d'information était pour la demande précedente a savoir erreur 2046 sur
DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", OverwriteExistingFile:úlse, DisconnectAllUsers:=True alors que toutes les aurtres Docmd fonctionne
mon but est de copier les tables de guy.mdb
-- Amicalement et merci
"Guy BRUSSON" | Bonjour à tous | | Je suis en ACCESS 2002
Le complement d'information était pour la demande précedente a savoir erreur
2046 sur
DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb",
OverwriteExistingFile:úlse, DisconnectAllUsers:=True
alors que toutes les aurtres Docmd fonctionne
mon but est de copier les tables de guy.mdb
--
Amicalement et merci
"Guy BRUSSON"
| Bonjour à tous
|
| Je suis en ACCESS 2002
Le complement d'information était pour la demande précedente a savoir erreur 2046 sur
DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", OverwriteExistingFile:úlse, DisconnectAllUsers:=True alors que toutes les aurtres Docmd fonctionne
mon but est de copier les tables de guy.mdb
-- Amicalement et merci
"Guy BRUSSON" | Bonjour à tous | | Je suis en ACCESS 2002
"Guy BRUSSON" | | Le complement d'information était pour la demande précedente a savoir erreur | 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", | OverwriteExistingFile:úlse, DisconnectAllUsers:=True | alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy : http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
"Guy BRUSSON"
|
| Le complement d'information était pour la demande précedente a savoir erreur
| 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb",
| OverwriteExistingFile:úlse, DisconnectAllUsers:=True
| alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy :
http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
"Guy BRUSSON" | | Le complement d'information était pour la demande précedente a savoir erreur | 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", | OverwriteExistingFile:úlse, DisconnectAllUsers:=True | alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy : http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
Merci 3Stone, J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base externe, faut-il quelle soit seule dans un répertoire ou la nomer? 'Le code qui suit permet d'importer tous les objets d'une base de donnée externe.
Function ImportAllObject(strDataBase As String)
Dim Dbs As Database Dim tdf As TableDef Dim qry As QueryDef Dim cnt As Container Dim doc As Document
Set Dbs = OpenDatabase(strDataBase)
'Import les tables For Each tdf In Dbs.TableDefs If Left(tdf.Name, 4) <> "msys" Then DoCmd.TransferDatabase acImport, "Microsoft Access", _ strDataBase, acTable, tdf.Name, tdf.Name, False, True End If Next
-- Amicalement et merci
Salut,
"Guy BRUSSON" | | Le complement d'information était pour la demande précedente a savoir erreur | 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", | OverwriteExistingFile:úlse, DisconnectAllUsers:=True | alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy : http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
Merci 3Stone,
J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base
externe,
faut-il quelle soit seule dans un répertoire ou la nomer?
'Le code qui suit permet d'importer tous les objets d'une base de donnée
externe.
Function ImportAllObject(strDataBase As String)
Dim Dbs As Database
Dim tdf As TableDef
Dim qry As QueryDef
Dim cnt As Container
Dim doc As Document
Set Dbs = OpenDatabase(strDataBase)
'Import les tables
For Each tdf In Dbs.TableDefs
If Left(tdf.Name, 4) <> "msys" Then
DoCmd.TransferDatabase acImport, "Microsoft Access", _
strDataBase, acTable, tdf.Name, tdf.Name, False, True
End If
Next
--
Amicalement et merci
Salut,
"Guy BRUSSON"
|
| Le complement d'information était pour la demande précedente a savoir erreur
| 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb",
| OverwriteExistingFile:úlse, DisconnectAllUsers:=True
| alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy :
http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
Merci 3Stone, J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base externe, faut-il quelle soit seule dans un répertoire ou la nomer? 'Le code qui suit permet d'importer tous les objets d'une base de donnée externe.
Function ImportAllObject(strDataBase As String)
Dim Dbs As Database Dim tdf As TableDef Dim qry As QueryDef Dim cnt As Container Dim doc As Document
Set Dbs = OpenDatabase(strDataBase)
'Import les tables For Each tdf In Dbs.TableDefs If Left(tdf.Name, 4) <> "msys" Then DoCmd.TransferDatabase acImport, "Microsoft Access", _ strDataBase, acTable, tdf.Name, tdf.Name, False, True End If Next
-- Amicalement et merci
Salut,
"Guy BRUSSON" | | Le complement d'information était pour la demande précedente a savoir erreur | 2046 sur
On ne pouvait que le deviner, puisque tu n'es pas resté dans le fil !!!
| DoCmd.CopyDatabaseFile DatabaseFileName:="C:guy.mdb", | OverwriteExistingFile:úlse, DisconnectAllUsers:=True | alors que toutes les aurtres Docmd fonctionne
Comme le dit Eric, cela s'utilise avec les "projets" et base SQL Server...
| mon but est de copier les tables de guy.mdb
Autrement dit, tu cherche à importer les tables de "c:guy.mdb" ?
Regarde ici chez Jessy : http://access.jessy.free.fr/htm/DataBase/ImportAllObject.htm
"Guy BRUSSON" | J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base | externe, | faut-il quelle soit seule dans un répertoire ou la nomer? | 'Le code qui suit permet d'importer tous les objets d'une base de donnée | externe.
strDataBase = "x:ou tu veuxTaBaseQuiContientLesTables.mdb"
"Guy BRUSSON"
| J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base
| externe,
| faut-il quelle soit seule dans un répertoire ou la nomer?
| 'Le code qui suit permet d'importer tous les objets d'une base de donnée
| externe.
strDataBase = "x:ou tu veuxTaBaseQuiContientLesTables.mdb"
"Guy BRUSSON" | J'ai bien récupéré le code mais je ne comprend pas ou doit etre la base | externe, | faut-il quelle soit seule dans un répertoire ou la nomer? | 'Le code qui suit permet d'importer tous les objets d'une base de donnée | externe.
strDataBase = "x:ou tu veuxTaBaseQuiContientLesTables.mdb"
