Examples: CertifierPassword property

  1. This example prompts the current user to supply the certifier ID password before submitting a request to rename the user named Mary Jones to Maria Jones.
    Sub Initialize
  Dim session As New NotesSession
  Dim ws As New NotesUIWorkspace
  Dim adminp As NotesAdministrationProcess
  Set adminp = _
  session.CreateAdministrationProcess("myServer/northeast")
  adminp.CertifierFile = _ 
  "C:\lotus\notes\data\software-cert.id"
  adminp.CertifierPassword = _
  ws.Prompt(PROMPT_PASSWORD, _
  "Password", "Type certifier password")
  noteid$ = adminp.RenameNotesUser( _
  "CN=Mary Jones/O=northeast","*","Maria")
  If noteid$<> "" Then
    Messagebox "Request submitted",,"Success" 
  End If
End Sub
  2. This example submits a request to rename Mary Jones to Mary Ellen Jones without prompting the current user for a certifier ID password. The password, My1Pswd, is instead hard-coded into the script.
    Sub Initialize
  Dim session As New NotesSession
  Dim ws As New NotesUIWorkspace
  Dim adminp As NotesAdministrationProcess
  Set adminp = _
  session.CreateAdministrationProcess("myServer/northeast")
  adminp.CertifierFile = _ 
  "C:\lotus\notes\data\software-cert.id"
  adminp.CertifierPassword = "My1Pswd"
  noteid$ = adminp.RenameNotesUser("CN=Mary Jones/O=northeast", _
  "*","*","E")
  If noteid$<> "" Then
    Messagebox "Request submitted",,"Success" 
  End If
End Sub