Notes-Absturz bei work.editdocument

[Demian]

Moin,moin,

kann mir jemand sagen, warum bei folgendem Code in einer normalen Aktion innerhalb einer Ansicht Notes abstürzt (Lotus Notes Error Notification)?

   

Dim s As New NotesSession
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Dim work As New NotesUIWorkspace
   
   
   Set db = s.CurrentDatabase
   Set doc = db.CreateDocument
   doc.form = "test"
   doc.Feld = "Hallo Welt NEU"
   
   Call work.EditDocument(True,doc)

Gruß
Demian

[Demian]

OK, bin jetzt spaßhalber mal hin, hab die Maske "test" gelöscht und neu erstellt und siehe da, die Welt ist wieder in Ordnung...