LOTUSSCRIPT /COM/OLE のクラス

例:RegisterNewCertifier メソッド
次のエージェントは、CERT.ID を使用して AceHardwareNE/AceHardwareCertifier を 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\cert.id"
 reg.Expiration = dt
 reg.IDType = ID_HIERARCHICAL
 reg.MinPasswordLength = 5  ' password strength
 reg.IsNorthAmerican = True
 reg.OrgUnit = "AceHardwareNE"
 reg.RegistrationLog = "log.nsf"
 reg.UpdateAddressBook = True
 reg.StoreIDInAddressBook = True
 Call reg.RegisterNewCertifier("AceHardwareCertifier", _
 "c:\NotesAdministrator\certNE.id", _ '  file to be created
 "Ace Hardware NE ")         ' Domino Directory title field
End Sub

関連項目