Optimierung Access DB

[Andreas Gauer]

Hallo NG,

Folgende 2 Fragen hätte ich: In dem Skrikt von der AEK 7 von J.Pötzel
"Performance-Tuning in VBA und Formularen" habe ich 2 für interressante
Punkte gefunden.

1. Optimierungspunkt: Set dbs=Currentdb
Folgender Code ist hier abgedruckt:

Private m_DaoDB As DAO.Database

Public Property Get CurrentDbC() As DAO.Database

If (m_DaoDB Is Nothing) Then
Set m_DaoDB = CurrentDb
End If
Set CurrentDbC = m_DaoDB

End Property

Da ich leider noch nicht so sicher im Umgang mit Klassen bin - Was muss ich
hier tun, um die Klasse aufzurufen und auf die 'Currentdb' zugreifen zu
können (Und natürlich auch auf die Recordsets)

2. Persistentes Recordset

Könnte hier mir jemand auch nähere Informationen geben, wie ich diese
Optimierung in die Realität umsetzten kann.

Für Hilfe währe ich unendlich Dankbar !!

mfg

A.G.

PS: (Windows 2000, Access 2000, Datenbanken als Front- und Back-End auf
Netzwerk)

[Henry Habermacher [MVP Access]]

Andreas Gauer <Andrea...@discussions.microsoft.com> wrote:

> 1. Optimierungspunkt: Set dbs=Currentdb

> Da ich leider noch nicht so sicher im Umgang mit Klassen bin - Was
> muss ich hier tun, um die Klasse aufzurufen und auf die 'Currentdb'
> zugreifen zu können (Und natürlich auch auf die Recordsets)

Siehe www.mvps.org/access Suche dort nach den Domain Ersatz Funktionen. Dort
wird intensiv davon gebrauch gemacht.

> 2. Persistentes Recordset
>
> Könnte hier mir jemand auch nähere Informationen geben, wie ich diese
> Optimierung in die Realität umsetzten kann.

http://www.granite.ab.ca/access/performancefaq.htm

BTW: In Groups.Google.De hättest Du auf diese Fragen sicher mindestens so
schnell eine Antwort gefunden, wahrscheinlich den einen oder anderen Tip
auch in der FAQ.

Gruss
Henry

--
Keine E-Mails auf Postings in NGs senden!
Don't send e-mails to postings in newsgroups!
KB: http://support.microsoft.com/default.aspx
FAQ: http://www.donkarl.com (neu mit Suchfunktion!)
OH: Online Hilfe von Microsoft Access (Taste F1)
Downloads: http://www.dbdev.org

[Karl Donaubauer]

Andreas Gauer wrote:
> Folgende 2 Fragen hätte ich: In dem Skrikt von der AEK 7 von J.Pötzel
> "Performance-Tuning in VBA und Formularen" habe ich 2 für interressante
> Punkte gefunden.
>
> 1. Optimierungspunkt: Set dbs=Currentdb
> Folgender Code ist hier abgedruckt:
>
> Private m_DaoDB As DAO.Database
>
> Public Property Get CurrentDbC() As DAO.Database
>
> If (m_DaoDB Is Nothing) Then
> Set m_DaoDB = CurrentDb
> End If
> Set CurrentDbC = m_DaoDB
>
> End Property
>
> Da ich leider noch nicht so sicher im Umgang mit Klassen bin - Was muss
> ich hier tun, um die Klasse aufzurufen und auf die 'Currentdb' zugreifen
> zu können (Und natürlich auch auf die Recordsets)

Dieser Tipp von Michael Kaplan sieht nur durch das "Property Get"
ein bissel so aus, als ginge es um eine Klasse. Tut es aber nicht.
Du kannst den Code in eine ganz normales Standardmodul kopieren
und dann CurrentDbC einfach direkt dort verwenden, wo du einen
Bezug auf die aktuelle DB brauchst. Also:

Set rs = CurrentDbC.OpenRecordset...
Set tdf = CurrentDbC.TableDefs...
usw.

> 2. Persistentes Recordset
>
> Könnte hier mir jemand auch nähere Informationen geben, wie ich diese
> Optimierung in die Realität umsetzten kann.

> ...

> PS: (Windows 2000, Access 2000, Datenbanken als Front- und Back-End auf
> Netzwerk)

http://www.granite.ab.ca/access/performanceldblocking.htm

--
HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com