.

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: CrossCertify method
This agent cross-certifies JYIP.ID with CERTNE.ID.

Sub Initialize
 Dim session As New NotesSession
 Dim reg As New NotesRegistration
 dt = Datenumber(Year(Today)+1, Month(Today), Day(Today))
 reg.RegistrationServer = "AceOne"
 reg.CertifierIDFile = "c:\NotesAdministrator\certNE.id"
 reg.Expiration = dt
 Call reg.CrossCertify( _
 "c:\NotesAdministrator\jyip.id", _ '  ID file
 "AceHardware", _ ' certifier password
 "") ' comment field
End Sub

See Also