Table of contents
TOC
Réduire la table des matières
Développer la table des matières

Méthode Application.OpenCurrentDatabase (Access)

office 365 dev account|Dernière mise à jour: 20/11/2017
|
1 Contributeur

La méthode OpenCurrentDatabase vous permet d'ouvrir une base de données Microsoft Access existante comme base de données active.

Syntaxe

expression . OpenCurrentDatabase( filepath, Exclusive, bstrPassword )

expression Variable représentant un objet Application.

Paramètres

NomRequis/FacultatifType de donnéesDescription
filepathObligatoireStringNom d'un fichier de base de données existant, y compris le chemin d'accès et l'extension du nom de fichier.
ExclusiveFacultatifBooleanIndique si vous voulez ouvrir la base de données en mode exclusif. La valeur par défaut est False, elle indique que la base de données Access doit être ouverte en mode partagé.
bstrPasswordFacultatifChaîneMot de passe permettant d'ouvrir la base de données.

Valeur renvoyée

Aucune

Remarques

Utilisez cette méthode pour ouvrir une base de données à partir d'une autre application qui contrôle Microsoft Access au moyen de l'Automatisation, autrefois appelée « Automatisation OLE ». Par exemple, vous pouvez utiliser la méthode OpenCurrentDatabase à partir de Microsoft Excel pour ouvrir la base de données exemple Comptoir.mdb dans la fenêtre Microsoft Access. Une fois que vous avez créé une instance de Microsoft Access à partir d'une autre application, vous devez également créer une nouvelle base de données ou spécifier une base de données particulière à ouvrir. Cette base de données s'ouvre dans la fenêtre Microsoft Access.

Si vous avez déjà ouvert une base de données et souhaitez ouvrir une autre base de données dans la fenêtre Microsoft Access, vous pouvez utiliser la méthode CloseCurrentDatabase pour fermer la première base de données avant d'en ouvrir une autre.

Remarque Utilisez la méthode OpenAccessProject pour ouvrir un projet Microsoft Access (.adp) existant en tant que base de données active.

Remarque Ne confondez pas la méthode OpenCurrentDatabase avec la méthode Open des objets ADO (Objets de données ActiveX) ou la méthode OpenDatabase des objets DAO (Objets d'accès aux données). La méthode OpenCurrentDatabase ouvre une base de données dans la fenêtre Microsoft Access. La méthode OpenDatabase des objets DAO renvoie une variable objet Database, qui représente une base de données particulière, mais n'ouvre pas en fait la base de données dans la fenêtre Microsoft Access.

Exemple

L'exemple suivant montre comment ouvrir une base de données Microsoft Access à partir d'une autre application au moyen de l'Automatisation, puis comment ouvrir un formulaire dans cette base de données.

Vous pouvez taper ce code dans un module Visual Basic dans n'importe quelle application pouvant faire office de composant COM. Par exemple, vous pouvez exécuter le code suivant à partir de Microsoft Excel, Microsoft Visual Basic ou Microsoft Access.

Lorsque la variable pointant sur l'objet Application est hors de portée (quand l'exécution sort des limites de la variable), l'instance de Microsoft Access qu'elle représente se ferme également. Par conséquent, vous devez déclarer cette variable au niveau du module.

' Include the following in Declarations section of module.
Dim appAccess As Access.Application

Sub DisplayForm()

 Dim strDB as String

 ' Initialize string to database path.
 Const strConPathToSamples = "C:\Program " _
 & "Files\Microsoft Office\Office11\Samples\"

 strDB = strConPathToSamples & "Northwind.mdb"
 ' Create new instance of Microsoft Access.
 Set appAccess = _
 CreateObject("Access.Application")
 ' Open database in Microsoft Access window.
 appAccess.OpenCurrentDatabase strDB
 ' Open Orders form.
 appAccess.DoCmd.OpenForm "Orders"
End Sub

Voir aussi

Concepts

Objet Application

Autres ressources

© 2018 Microsoft