Para enviar un e-mail con formato HTML mediante CDONTS se debe indicar "0" (cero) a:
.BodyFormat = 0
.MailFormat = 0
Si en cambio ponemos "1" (uno) se enviará en formato solo texto.
Luego bastará escribir el mensaje con código HTML.
Ejemplo:
<%
Set Mail = Server.CreateObject ("CDONTS.Newmail")
Mail.BodyFormat = 0
Mail.MailFormat = 0
Mensaje = <b><font face='Arial' size='2'>Texto aquí</b>"
Mensaje = Mensaje & "<br>Más texto"
Mail.From = "Tu Nombre<[email protected]>"
Mail.To = "[email protected]"
Mail.Subject = "Asunto del mensaje"
Mail.Body = Mensaje
Mail.Send
Set Mail = Nothing
%>