1 必须安装Domino或Notes,并引入Lotus Domino Objects
2 以下为VB例子
Dim ss As New Domino.NotesSession
Dim db As New Domino.NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
ss.Initialize
'若使用用户名和密码访问
'ss.InitializeUsingNotesUserName <访问用户>, <访问密码>
Set db = ss.GetDatabase("<服务器地址>", "names.nsf")
If Not (db.IsOpen) Then
Msgbox "无法打开数据库"
Exit Sub
End If
Set view = db.GetView("People")
If view Is Nothing Then
Msgbox "视图不存在"
Exit Sub
End If
Set doc = view.GetFirstDocument
While Not (doc Is Nothing)
Set doc = view.GetNextDocument(doc)
Wend
Set doc = Nothing
Set view = Nothing
Set db = Nothing
Set ss = Nothing
3 可参考文章《Common ground: COM access to Domino objects》
http://www-128.ibm.com/developerworks/lotus/library/ls-COM_Access/