Lotusscript: Send External Email with Formatting - Sends Text Only

I need to send an email to an external email address with formatting. Unfortunately, the Bold and etc styling is removed and the received email is only text.

Any ideas how I can make the following send an email with the body containing a Font Size of 18 and is Bold?

	Dim session As NotesSession
	Dim dbCurrent As NotesDatabase
	Dim docMail As NotesDocument
	Dim rtBody As NotesRichTextItem
	Dim rtsMemoStyle As NotesRichTextStyle
	
	Set session = New NotesSession
	Set dbCurrent = session.currentDatabase	
	Set rtsMemoStyle = session.CreateRichTextStyle
	
	Set docMail = dbCurrent.CreateDocument
	docMail.Form = "Memo"
	docMail.Subject = "TEST"
	docMail.SendTo = "test@test.com"
	docMail.Body = ""
	Set rtBody = New NotesRichTextItem( docMail, "Body" )
	rtsMemoStyle.NotesFont = FONT_COURIER
	rtsMemoStyle.FontSize = 18
	rtsMemoStyle.Bold = True
	Call rtBody.AppendStyle( rtsMemoStyle )
	Call rtBody.AddNewLine( 16 )
	Call rtBody.AppendText( "TESTTESTTESTTESTTESTTEST" )
	Call rtBody.AddNewLine( 8 )
	Call rtBody.AppendText( "TESTTESTTESTTESTTEST" )
	Call rtBody.AddNewLine( 8 )
	Call rtBody.AppendText( "TESTTESTTESTTESTTESTTEST" )
	docMail.Send( False )

Select allOpen in new window