Inviare delle mail con il corpo del messaggio formattato in HTML.
<%
Dim objMail
Set objMail = CreateObject("CDONTS.NewMail")
objMail.AttachURL "PERCORSO_LOGO\logo.gif", "logo.gif"
'Testo html del corpo della mail
HTML = "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<title>TITOLO DELLA MAIL</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""#FFFFFF"">"
HTML = HTML & "<p><font face=""Verdana""><strong>"
HTML = HTML & "<img src=logo.gif><br>"
HTML = HTML & "<a href=http://web.tiscali.it/Carmelo>"
HTML = HTML & "Morpheus - Risorse per webmaster</a>"
HTML = HTML & "</strong></font></p>"
HTML = HTML & "<p>E qui potete inserire del testo"
HTML = HTML & "formattato come vi pare..."
HTML = HTML & "</body>"
HTML = HTML & "</html>"
objMail.From = "INDIRIZZO_MITTENTE"
objMail.To = "INDIRIZZO_DESTINATARIO"
objMail.Subject = "OGGETTO_DELLA_MAIL"
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Body = HTML
objMail.Send
%>
Nota:
Con
objMail.BodyFormat = 0 ' se = a 1 formato testo
objMail.MailFormat = 0 ' se = a 1 formato testo
La mail viene inviata in formato testo e non html