Dokumente signieren / unterschreiben

[rico]

Hi @all

Wer kennt sich hier mit dem Signieren (unterschreiben) von Dokumenten aus?
Es sollen Dokumente (ganze Doks, keine Abschnitte) in einer DB unterschrieben, aber nicht versendet werden.
In der DB werden Doks eingestellt, die später mit der Notes-Signatur abgezeichnet werden sollen.

RicoGruß

[ata]

... die Signatur kenne ich nur in Verbindung mit dem Versand von Mails - dabei wird das Rich-Textfeld "Body" Hash-verschlüsselt...

ata

[cpo]

Das geht einfach mit doc.sign  

Hat auch nix mit verschlüsseln oder mailen zu tun. Setzt halt die Signatur in der Statuszeile.

CPO

[rico]

Ja, genau das habe ich gemeint. Ich wusste gar nicht das es diese Methode für Docs im Script gibt.
Vielen Dank für den Hinweis. :-))

Es wird hier auch KEIN spezielles Feld benötigt, wie es bei Verwendung der Formelsprache erforderlich ist. Das Dok wird richtig unterschrieben mit $Signature und co.

Hier noch ein kurzes Script für einen Butten (falls es noch jemand benötigt):
Sub Click(Source As Button)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim workspace As New NotesUIWorkspace
   Dim doc As NotesDocument
   Dim uidoc As NotesUIDocument
   Set db = session.CurrentDatabase
   Set uidoc = workspace.CurrentDocument
   Set doc = uidoc.Document
   Call doc.Sign
   Call doc.Save( False, True )
End Sub