Hi Glombi,
wir haben jetzt folgenden Zustand:
Queryopen:
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
REM Call cMemoObject.Init(Source,Isnewdoc)
End Sub
Postopen
Sub Postopen(Source As Notesuidocument)
End Sub
Querysave
Sub Querysave(Source As Notesuidocument, Continue As Variant)
REM Call source.FieldSetText("useApplet", "True")
REM Call cMemoObject.QuerySave(Continue)
End Sub
Postsave
Sub Postsave(Source As Notesuidocument)
REM Call cMemoObject.PostSave()
End Sub
Queryclose
Sub Queryclose(Source As Notesuidocument, Continue As Variant)
REM Call cMemoObject.QueryClose(Continue)
End Sub
Die Fehlermeldung CMemoObject erscheint nicht mehr. Allerdings erhalte ich beim versenden ein Auswahlfenster, ob ich senden und speichern, speichern oder verwerfen will.
Diese Auswahl wollen wir eigentlich nicht, sondern er soll direkt die Nachricht versenden.
Gruß
Goofy