LOTUSSCRIPT/COM/OLE CLASSES
Examples: EncryptionKeys property
1. This script gets the encryption keys for a document. For example, if the document is encrypted with the Confidential Key and the Classified Key, keys( 0 ) equals "Confidential Key" and keys( 1 ) equals "Classified Key."
Dim doc As NotesDocument
Dim keys As Variant
'...set value of doc...
keys = doc.EncryptionKeys
2. This script encrypts every item in a document with two encryption keys: Top Secret and Medium Secret.
Dim doc As NotesDocument
Dim item As NotesItem
Dim keys( 1 To 2 ) As String
'...set value of doc...
Forall i In doc.Items
i.IsEncrypted = True
End Forall
keys( 1 ) = "Top Secret"
keys( 2 ) = "Medium Secret"
doc.EncryptionKeys = keys
Call doc.Encrypt
Call doc.Save( True, True )
See Also
EncryptionKeys property
Glossary
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Glossary