Hi,
I am using the following code to email a report to a client whom is selected from a form.
The form lists various client data, one text box shows his email address.
My question is how can I get the email produced from this code to grab the addy from the text box?
Any help would be appreciated.
Charlie
I am using the following code to email a report to a client whom is selected from a form.
The form lists various client data, one text box shows his email address.
My question is how can I get the email produced from this code to grab the addy from the text box?
Any help would be appreciated.
Charlie
Code:
Private Sub Command47_Click()
On Error GoTo Err_Command47_Click
Dim stDocName As String
stDocName = "tblChemistClientPersonal"
DoCmd.SendObject acReport, stDocName, "RichTextFormat(*.rtf)", EMail, , , SubjectLine, _
"Please see attached document.", False
Exit_Command47_Click:
Exit Sub
Err_Command47_Click:
MsgBox Err.Description
Resume Exit_Command47_Click
End Sub
