Accessing Lotus Notes Database

[cbsull]

Hi all!

I'm currently trying to provide my users a connection to a Lotus Notes database after they click on a button. I have searched the forum and there is a lot of information concerning the mail file, but nothing about a separate database. The name of the database I'm trying to connect to is "CASE\casepackage.nsf". I've written the following code based on what I've seen on the forum but it's not working.

Private Sub CasePackage_Button_Click()

Dim db As Object          'The CasePackage database
Dim DbName As String    'CasePackage name
Dim Session As Object    'The notes session

'Start a session to notes

Set Session = CreateObject("Notes.NotesSession")

DbName = "CASE\casepackage.nsf"

'Open the database in notes
Set db = Session.GetDatabase("", DbName)
If db.IsOpen = True Then
'Already open
Else
db.Open
End If

End Sub

I'd appreciate any help!

 

[jumpjack]

Your code IS working for me... but now WHAT?
How can I access lotus database to read its data? I already know how to add data to my Access DB; I miss the part of getting them from inside Lotus...

I even found official API documentation for Lotus, but I don't know where tostart from...