例: CertificateAuthorityOrg property

次の例では、Notes ユーザー名を John Good から John Goode に変更する要求が送信されます。指定の組織名「¥casco」は、CA が設定した認証者のリストで表示するのに使用されるのと同じ形式で指定されます。[設定] タブの [認証] を選択し、次に [認証者の選択] ダイアログボックスから [CA プロセスを使用] を選択すると、使用できる CA が Domino Administrator クライアントのドロップダウンリストに表示されます。

Sub Initialize
  Dim session As New NotesSession
  Dim adminp As NotesAdministrationProcess
  Set adminp = _
  session.CreateAdministrationProcess("bay/casco")
  adminp.CertificateAuthorityOrg = "¥casco"
  adminp.UseCertificateAuthority = True
  noteID$ = adminp.RenameNotesUser("CN=John Good/O=casco", _
  "Goode")
  Messagebox noteID$, , "Renaming request has been submitted"
  End Sub