Prev: Simple question
Next: ElseIf into a For Next
From: Tony Toews [MVP] on 24 Jan 2010 02:03
Folks

I have installed the latest Lotus Notes client and have it
successfully sending test emails via VB6.

However I'd like to create the email so it's sitting on the Lotus
Notes screen and not send it. I also don't want to enter the
recipient. I want the user to choose the recipient from the address
book.

Lots of sample code out there to create and send Lotus Notes emails
but not to just to create the email.

The important lines of code are:

Set doc = oDB.CREATEDOCUMENT
Set rtitem = doc.CREATERICHTEXTITEM("Body")
doc.subject = strSubject
doc.Body = strBody & vbCrLf & vbCrLf
doc.SAVEMESSAGEONSEND = True
Call doc.send(0)

I also want to figure out how the send an HTML email but I figure that
won't be too hard to find the code. While I have HTML code in the
strBody variable it comes out looking like the code view of HTML.

Thanks, Tony
--
Tony Toews, Microsoft Access MVP
Tony's Main MS Access pages - http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/
For a convenient utility to keep your users FEs and other files
updated see http://www.autofeupdater.com/
Granite Fleet Manager http://www.granitefleet.com/
 | 
Pages: 1
Prev: Simple question
Next: ElseIf into a For Next