Ich habe absolut keine Ahnung, was Du da treibst ...
Dieser schnell hingeklimperte Code in einem Button funktioniert ohne weiteres:
Sub Click (Source As Button)
Dim ws As New NotesUIWorkspace
Dim uidoc As notesUIDocument
Dim doc As NotesDocument
On Error Goto ErrorRoutine
Set uidoc = ws.CurrentDocument
Set doc = uidoc.Document
Call uidoc.Save
doc.SaveOptions = "0"
Call uidoc.Close
doc.Form = "0 - AnotherForm"
Call doc.Save (True, False, True)
Exit Sub
ErrorRoutine:
Call ErrorHandler ("'Form 0 - löschen'")
Exit Sub
End Sub
Bernhard
PS: Das mit dem Item vs. Feld hast Du sicher nur missverstanden - wir dealen ja hier mit Items und nicht mit Feldern. Das heisst aber noch lange nicht, dass wir diese extra als NotesItem instantiieren müssen. Backend kennt keine "Felder" ;-)