- 次の Visual Basic コードは、パスワードを提示せずに、現在の Domino ディレクトリで検索したユーザー名を使用して、Domino のセッションを初期化します。必要に応じてユーザーにはパスワード入力ボックスが表示されます。
Private Sub InitializeDomino_Click()
Dim s As New NotesSession
Call s.InitializeUsingNotesUserName("Marie LeBlanc")
MsgBox s.CommonUserName, , "Common user name"
End Sub
- 次の Visual Basic コードは、パスワードを提示して、現在の Domino ディレクトリで検索したユーザー名を使用して、Domino のセッションを初期化します。
Private Sub InitializeDomino_Click()
Dim session As NotesSession
Set session = CreateObject("Lotus.NotesSession")
Call session.InitializeUsingNotesUserName _
("Marie LeBlanc", "secretPassword")
TextUsername = session.UserName
End Sub
- 次の Visual Basic コードは、Anonymous アクセスで Domino のセッションを初期化します。
Private Sub InitializeDomino_Click()
Dim s As New NotesSession
Call s.InitializeUsingNotesUserName("")
MsgBox s.CommonUserName, , "Common user name"
End Sub