Automatically send email using DoCmd.SendObjec t

[iBasho]

Hi,
I am trying to set up a notification email that would come to my email everytime users click on a command button in a form. I am using the DoCmd.SendObjec t command without actually sending any database objects.

Private Sub Command107_Click()
On Error GoTo Err_Command107_Click
 
DoCmd.SendObject acSendNoObject, , , "[e-mail]", , , "Test", "Email Test", , True     
 
Exit_Command107_Click:
    Exit Sub
 
Err_Command107_Click:
    MsgBox Err.Description
    Resume Exit_Command107_Click
 
End Sub

I don't want the users to have to actually click on the "Send" button of the email that pops out on the screen. Is there any way to modify this code, or use other code so that the email window doesn't pop up, but the email is sent automatically without the user seeing it.

Thanks.
i.b.

[nspader]

Should be set to FALSE....The last statement. That will auto send without asking for changes.

[iBasho]

I had it set to False and the email window still popped up and you had to press enter for the email to be sent.