次のスクリプトは現在のデータベースに文書を新規作成し、署名して保存します。また、署名を確認する認証名を取得します。例えば、このプロパティは「Acme Development Corporation」を返します。
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim verifyName As String
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
doc.Form = "Main Topic"
doc.Subject = "A signed document"
Call doc.Sign
Call doc.Save( False, True )
verifyName = doc.Verifier