Hi, I have used this code to handle 2501,
On Error GoTo Err_Handler
DoCmd.SendObject acSendNoObject, , , Me![Top of Jobs].Form.Email, , , "Re:" & [Job Title], "Dear " & Me![Top of Jobs].Form.[Title] & " " & Me![Top of Jobs].Form.[Last Name] & ",", , False
Exit_Handler:
Exit Sub
Err_Handler...