LOTUSSCRIPT /COM/OLE のクラス

例:DeleteUser メソッド
次のコードは、ユーザーを削除するシステム管理要求を作成します。メールファイルの削除を承認してからでないと、ユーザーを完全に削除できません。

Sub Initialize
 Dim session As New NotesSession
 Dim ws As NotesUIWorkspace
 Dim adminp As NotesAdministrationProcess
 Dim userName as Variant
 Set adminp = _
 session.CreateAdministrationProcess("myServer/northeast")
 userName = ws.Prompt(PROMPT_OKCANCELEDIT, _
 "User", Enter the hierarchical name of the user to delete")
 Call adminp.DeleteUser(userName, False, MAILFILE_DELETE_ALL, _
 "", False)
End Sub

関連項目