sending email through Access

[crowegreg]

In Access 2010, this code works in sending a basic email within Access.
Dim objAccount As Outlook.Account
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.mailitem

'Determine the correct account
For Each objAccount In Outlook.Application.Session.Accounts

If objAccount = "Dispatch - Safecarautotransport.com" Then

'Create the Outlook session.
Set objOutlook = CreateObject("Outlook.Application")


'Create the message.
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)

With objOutlookMsg
.To = "greglcrowe@gmail.com"
.SendUsingAccount = objAccount
.Subject = "Safe Car Auto Transport Quote"
'.Body = "This is the body of the message." & vbCrLf & vbCrLf
.Send
End With
End If

Next

Set objOutlook = Nothing
Set objAccount = Nothing
Set objOutlookMsg = Nothing

My question is how to add formatting to the text within the body area? I can't figure out the syntax.

[RuralGuy]

If you solved this post, do you care to share with others that read these forums?

[crowegreg]

I created a variable, named it message. Then used the following statements to assign the text I wanted to the variable

message = "Thank you for giving Safe Car Auto Transport the opportunity to assist you with your shipping needs!!"
message = msg & Chr$(13) & Chr$(13) & "Attached is the contract for your transportation needs."

Then in the code originally listed, I changed the following line
.Body = message

This did exactly what I need, at this time.

[RuralGuy]

Thanks for sharing!

[crowegreg]

Thanks for reminding me!