Hallo,
ich habe derzeit ein Problem, daß MIME-Messages nicht richtig erstellt werden (wird immer in Text-Mails verwandelt). Aus diesem Grund versende ich die Daten mit der Memo-Maske. Dazu habe ich folgende Befehlsfolge programmiert:
Dim uidoc as NotesUIDocument
Dim workspace as NotesUIWorkspace
Dim docMemo as NotesDocument
....
Call docMemo.Save(True,False,True)
docMemo.SaveOptions = "0"
Call workspace.EditDocument(False,docMemo,True)
Set uidoc = workspace.CurrentDocument
Call uidoc.Send()
Call uidoc.close(True)
Bei dem folgenden Befehlsvfolge wird die Memo-Maske des Mailanwenders geöffnet (es ist aber schon alles eingetragen). Dann wird der Anwender, immer noch gefragt, ob gespeichert werden soll (uidoc.close()). Die Maske soll aber gespeichert oder ungespeichert geschlossen werden. Zwischenzeitlich hatte ich uidoc.Save() eingefügt. Das hatte das Verhalten aber auch nicht besser gemacht.
Hat jemand eine Idee, wie man das gewünschte Ergebnis erreicht?
Gruß, Grobber