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
Xavier HUE
Bonjour Florent,
Voir la méthode OpenDatabase.
Set database = workspace.OpenDatabase (dbname, options, read-only, connect)
La syntaxe de la méthode OpenDatabase comprend les éléments suivants :
Élément Description database Variable objet représentant l'objet Database à ouvrir. workspace Facultatif. Variable objet représentant l'objet Workspace existant qui contiendra la base de données. Si vous n'indiquez aucune valeur pour workspace, OpenDatabase adopte l’espace de travail par défaut. dbname Donnée de type String correspondant au nom d'un fichier de base de données Microsoft Jet ou au nom d'une source de données ODBC. Pour plus d'informations sur la définition de cette valeur, voir la propriété Name. options Facultatif. Donnée de type Variant définissant diverses options concernant la base de données, comme indiqué dans la section Valeurs. read-only Facultatif. Donnée de type Variant (sous- type Boolean) qui a la valeur True si vous souhaitez ouvrir la base de données avec un accès en lecture seule, ou False (par défaut) si vous souhaitez ouvrir la base de données avec un accès en lecture/écriture. connect Facultatif. Donnée de type Variant (sous-type String) indiquant diverses informations sur la connexion, dont les mots de passe.
Copyright (c) 1996 Microsoft Corporation
Cordialement.
Bonjour Florent,
Voir la méthode OpenDatabase.
Set database = workspace.OpenDatabase (dbname, options,
read-only, connect)
La syntaxe de la méthode OpenDatabase comprend les
éléments suivants :
Élément Description
database Variable objet représentant l'objet
Database à ouvrir.
workspace Facultatif. Variable objet représentant
l'objet Workspace existant qui contiendra la base de
données. Si vous n'indiquez aucune valeur pour workspace,
OpenDatabase adopte l’espace de travail par défaut.
dbname Donnée de type String correspondant au nom d'un
fichier de base de données Microsoft Jet ou au nom d'une
source de données ODBC. Pour plus d'informations sur la
définition de cette valeur, voir la propriété Name.
options Facultatif. Donnée de type Variant définissant
diverses options concernant la base de données, comme
indiqué dans la section Valeurs.
read-only Facultatif. Donnée de type Variant (sous-
type Boolean) qui a la valeur True si vous souhaitez
ouvrir la base de données avec un accès en lecture seule,
ou False (par défaut) si vous souhaitez ouvrir la base de
données avec un accès en lecture/écriture.
connect Facultatif. Donnée de type Variant (sous-type
String) indiquant diverses informations sur la connexion,
dont les mots de passe.
Set database = workspace.OpenDatabase (dbname, options, read-only, connect)
La syntaxe de la méthode OpenDatabase comprend les éléments suivants :
Élément Description database Variable objet représentant l'objet Database à ouvrir. workspace Facultatif. Variable objet représentant l'objet Workspace existant qui contiendra la base de données. Si vous n'indiquez aucune valeur pour workspace, OpenDatabase adopte l’espace de travail par défaut. dbname Donnée de type String correspondant au nom d'un fichier de base de données Microsoft Jet ou au nom d'une source de données ODBC. Pour plus d'informations sur la définition de cette valeur, voir la propriété Name. options Facultatif. Donnée de type Variant définissant diverses options concernant la base de données, comme indiqué dans la section Valeurs. read-only Facultatif. Donnée de type Variant (sous- type Boolean) qui a la valeur True si vous souhaitez ouvrir la base de données avec un accès en lecture seule, ou False (par défaut) si vous souhaitez ouvrir la base de données avec un accès en lecture/écriture. connect Facultatif. Donnée de type Variant (sous-type String) indiquant diverses informations sur la connexion, dont les mots de passe.
Copyright (c) 1996 Microsoft Corporation
Cordialement.
Raymond [mvp]
Bonjour.
Private Sub Commande0_Click() Dim APP As Access.Application Set APP = New Access.Application APP.OpenCurrentDatabase ("bd2.mdb") ................................ APP.CloseCurrentDatabase APP.Quit Set APP = Nothing End Sub
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"Florent" a écrit dans le message de news:02cc01c3ba50$7d40e1e0$ Bonjour,
Voilà j'aimerais savoir quel est le code VBA pour ouvrir une base à partir d'un autre base.
D'avance merci
Bonjour.
Private Sub Commande0_Click()
Dim APP As Access.Application
Set APP = New Access.Application
APP.OpenCurrentDatabase ("bd2.mdb")
................................
APP.CloseCurrentDatabase
APP.Quit
Set APP = Nothing
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA
"Florent" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:02cc01c3ba50$7d40e1e0$a001280a@phx.gbl...
Bonjour,
Voilà j'aimerais savoir quel est le code VBA pour ouvrir
une base à partir d'un autre base.
Private Sub Commande0_Click() Dim APP As Access.Application Set APP = New Access.Application APP.OpenCurrentDatabase ("bd2.mdb") ................................ APP.CloseCurrentDatabase APP.Quit Set APP = Nothing End Sub
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"Florent" a écrit dans le message de news:02cc01c3ba50$7d40e1e0$ Bonjour,
Voilà j'aimerais savoir quel est le code VBA pour ouvrir une base à partir d'un autre base.
D'avance merci
Florent
Merci à tous les deux
-----Message d'origine----- Bonjour.
Private Sub Commande0_Click() Dim APP As Access.Application Set APP = New Access.Application APP.OpenCurrentDatabase ("bd2.mdb") ................................. APP.CloseCurrentDatabase APP.Quit Set APP = Nothing End Sub
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"Florent" a écrit dans le message de
news:02cc01c3ba50$7d40e1e0$ Bonjour,
Voilà j'aimerais savoir quel est le code VBA pour ouvrir une base à partir d'un autre base.
D'avance merci
.
Merci à tous les deux
-----Message d'origine-----
Bonjour.
Private Sub Commande0_Click()
Dim APP As Access.Application
Set APP = New Access.Application
APP.OpenCurrentDatabase ("bd2.mdb")
.................................
APP.CloseCurrentDatabase
APP.Quit
Set APP = Nothing
End Sub
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA
"Florent" <anonymous@discussions.microsoft.com> a écrit
dans le message de
Private Sub Commande0_Click() Dim APP As Access.Application Set APP = New Access.Application APP.OpenCurrentDatabase ("bd2.mdb") ................................. APP.CloseCurrentDatabase APP.Quit Set APP = Nothing End Sub
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"Florent" a écrit dans le message de
news:02cc01c3ba50$7d40e1e0$ Bonjour,
Voilà j'aimerais savoir quel est le code VBA pour ouvrir une base à partir d'un autre base.
