How do I update the following code so that the query gets sent in the body of the email.
Also it doesn't get sent automatically. I have to press the send button. I don't want to have to.
Sub SendDatesEntered(ByVal sEmail As String)
On Error GoTo EH
DoCmd.SendObject acSendQuery, "Dates Entered in Performance", acFormatPDF, sEmail, "email@example.com", "firstname.lastname@example.org", "Lesedi Performance dates entered", "These are the dates entered into the Performance database", , True
'MsgBox "There was an error sending a report " & Err.Description