trying to send Mail from MS Access, getting warning message. How to by-pass it.

[selvakumar.arc]

Hi All,

I am trying to send mail from MS Access and I am able to send mail also. But I am getting warning message like "A program is trying to automatically send e-mail on your behalf", any one knows how to by-pass this warning message?.
Last 2 days I am trying to solve this issue, dont know how to fix this...


Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment

Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)

objOutlookMsg.Body = "Test from applicaiton"
objOutlookMsg.To = test@test.com

objOutlookMsg.Send

Regards,
Selvakumar R

[RuralGuy]

As far as I know, the only two solutions are:
ClickYes: http://www.contextmagic.com/express-clickyes/
and
Redemption: http://www.dimastr.com/redemption/home.htm

[pbaldy]

CDO is a third option. I don't have a link handy, as I'm out and about.

[RuralGuy]

I believe you can turn off the warning message if you are running the Exchange Server as well.

[selvakumar.arc]

Thanks for your support, I will try your suggested solution and I will let you know updates.