次のエージェントは、現在のデータベースのフォームに署名します。
Sub Initialize Dim session As New Notessession Dim db As Notesdatabase Set db = session.Currentdatabase Call db.sign(DBSIGN_DOC_FORM) End Sub