LOTUSSCRIPT /COM/OLE のクラス

例:Recertify メソッド
次のエージェントは、CERT.ID から JYIP.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
Call reg.Recertify( _
"c:\NotesAdministrator\jyip.id", _ ' ID file
"AceHardware", _ ' certifier password
"") ' comment field
End Sub

関連項目