Bypass Outlook Security

I have an access database that sends out automated emails.  I have to upgrade it to Office 2003.  With that comes Outlook security patch to prevent automated emails.  I need a way around it WITHOUT using any of the following: SMTP, Redemption, Click-Yes or any third party software.  It pretty much needs to be stictly code or something that will work with what little options I have. The machine is Windows Server 2003 and I have Exchange 2003. I'm not sure what other information is helpful, but if needed, just ask.  I'll give whatever I can.  Here is the code that's being used so far.  I didn't create it, and I don't really know anything about this whole programming thing.

Public Function TEST()

On Error GoTo ErrorHandler

Dim MyOutlook As Outlook.Application
Dim MyMail As Outlook.MailItem
Dim Subjectline As String
Dim MyTime
Dim MyDay

MyTime = Format(Now, "Long Time")
MyDay = Format(Date, "dddd")
MyEOM = Format(Date, "d")

        Subjectline$ = "Automated Email" & " " & Date
        Set MyOutlook = New Outlook.Application
        Set MyMail = MyOutlook.CreateItem(olMailItem)
        MyMail.Recipients.Add "RECIPIENT1"
        MyMail.Subject = Subjectline$
        Set MyMail = Nothing
        Set MyOutlook = Nothing


Resume Next

End Function
Who is Participating?
Serena HsiConnect With a Mentor Marketing ConsultantCommented:
This might help you. I found this on MSDN (Microsoft's developer network):

Avoiding Excessive Security Warnings when Sending Automated E-mail Messages

Using Automation in Microsoft Office Access 2003 to Work with Microsoft Office Outlook 2003

An article about Outlook "object model guard" security issues:

Hope these help.
agent418Author Commented:
Thank you for your input.  However, I need a much simpler and easier solution.  Unfortunately if the company allowed use of third party software, I wouldn't be in this perdicament.
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.