Hi when i execute the next code, give´s me back the following error: “Error Notes error: The certified entry has not been found on the address book”. But the certifier finds himself in the address book (ALUMNI/MYSERVER)
On Error Goto Initialize_Error
Dim ns As New NotesSession
Dim ws As New NotesUIWorkspace
Dim adminp As NotesAdministrationProcess
Dim db As NotesDatabase
Dim doc As NotesDocument
Set adminp = ns.CreateAdministrationProcess("notebook-36/MYSERVER")
adminp.CertifierFile ="C:\Lotus\Domino\Data\center.id"
adminp.CertifierPassword = "password"
adminp.CertificateAuthorityOrg = "\MYSERVER"
noteid = adminp.MoveUserInHierarchyRequest("CN=Username/OU=CENTER/OU=ALUMNI/O=MYSERVER","ALUMNI/MYSERVER",False)
noteid= adminp.MoveUserInHierarchyComplete(noteid )'Here error is emitted