Hallo,
ich habe eine Mail über Lotusscript generiert, die einen Button im Body enthält.
Die Mail ist signiert und auch beim Bodyfeld habe ich Issigned=true gesetzt.
Beim Öffnen zeigt die Mail auch "Diese Nachricht ist digital signiert." an.
Trotzdem erhält der Benutzer beim Klicken auf den Button einen Sicherheitsalarm und dort ist als signiert von "-keine Signatur-" angegeben.
Kann mir jemand helfen, was und wie ich noch signieren muss, damit das ohne Sicherheitsalarm funktioniert.
Gruß
Renate
...
Set Maildoc = New NotesDocument( db )
Maildoc.Form = "Memo"
Set rtitem = New NotesRichTextItem( Maildoc, "Body" )
Set rtitem = addButtonForm(rtitem, "ButtonENumber")
rtitem.Issigned=true
Call maildoc.Replaceitemvalue("sign","1")
Call Maildoc.Sign()
Print "Signed Verifier:" + Maildoc.Verifier
Call Maildoc.Send( False)
Function addButtonForm(rtitem As NotesRichTextItem, formName As string) As NotesRichTextItem
Dim s As New NotesSession
Dim db As NotesDatabase
Dim body As NotesRichTextItem
Dim tempbuttondoc As NotesDocument
Dim temprtfield As NotesRichTextItem
Set db = s.CurrentDatabase
' Create a memo and set the fields
Set body = rtitem
' Create a temporary document with the form that has the button
Set tempbuttondoc = db.CreateDocument
tempbuttondoc.Form = formName
' Add the button to a temporary field on the memo
Set temprtfield = New NotesRichTextItem( rtitem.Parent, "temprtfield")
Dim success As Variant
success = tempbuttondoc.RenderToRTItem( temprtfield )
' Add (append) the button to body field of the memo
Call body.AppendRTItem( temprtfield )
' Remove the temporary field from the memo and send it
Call temprtfield.Remove
Set addButtonForm = body
End Function