C
Chad
I have a quick questions about an alert I get when trying
to send an email in outlook xp. The alert is
stating "Outlook is sending a email from an unrecognized
application?" Is it ok for outlook to send? (or
something like that) and then gives me a yes, no, help
option. The data flow is going from access xp to outlook
xp and a sample of my code is attached. The application
is a trusted access model (I built) that I want to fire
off this email without this alert.
Dim appOutlook As New Outlook.Application
Dim msg As Outlook.MailItem
Dim strBody As String
Dim strSubject As String
Dim strTo As String
StrTo = "MyName"
StrSubject = "MySubject"
StrBody = "MyData"
'Create new mail message and send to contacts
Set msg = appOutlook.CreateItem(olMailItem)
With msg
.To = strTo
.Subject = strSubject
.Body = strBody
.Send
End With
Msg = Nothing
Is there anyway to get rid of this alert?
Thanks
to send an email in outlook xp. The alert is
stating "Outlook is sending a email from an unrecognized
application?" Is it ok for outlook to send? (or
something like that) and then gives me a yes, no, help
option. The data flow is going from access xp to outlook
xp and a sample of my code is attached. The application
is a trusted access model (I built) that I want to fire
off this email without this alert.
Dim appOutlook As New Outlook.Application
Dim msg As Outlook.MailItem
Dim strBody As String
Dim strSubject As String
Dim strTo As String
StrTo = "MyName"
StrSubject = "MySubject"
StrBody = "MyData"
'Create new mail message and send to contacts
Set msg = appOutlook.CreateItem(olMailItem)
With msg
.To = strTo
.Subject = strSubject
.Body = strBody
.Send
End With
Msg = Nothing
Is there anyway to get rid of this alert?
Thanks