HASTER-cdonts mail

Jeg har en hjemmeside hvor jeg kan anvende cdonts mail.
På en test server virker følgende kode fint:
Det vigtigste står i body, hvor mailen indeholder oplysninger som jeg gerne vil sende med.
<%
Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = cdoMailFormatMIME
objMail.From = "someone@someone.dk"
objMail.To = "modtager mail"
objMail.Subject = "information - new contact entry"

objMail.Body = "The following has registred " &vbCrlF & "with these information: " & vbCrlF & vbCrLf & vbCrLf & "Please send me more information about FACI:  " & info & vbCrLf & "Please email me when you update FACI-results:  " & update & vbCrLf & vbCrLf & "Firstname: " & Request.QueryString("Firstname") & vbCrLf & "Lastname: " & Request.QueryString("Lastname") & vbCrLf & "Address: " & Request.QueryString("Address") & vbCrlf & "ZipCode: " & Request.QueryString("Zipcode") & vbCrLf & "City: " & Request.QueryString("city") & vbCrLf & "State: " & Request.QueryString("State") & vbCrLf & "Country: " & Request.QueryString("country") & vbCrLf & "Email: " & Request.QueryString("email") & vbCrLf & vbCrLf & "Comments: " & Request.QueryString("comments")
objMail.Send
Set objMail = Nothing
%>

MEN-på den server hvor det endeligt skal op og ligge skal koden indeholde et format til body så body kun indeholder HTML.
<%
Set objMail = CreateObject("CDONTS.Newmail")
objMail.Mailformat = cdoMailFormatMIME
objMail.BodyFormat = CdoBodyFormatHTML
objMail.From = "someone@someone.dk"
objMail.To = "technology@biosensor-aps.dk"
objMail.Subject = "information - new contact entry"
objMail.Body = "The following has registred "
objMail.Send
Set objMail = Nothing
%>

MIT-spørgsmål er så hvordan får jeg skrevet koden så oplysningerne kommer med på mailen, men i HTML format.