.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: IsCertificateAuthorityAvailable property
This example submits a request to change the user named John Good to John Goode. 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=John Good/O=casco", _
   "Goode")
   Messagebox noteID$, , "Renaming request made using CA process"
 Else
   adminp.CertifierFile = "C:\Lotus\Domino\Data\cert.id"
   adminp.CertifierPassword = "My1Pswd"
   noteID$ = adminp.RenameNotesUser("CN=John Good/O=casco", _
   "Goode")
   Messagebox noteID$, , "Renaming request made using certifier id"
 End If
End Sub

See Also