LOTUSSCRIPT/COM/OLE CLASSES

Examples: IsCertificateAuthorityAvailable property
This example submits a request to change the user named Nora Ephron to Nora Jones. If the CA process "\casco" is available, it uses that process. Otherwise, it uses the certifier id.

Sub Initialize
 Dim session As New NotesSession
 Dim adminp As NotesAdministrationProcess
 Set adminp = _
 session.CreateAdministrationProcess("bay/casco")
 If adminp.IsCertificateAuthorityAvailable = True Then
   adminp.CertificateAuthorityOrg = "\casco"
   adminp.UseCertificateAuthority = True
   noteID$ = adminp.RenameNotesUser("CN=Nora Ephron/O=casco", _
   "Jones")
   Messagebox noteID$, , "Renaming request made using CA process"
 Else
   adminp.CertifierFile = "C:\Lotus\Domino\Data\cert.id"
   adminp.CertifierPassword = "My1Pswd"
   noteID$ = adminp.RenameNotesUser("CN=Nora Ephron/O=casco", _
   "Jones")
   Messagebox noteID$, , "Renaming request made using certifier id"
 End If
End Sub

See Also