Reading Form Properties

[Joe Delphi]

Hello,

I want to loop through all of the forms in my MS Access project and check to
see if a certain property is NULL. I want to do something like this
pseudo-code:

For i = 1 to CurrentProject.AllForms.Count - 1
If Form.ServerFilter Is Null Then
put form name into a list
Next i


But I don't know how to read the ServerFilter property of the form
programmatically.

Any help appreciated.

JD

 

[Guest]

I hope that will provide you with a starting point

Dim i As Integer, frmName As String
For i = 1 To CurrentDb.Containers("forms").Documents.Count
frmName = CurrentDb.Containers("forms").Documents(i).Name
DoCmd.OpenForm frmName, acDesign
If IsNull(Application.Forms(frmName).ServerFilter Then
' Your code
End If
DoCmd.Close acForm, frmName
Next i