CurrentDB.Properties is nothing but a collection. If you can iterate through a collection, you will be able to get the list of all the properties. Code to iterate through all properties is
Dim i As Integer
For i = 0 To CurrentDb.Properties.count - 1
Debug.Print CurrentDb.Properties(i).Name
Next
It gave me the following list of properties.
Name
Connect
Transactions
Updatable
CollatingOrder
QueryTimeout
Version
RecordsAffected
ReplicaID
DesignMasterID
Connection
ANSI Query Mode
Themed Form Controls
AccessVersion
Build
ProjVer
StartUpForm
StartUpShowDBWindow
StartUpShowStatusBar
AllowShortcutMenus
AllowFullMenus
AllowBuiltInToolbars
AllowToolbarChanges
AllowSpecialKeys
UseAppIconForFrmRpt
Track Name AutoCorrect Info
Perform Name AutoCorrect
AppTitle
AppIcon
I don’t know the data types of the these properties but I put it for quick reference.
Leave a Reply