Access 2007 spor u design moduhttp://www.utteraccess.com/for...2010-Slower-2000-t1959800.html
U resenju se kaze da postoje dva glavna razloga koji mogu da dovedu do sporosti u design modu:
1. default printer je neki network printer
2. postoje linkovane tabele, koje nisu otvorene (!!!???), resenje - otvori sev tabele dok radis u design modu, cak i one koje nisu u nikakvoj vezi sa formom ili reportom na kome radis
Izgleda da je 2. pravi problem, bar kakao ljudi pricaju, i da prilikom rada treba u startu otvoriti sve tabele koje su linkovane. Evo koda koji to radi (kod preuzet iz poslednjeg posta u prilozenom linku):
Code:
'Open all tables:
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
If Left(obj.Name, 4) <> "MSys" Then
DoCmd.OpenTable obj.Name
DoCmd.Minimize
End If
Next obj
'if needed use this code to close all tables
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
If Left(obj.Name, 4) <> "MSys" Then
If obj.IsLoaded = True Then
DoCmd.Close acTable, obj.Name
End If
End If
Next obj
'Open all tables:
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
If Left(obj.Name, 4) <> "MSys" Then
DoCmd.OpenTable obj.Name
DoCmd.Minimize
End If
Next obj
'if needed use this code to close all tables
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
For Each obj In dbs.AllTables
If Left(obj.Name, 4) <> "MSys" Then
If obj.IsLoaded = True Then
DoCmd.Close acTable, obj.Name
End If
End If
Next obj
Ovo sam postavio i u BAzu Znanja, da se ne zagubi.
