I use Microsoft Outlook to send email from Access. From Refrences In Msft Access, I tick Microsoft Outlook 9.0 object library. I declare mail object and item as below :
Dim EmailApp As Object
Dim NameSpace As Object
Dim EmailSend As MailItem
Set EmailApp = CreateObject("Outlook.Application")
Set NameSpace = EmailApp.GetNamespace("MAPI")
Set EmailSend = EmailApp.CreateItem(0)
EmailSend.To = MyTOEmail
EmailSend.CC = MyCCEmail
EmailSend.Subject = "For you attention"
EmailSend.body = bodystring
EmailSend.Send
Later we will upgrade our email to Lotus notes using Lotus notes clients. Can anyone tell me what I should do to enable Access use Notes instead to send email as above.
tq
Dim EmailApp As Object
Dim NameSpace As Object
Dim EmailSend As MailItem
Set EmailApp = CreateObject("Outlook.Application")
Set NameSpace = EmailApp.GetNamespace("MAPI")
Set EmailSend = EmailApp.CreateItem(0)
EmailSend.To = MyTOEmail
EmailSend.CC = MyCCEmail
EmailSend.Subject = "For you attention"
EmailSend.body = bodystring
EmailSend.Send
Later we will upgrade our email to Lotus notes using Lotus notes clients. Can anyone tell me what I should do to enable Access use Notes instead to send email as above.
tq