Hi!
I wonder if there is a way to dynamically access the default “contact folder” using the COM toolkit.
I´m currently accessing the ‘default view’, but is it always the contact folder?
Here is my code:
Dim nErrCode As Integer
Dim objNotesSession As Object
Dim objNotesDb As Object
Dim objNotesMyDoc As Object
Dim objNotesMyView As Object
Dim objNotesMyItem As Object
objNotesSession = CreateObject(“Lotus.NotesSession”) 'Late binding
objNotesSession.Initialize()
objNotesDb = objNotesSession.GetDatabase("", "names.nsf")
For Each view As Object In objNotesDb.Views
If view.IsDefaultView Then
objNotesMyView = view
End If
Next
…