[AccessD] enumerating all properties in all forms

Hi Susan

Not that I know much about this, but did you read the note here (not
very promising):

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbaac10/html/acobjAccessObjectProperty.asp

Note   Properties in the AccessObjectProperties collection are not
stored and can be lost when when the object they are associated with is
checked in or out using the Source Code Control add-in.

/gustav

>>> ssharkins at bellsouth.net 17-02-2005 21:12:11 >>>
Yeah, the Help doesn't really give too much information, but my guess
is
that the AccessObjectProperties aren't the same as the form properties.


I need to get at the form's properties for ALL the forms, not just the
open
ones, so I need to use the AccessObject. 

Susan H. 

Hi Susan

Perhaps simply no AccessObjectProperty is present ..?

/gustav

>>> ssharkins at bellsouth.net 17-02-2005 20:43:45 >>>
The following procedure seems to totally skip the second For Each
loop.
No
error, it just skips it, as if there are no properties in the
Properties
collection, which may be the case. I realize we're dealing with
different
collections and I may not be referencing things right. Any help?
 
Thanks!
Susan H. 
 
 
Public Function EnumAllFormProp()
  'Print the name and setting for
  'each property in every form.
  Dim obj As Access.AccessObject
  Dim prp As Access.AccessObjectProperty
  For Each obj In CurrentProject.AllForms
    Debug.Print obj.Name
    For Each prp In obj.Properties
      Debug.Print prp.Name
      Debug.Print prp.Value
    Next
  Next
End Function