LOTUSSCRIPT /COM/OLE のクラス

例:AddServerToAddressBook メソッド
次のエージェントは、AceOne 上の Domino ディレクトリに SERVER2.ID の文書を追加します。

Sub Initialize
 Dim session As New NotesSession
 Dim reg As New NotesRegistration
 reg.RegistrationServer = "AceOne"
 reg.StoreIDInAddressBook = True
 Call reg.AddServerToAddressBook( _
 "c:\NotesAdministrator\server2.id", _ ' ID file
 "AceTwo/AceHardwareNE/AceHardwareCertifier", _ ' full name
 "AceHardware", _ ' server domain
 "AceHardware", _ ' server password
 "", _ ' network
 "Roberta Person/AceHardwareCertifier", _ ' administrator
 "Ace Two", _ ' title field
 "", _ ' location field
 "") ' comment field
End Sub

関連項目