Enumerate the properties of current database : Database Properties « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Database Properties

Enumerate the properties of current database

 
Sub EnumDBProperties()

    Dim pty As Property
    Dim strTemp As String
    
    On Error Resume Next

    For Each pty In CurrentDb.Properties
        strTemp = pty.Name & ": "
        strTemp = strTemp & pty.Value
        Debug.Print strTemp
    Next
    
End Sub








Related examples in the same category

1.Set new property to database
2.Sub KeepEmOut()
3.Database properties: AllowFullMenus, Allowtoolbarchanges
4.reset any values you set
5.Changing Options