Sending email from Access using Lotus Notes

[Guest]

I am able to send emails from Access using Outlook with the code listed below
and referencing the Outlook Object library. My work computer only has Lotus
Notes. Is it possible to set up this type of email programming in Access
with Lotus Notes. Does anyone know where to get the code and how would the
Object Library be referenced for Lotus Notes ?

Dim objout As Outlook.Application
Dim objmail As Outlook.Mailitem
Set objout = CreateObject("Outlook.application")
Set objmail = objout.CreateItem(olMailItem)
objmail.Subject = “Payment Reportâ€
objmail.Body = “Please read the enclosed payment report.
objmail.To = “[email protected]â€
objmail.Attachments.Add (“PaymentReport.xlsâ€)
objmail.Send

 

[Douglas J. Steele]

Tony Toews has some information about this at
http://www.granite.ab.ca/access/email/lotusnotes.htm

 

[Guest]

I found the code and it worked.

Thank you.

Tony Toews has some information about this at
http://www.granite.ab.ca/access/email/lotusnotes.htm