How can VBA send an email that includes both text AND html formats?

I am using VBA in Access 2000 to email to all recipients on a list (on email at a time). It uses Outlook objects for each message and works well with html as the format. How do I include the plain text version in the same email, - so the clients browser or email software can chose plain text if it has too, and html if it is capable? I am assuming the dual format is possible if I use some type of MIME.

Many thanks.  
'we are in a loop which produces single email addresses as the var xx
 
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
    With objOutlookMsg
Set objOutlookRecip = Nothing ' clear previous recipient from loop
Set objOutlookRecip = .Recipients.Add(xx) 
         objOutlookRecip.Type = olTo
         .Subject = Me!subj      '<--Subject
.HTMLBODY = "<HTML><H2><b>This is HTML Text in the BODY of the email</b></H2></HTML>"
        .HTMLBody = "<HTML><Head></Head><Body><table><tr><td>" & hdrtbl & "</td><tr><td><hr>" & Me!msgtxt & "</td></tr><tr><td><small>" & signath & "</small></td></tr></table></Body></HTML>"
              xxx = "Email address ERROR for " & xx
                MsgBox xxx
            End If
        Next
       .Send
 End With
 
'Cleanup Code
Set objOutlookMsg = Nothing
Set objOutlook = Nothing
Set objOutlookRecip = Nothing
Set objOutlookAttach = Nothing
Me!Text14 = xx & " " & zz
'go to next email address in loop

Open in new window

projamr1Asked:
Who is Participating?
 
projamr1Connect With a Mentor Author Commented:
This may be an uncessary concern. Every email client I checked has the ability to show html or at least filter it out.

 
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.