Hi,
I currently send my forms via Lotus Notes. I would like to change the font color of the body text in the email. I want to distinct some text in the message. How could go about doing that? Please review my code, thanks:
[tt]SendNotesMail "Ticket number " & TicketID & " has been routed to you by the HR Help Desk", "", Me.Route_To, "The following individual contacted the HR Help Desk: " & CallerName & " at " & Telephone & vbCrLf & vbCrLf & vbCrLf & Chr(13) & "MESSAGE DETAILS:" & vbCrLf & vbCrLf & RequestedQuestion & vbCrLf & vbCrLf & vbCrLf & Chr(13) & "IMPORTANT:" & vbCrLf & vbCrLf & "If the message above requires a response from you, please:" & vbCrLf & "1. contact the above individual within 24 hours " & vbCrLf & "2. immediately notify " & UserName & " so the ticket can be closed." & vbCrLf & vbCrLf & "Thank you." & vbCrLf & UserName, True
DoCmd.Close acForm, "PendingTicket", acSaveYes
DoCmd.OpenForm "TicketOption"
MsgBox "This ticket has a status of Open, please return to this ticket when you have notification."
End Sub[/tt]
I currently send my forms via Lotus Notes. I would like to change the font color of the body text in the email. I want to distinct some text in the message. How could go about doing that? Please review my code, thanks:
[tt]SendNotesMail "Ticket number " & TicketID & " has been routed to you by the HR Help Desk", "", Me.Route_To, "The following individual contacted the HR Help Desk: " & CallerName & " at " & Telephone & vbCrLf & vbCrLf & vbCrLf & Chr(13) & "MESSAGE DETAILS:" & vbCrLf & vbCrLf & RequestedQuestion & vbCrLf & vbCrLf & vbCrLf & Chr(13) & "IMPORTANT:" & vbCrLf & vbCrLf & "If the message above requires a response from you, please:" & vbCrLf & "1. contact the above individual within 24 hours " & vbCrLf & "2. immediately notify " & UserName & " so the ticket can be closed." & vbCrLf & vbCrLf & "Thank you." & vbCrLf & UserName, True
DoCmd.Close acForm, "PendingTicket", acSaveYes
DoCmd.OpenForm "TicketOption"
MsgBox "This ticket has a status of Open, please return to this ticket when you have notification."
End Sub[/tt]