Need to send email in outlook without the Security warning popup

  • Thread starter Thread starter mike11d11
  • Start date Start date
M

mike11d11

I am using this code to create an email to send automaticaly in my
program, the only problem is I get the security warning and I just
want the email to go out on its own without the warning. I heard this
can only be done by creating your own Com add-in but I really dont
know how to do that and am pretty new to the programming world. Any
help with my code below would be greatly appreciated, oh yeh I'm using
outlook 2003 pro.

Dim oOutL As New Microsoft.Office.Interop.Outlook.Application
Dim oMail As Microsoft.Office.Interop.Outlook.MailItem

oMail =
oOutL.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem)
oMail.UnRead = True
oMail.To = "(e-mail address removed)"
oMail.Subject = "There was an error..."
oMail.HTMLBody = True
oMail.Body = "The error was..."
'oMail.Attachments.Add("attachement.html")
oMail.Send()
 
According to the rule books, there's a way you can do it but only if you're
willing to pay a third party company for it.

Truth is, if you're wanting to send mail, use socket code to do the same
thing and follow the proper rfc protocols to send mail.

Otherwise, you're going to have to live with the messagebox.
 
Back
Top