J'ai souvent cherché (sans trouver) un outil ou une fonction dans
Access pour générer un script de création de base de données à partir
d'un fichier mdb existant.
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
Michel__D
Bonjour,
Je pense que tu devrais regarder l'aide sur la méthode "TransferDatabase" de l'objet "Docmd", et parcourir les collections AllForms, AllReports, AllMacros, AllModules, AllDataAccessPages, AllTables, AllQueries, AllViews, AllStoredProcedures, AllDatabaseDiagrams.
Voici un exemple pour parcourir la collection AllQueries :
Sub Test() Dim oBj As AccessObject, oDb As Object Set oDb = Application.CurrentData For Each oBj In oDb.AllQueries Debug.Print oBj.Name Next oBj End Sub
"Jean-Luc M." a écrit dans le message de news:
Bonjour,
J'ai souvent cherché (sans trouver) un outil ou une fonction dans Access pour générer un script de création de base de données à partir d'un fichier mdb existant.
A tout hasard, je repose la question ici.
Une idée ?
J-L
-- Jean-Luc M.
Bonjour,
Je pense que tu devrais regarder l'aide sur la méthode
"TransferDatabase" de l'objet "Docmd", et parcourir les collections
AllForms, AllReports, AllMacros, AllModules, AllDataAccessPages,
AllTables, AllQueries, AllViews, AllStoredProcedures,
AllDatabaseDiagrams.
Voici un exemple pour parcourir la collection AllQueries :
Sub Test()
Dim oBj As AccessObject, oDb As Object
Set oDb = Application.CurrentData
For Each oBj In oDb.AllQueries
Debug.Print oBj.Name
Next oBj
End Sub
"Jean-Luc M." <alphomega@free.fr> a écrit dans le message de news:mn.93157d88fe8a5bfa.28556@free.fr...
Bonjour,
J'ai souvent cherché (sans trouver) un outil ou une fonction dans
Access pour générer un script de création de base de données à partir
d'un fichier mdb existant.
Je pense que tu devrais regarder l'aide sur la méthode "TransferDatabase" de l'objet "Docmd", et parcourir les collections AllForms, AllReports, AllMacros, AllModules, AllDataAccessPages, AllTables, AllQueries, AllViews, AllStoredProcedures, AllDatabaseDiagrams.
Voici un exemple pour parcourir la collection AllQueries :
Sub Test() Dim oBj As AccessObject, oDb As Object Set oDb = Application.CurrentData For Each oBj In oDb.AllQueries Debug.Print oBj.Name Next oBj End Sub
"Jean-Luc M." a écrit dans le message de news:
Bonjour,
J'ai souvent cherché (sans trouver) un outil ou une fonction dans Access pour générer un script de création de base de données à partir d'un fichier mdb existant.