Application.CurrentDb-Methode (Access)

Die CurrentDb-Methode gibt eine Objektvariable vom Typ Database zurück, die die Datenbank darstellt, die derzeit im Microsoft Access-Fenster geöffnet ist.

Syntax

Ausdruck. CurrentDb

expression Eine Variable, die ein Application-Objekt darstellt.

Rückgabewert

Datenbank

Bemerkungen

Hinweis

In Microsoft Access richtet die CurrentDb-Methode einen ausgeblendeten Verweis auf die Microsoft Office 12.0 Access Connectivity Engine-Objektbibliothek in einer Microsoft Access-Datenbank ein.

Um die Struktur Ihrer Datenbank und der zugehörigen Daten in Visual Basic zu bearbeiten, müssen Sie Dao (Data Access Objects) verwenden. Die Methode CurrentDb bietet eine Möglichkeit, per Visual Basic-Code auf die aktuelle Datenbank zuzugreifen, ohne den Namen der Datenbank zu kennen. Nachdem Sie über eine Variable verfügen, die auf die aktuelle Datenbank verweist, können Sie auch auf andere Objekte und Auflistungen in der DAO-Hierarchie zugreifen und diese bearbeiten.

Verwenden Sie die CurrentDb-Methode , um mehrere Objektvariablen zu erstellen, die auf die aktuelle Datenbank verweisen. Im folgenden Beispiel verweisen die Variablen dbsA und dbsB beide auf die aktuelle Datenbank:

Dim dbsA As Database, dbsB As Database 
Set dbsA = CurrentDb 
Set dbsB = CurrentDb

Hinweis

In früheren Versionen von Microsoft Access haben Sie möglicherweise die Syntax DBEngine.Workspaces(0).Databases(0)oder DBEngine(0)(0)verwendet, um einen Zeiger auf die aktuelle Datenbank zurückzugeben. In Microsoft Access 2000 und höher sollten Sie stattdessen die CurrentDb-Methode verwenden. Die CurrentDb-Methode erstellt eine weitere Instanz der aktuellen Datenbank, während die DBEngine(0)(0)Syntax auf die geöffnete Kopie der aktuellen Datenbank verweist. Mit der Methode CurrentDb können Sie mehr als eine Variable vom Typ Database erstellen, die auf die aktuelle Datenbank verweist. Microsoft Access unterstützt weiterhin die DBEngine(0)(0)Syntax, aber Sie sollten diese Änderung an Ihrem Code in Betracht ziehen, um mögliche Konflikte in einer Datenbank mit mehreren Benutzern zu vermeiden.

Wenn Sie gleichzeitig mit einer anderen Datenbank arbeiten müssen, während die aktuelle Datenbank im Microsoft Access-Fenster geöffnet ist, verwenden Sie die OpenDatabase-Methode eines Workspace-Objekts . Die OpenDatabase-Methode öffnet die zweite Datenbank nicht tatsächlich im Microsoft Access-Fenster. Es wird lediglich eine Database-Variable zurückgegeben, die die zweite Datenbank darstellt. Im folgenden Beispiel wird ein Zeiger auf die aktuelle Datenbank und auf eine Datenbank namens Contacts.mdb zurückgegeben:

Dim dbsCurrent As Database, dbsContacts As Database 
Set dbsCurrent = CurrentDb 
Set dbsContacts = DBEngine.Workspaces(0).OpenDatabase("Contacts.mdb")

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.