次のエージェントは、認証者名を Developer1/Albany/Acme に設定してから、認証機関として使用します。
Sub Initialize Dim session As New NotesSession Dim reg As New NotesRegistration reg.CertifierName = "CN=Developer1/OU=Albany/O=Acme" reg.UseCertificateAuthority = True End Sub