Benaw 
30 pts. | Oct 27 2009 10:25PM GMT
i’d really like to get all fields from the database not just one form
Q:
lotus notes export a complete list of fields
does anybody know how to generate a complete list of fields for a particular database?
I have heaps of fields and i'd like to print off the list for reference
I have heaps of fields and i'd like to print off the list for reference
ASKED:
Oct 23 2009 0:40 AM GMT
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
A:
RATE THIS ANSWER
0
Click to Vote:
0
Click to Vote:
- 0
0
This script displays the names of all the fields on a form.
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
formNameIn = Lcase(Inputbox("Name of form?"))
Forall form In db.Forms
If Lcase(form.Name) = formNameIn Then
If Isempty(form.Fields) Then
Messagebox form.Name & " has no fields"
Else
fieldCount = 0
msgString = ""
Forall field In form.Fields
fieldCount = fieldCount + 1
msgString = msgString & Chr(10) & _
" " & field
End Forall
Messagebox form.Name & " has " & _
fieldCount & _
" field(s):" & Chr(10) & msgString
End If
Exit Sub
End If
End Forall
Messagebox "The form """ & formNameIn & """ does not exist"
