![](/forum/profile/get-photo.asp?memberid=27&type=profile&rnd=376) Elite Veteran
Beiträge: 860
![500](http://donkarl.com/forum/images/decorations/multiple/500.gif) ![100](http://donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://donkarl.com/forum/images/decorations/multiple/100.gif) ![25](http://donkarl.com/forum/images/decorations/multiple/25.gif) ![25](http://donkarl.com/forum/images/decorations/multiple/25.gif) Ort: Wien | Hallo!
waholin - 28.04.20
...
Wie gehe ich also vor, um die DB einmalig zu öffnen oder genügt bei den Aufrufen immer nur der Verweise auf die CURRENTDB?
...
Ich vermute, es ist von Zugriffen innerhalb derselben Anwendung die Rede. In diesem Fall ist die beste Lösung eine, die wir vor 20 Jahren von michka (selig) gelernt haben.
In einem Standardmodul:
'variable for CurDbC Property
Private m_db As DAO.Database
Public Property Get CurDbC() As DAO.Database
'create a single CurrentDb instance as Property
'by Michael Kaplan
If (m_db Is Nothing) Then
Set m_db = CurrentDb
End If
Set CurDbC = m_db
End Property
Das ist dann überall verwendbar in der Art:
CurDbC.OpenRecordset...
CurDbC.Tabledefs...
etc.
Die Property sorgt dafür, dass in der Anwendung nur 1 Instanz von CurrentDb offen ist.
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |