Entschlüsselung einer Mail per Script

[Peter G]

Hallo zusammen, ich habe folgendes Problem (Version Lotus Notes 5.0.10):

Ich verschicke (per Agent, spielt aber im Prinzip keine Rolle) eine Mail mit 2 Anhängen. Der Empfänger die Mail an, dabei öffnet sich eine Maske, in der ihm einige Felder angezeigt werden und eine Schaltfläche zum Extrahieren dieser Mail existiert.

Beim Extrahieren werden die Anhänge der Mail abgehängt und in ein Verzeichnis kopiert. Dies erfolgt durch ein entsprechendes Script.

Das funktioniert auch solange prima, wie die Mail nicht verschlüsselt ist. Ist die Mail verschlüsselt, kommt beim Extrahieren ein Error 4005 ("Sie müssen den Dekodierungsschlüssel angeben, um dieses Dokument zu extrahieren").

Ich suche jetzt hier eine Möglichkeit, per LotusScript vor dem Extrahieren der Anhänge die Mail zu entschlüsseln. 

Ich habe, nach einem anderen Eintrag hier im Forum (vor über 2 Jahren geschrieben) folgendes probiert, das klappt aber nicht:

Set item = docMemo.GetFirstItem("Body")
If Not item Is Nothing Then item.IsEncrypted = False
Set item = docMemo.GetFirstItem("Encrypt")
If Not item Is Nothing Then Call item.Remove
Set item = docMemo.GetFirstItem("$Seal")
If Not item Is Nothing Then Call item.Remove
Call docMemo.Save(False, False)     

Hat noch jemand eine Idee ? Wäre prima ?

Viele Grüße
Peter

[Peter G]

Sri,
in der zweiten Zeile fehlt das Wort "klickt"

... Der Empfänger klickt die Mail an, ...

[Zimmi]

Hallo,

da diese Mail mit dem Schlüssel des Anwenders verschlüsselt ist, muss diese im Kontext des Anwenders vorerst entschlüsselt werden.

Mit ein entsprechenden Client-Einstellungen für die Verschlüsselung von gespeicherten Mails (muss deaktiviert sein = Standard).

Dann über einen Symbol mit der folgenden Formel die Dokumente im Kontext den Anwenders entschlüsseln.
@Command([RefreshSelectedDocument]);
@Command([DeselectAll])

Zimmi