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