Juchu,
es klappt jetzt

(Bierpause hat weitergeholfen)
So hats hingehaun:
- globale Variable "Ablagedoc" im Memo des Templates angelegt
Dim Ablagedb As NotesDatabase
Dim Ablagedoc As NotesDocument
- Im Postsend-Event Haken abgefragt und dann im Backend Ablagedoc in Ablagedb erstellt :
If Source.Document.Ablage(0) = "Ablage" Then
Set Ablagedb = New NotesDatabase("","Ablagedb.nsf")
Set Ablagedoc = New NotesDocument(Ablagedb)
Ablagedoc.form = "EMail"
Ablagedoc.EMail = source.Document.Sendto
Ablagedoc.Name = source.Document.subject
Ablagedoc.Body = source.Document.Body
Call Ablagedoc.Save(True,False)
End If
- Dann im Queryclose auf Instanz von Ablagedoc geprüft und wenn vorhanden, dann Doc ins UI bringen
If Not Ablagedoc Is Nothing Then
Dim Ablageuiws As New NotesUIWorkspace
Dim Ablageuidoc As NotesUIDocument
Set Ablageuidoc = Ablageuiws.EditDocument(True,Ablagedoc,False,,True,True)
End If
Das gute daran ist, das Item hinterm Haken muss gar nicht gelöscht werden! Wird ja eh nur im Postsend abgefragt und da stoert es nach dem Versenden auch nicht mehr. Selbst wenn die Mail aus "Sent" später nochmal geöffnet wird zum lesen und dann wieder geschlossen: Das Ereignis tritt ja nicht ein. Im Gegenteil, es ist sogar ein Feature, da man so sofort erkennt, dass die Mail abgelegt wurde. (So verkauf ich dass zumindest)
Also vielen Dank für die großartige Hilfe... it löppt