LOTUSSCRIPT /COM/OLE のクラス
例:CertifierPassword プロパティ
1. 次の例では、ユーザー名を Mary Jones から Maria Jones に変更する要求を送信する前に、現在のユーザーに対し、認証者 ID パスワードを入力するよう求められます。
Sub Initialize
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim adminp As NotesAdministrationProcess
Set adminp = _
session.CreateAdministrationProcess("myServer/northeast")
adminp.CertifierFile = _
"C:\lotus\notes\data\software-cert.id"
adminp.CertifierPassword = _
ws.Prompt(PROMPT_PASSWORD, _
"Password", "Type certifier password")
noteid$ = adminp.RenameNotesUser( _
"CN=Mary Jones/O=northeast","*","Maria")
If noteid$<> "" Then
Messagebox "Request submitted",,"Success"
End If
End Sub
2. 次の例では、現在のユーザーに対し、認証者 ID パスワードを入力するよう求めることなく、ユーザー名を Mary Jones から Mary Ellen Jones に変更する要求が送信されます。代わりに、パスワード My1Pswd はスクリプトにハードコーディングされます。
Sub Initialize
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim adminp As NotesAdministrationProcess
Set adminp = _
session.CreateAdministrationProcess("myServer/northeast")
adminp.CertifierFile = _
"C:\lotus\notes\data\software-cert.id"
adminp.CertifierPassword = "My1Pswd"
noteid$ = adminp.RenameNotesUser("CN=Mary Jones/O=northeast", _
"*","*","E")
If noteid$<> "" Then
Messagebox "Request submitted",,"Success"
End If
End Sub
関連項目
CertifierPassword プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集