Sub Terminate Dim Session As NotesSession Dim Db As NotesDatabase Dim Doc As NotesDocument Set Session = New NotesSession Set Db = Session.CurrentDatabase Set Doc = Db.CreateDocument Doc.Form = "fa_Import" Call Doc.ReplaceItemValue(fld_FirstName,"Hans") Call Doc.Save(True, False, False) End Sub
Viel Spaß noch im Declare-Modus!