hier ein kleines beispiel fuer den umgang mit files...
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
fileNum% = Freefile()
Open "c:\FeldSynapse.txt" For Append As fileNum%
Print #fileNum%, "Felder der Datenbank : "+db.title
Forall form In db.Forms
Forall field In form.Fields
Print #fileNum%, form.name + Chr(9) + field
Print form.name,field
End Forall
End Forall
Close #fileNum%
Messagebox "Feldsynapse c:\\FeldSynapse.txt beendet !"
Die Print#-Befehle musst du abaendern und z.B. auf ein Dokument beziehen....
gruss