例: AddUserProfile method

次のエージェントは、セットアッププロフィール「Ordinary User」を Jimmy Yip のユーザー文書に追加します。

Sub Initialize
  Dim session As New NotesSession
  Dim reg As New NotesRegistration
  reg.RegistrationServer = "AceOne"
  Call reg.AddUserProfile( _
  "Jimmy Yip/AceHardwareNE/AceHardwareCertifier", _ ' user name
  "Ordinary User") ' profile name
End Sub