LOTUSSCRIPT/COM/OLE CLASSES
Sub Initialize Dim session As New NotesSession Dim reg As New NotesRegistration reg.RegistrationServer = "AceOne" reg.StoreIDInAddressBook = True Call reg.AddServerToAddressBook( _ "c:\NotesAdministrator\cert2.id", _ ' ID file "AceHardware", _ ' certifier password "", _ ' location field "") ' comment field End Sub
See Also