G
Greg
I have the following code:
rivate Sub ComdSendRes_Click()
Dim strSubject As String
Dim strEmailList As String
Dim strMessage As String
Dim strmess2 As Boolean
strmess2 = True
On Error GoTo Err_ComdSendRes_Click
strSubject = "Sending test email: "
strEmailList = "(e-mail address removed)"
strMessage = "Description: " & Me.Ticket_Description & Chr(13) & "Assign
to: " & [Assigned To] & Chr(13) & "Resolution: " & [Resolution]
DoCmd.SendObject acSendNoObject, , acFormatRTF, strEmailList, , ,
strSubject, strMessage, strmess2
How can I modify this code so everytime from field with my email address is
inserted when i am ready to send email?
Thanks
rivate Sub ComdSendRes_Click()
Dim strSubject As String
Dim strEmailList As String
Dim strMessage As String
Dim strmess2 As Boolean
strmess2 = True
On Error GoTo Err_ComdSendRes_Click
strSubject = "Sending test email: "
strEmailList = "(e-mail address removed)"
strMessage = "Description: " & Me.Ticket_Description & Chr(13) & "Assign
to: " & [Assigned To] & Chr(13) & "Resolution: " & [Resolution]
DoCmd.SendObject acSendNoObject, , acFormatRTF, strEmailList, , ,
strSubject, strMessage, strmess2
How can I modify this code so everytime from field with my email address is
inserted when i am ready to send email?
Thanks