pop up message when sending email

  • Thread starter Thread starter Linda
  • Start date Start date
L

Linda

Hi,

When I send an email from my form I get a Microsft Outlook message box.
It states:
A program is trying to automatically send e-mail on your behalf. Do you
want to allow this?
If this is unexpected, it may be a virus and you choose "No"
It gives me Yes No or Help options.

Is there anyway to skip this message and allow the email to go through
without this notice.

Thanks
Linda
 
The problem with that is I am not the only one using the database. It will
be used company wide.

Here is my code:
Private Sub Command77_Click()
Dim refnum As Long
refnum = RPRTNUM
DoCmd.SendObject acSendNoObject, , , "(e-mail address removed)", , , "Report
Request", "The report number is " & refnum & ".", False
End Sub
 
Back
Top