Open the Users Mail Database

To open the mail database of the current user, just use the Method "OpenMail" in a NotesDatabase Object. It feels a bit awkward at first, but actually the object will update itself to contain the database immediately. Easy!

Dim db as New NotesDatabase("","")
Call db.OpenMail
Dim doc as NotesDocument
'now just prepare am email and open it in the client, ready to be sent.
Set doc=db.CreateDocument()
Call doc.ReplaceItemValue("Form","Memo")
Call doc.ReplaceItemValue("SendTo","John.Doe@Example.com")
Call doc.ReplaceItemValue("Subject","Hello World")
Call doc.ReplaceItemValue("Body","This Mail will now be opened and ready to be sent by the user.")
Dim ws as New NotesUIWorkspace()
Call ws.EditDocument(true, doc)