Removing Custom Database Property

M

Mike

Is there a way through code to remove (not change or modify) a custom
database property. I don't want to go in and manually do it.
 
T

Tim Ferguson

Is there a way through code to remove (not change or modify) a custom
database property. I don't want to go in and manually do it.

Look up DAO help on Containers and Documents; you can use only use DAO
but this produces the same as the File..Database Properties menu
selection:

Public Sub DocTheDocs()
Dim db As DAO.Database
Dim prp As DAO.Property

' have to have a permanent handle to the database
Set db = CurrentDb()

' you want the UserDefined document in the
' Databases container.
For Each prp In db.Containers("Databases"). _
Documents("UserDefined"). _
Properties

Debug.Print prp.Name; Tab(24);

' the prp may contain an unprintable value
On Error Resume Next
Debug.Print prp.Value
On Error GoTo 0

Next prp

End Sub


Hope that helps


Tim F
 
Top