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 プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
?
ヘルプの使い方
すべてのヘルプ項目
用語集