例: EditProfile method

次の例は、現在のユーザーのための「Interest Profile」プロフィール文書を開きます。プロフィール文書が存在しないときには、作成します。

Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Call workspace.EditProfile _
("Interest Profile", session.UserName)