If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Email question
I am using the below code to send a email. I currently change the
default of the email to HTML and copy and paste the content of the subform in the body of the email. Is it possible to have the content of the subform automatically entered into the body of the email? Also, how can I have the email open in HTML format so that the data in the email is formated as in the subform. Thanks Private Sub cmdmail_Click() On Error GoTo Err_cmdmail_Click Dim stDocName As String stDocName = "MasterData" DoCmd.SendObject acSendNoObject, stDocName, acFormatHTML, ([CUID]), , , ([feature code] & " " & _ "Item not billing. " & _ "Customer: " & [Customer Name] & " " & _ " " & "Acct: " & [customer Acct]) & " " & _ [currentmonth], _ FirstName & "," & Chr$(10) & _ "In conducting our monthly audit, we have the following list of items that are not billing." & _ " If you would review the list and let us know what action should be taken to get this issue corrected" & _ "Thank You," & Chr$(10) & Chr$(10) & _ "Auditing Team" & Chr$(10) & Chr$(10) _ , , False Exit_cmdmail_Click: Exit Sub Err_cmdmail_Click: MsgBox Err.Description Resume Exit_cmdmail_Click End Sub |
Thread Tools | |
Display Modes | |
|
|