changing fonts in an automatic e-mail

[branston]

I have set up some code to send an e-mail.
Is it possible to change some of the text to bold?
This is what i have so far, it all works, but im trying to make it look clearer:

strTitle = Nz(DLookup("Title", "TblTitle", "[No] = " & Me.No), 0)

strScope = Nz(DLookup("Scope", "TblTitle", "[No] = " & Me.No), 0)

strName = Nz(DLookup("FirstName", "TblEmailAdd", "[ID] = " & Me.Action), 0)

strAddress = Nz(DLookup("EmailAdd", "TblEmailAdd", "[ID] = " & Me.Action), 0)

strSubject = "Actions for Meeting Number " & Me.MeetingNo

strBody = "Dear " & strName & "," & vbCrLf & _
"You have been set as an actionee for the following action:" & vbCrLf & vbCrLf & _
Me.Detail & vbCrLf & vbCrLf & _
"Please action as required before " & Me.ActionDate & "." & _
vbCrLf & "Thank you."

If strAddress = "" Then
MsgBox "This Actionee is missing an e-mail address"
Else
DoCmd.SendObject , , , strAddress, , , strSubject, strBody, True
End If

I would idealy like the me.detail part to come out in bold. I tried me.detail.fontbold, but that didnt work.

Also, is it possible to change the font in the actual text (eg in the text "Please action as required before.." could you make the before italic?

Any help would be much appreciated.

Thank you!

 

[NigelShaw]

Hi

if you are sending the email as HTML format that it should work. Place HTML code around the word you want to make bold

<strong>your word here</strong>

anything inside will be bold. If your message is plain text, you will see the above as is.

Nidge

 

[branston]

Thank you for your reply, I will give your suggestion a go.

 

[branston]

Hum. I think my message is plain text. Im guessing there isnt any way to change the font in that case?
Is it possible to make changes and send it in HTML format?

 

[branston]

Dont worry, I just found a post a few down from mine which should answer my questions!
Thank you!

http://www.access-programmers.co.uk/forums/showthread.php?t=160314