Inviare una mail con allegato utilizzando CDONTS
Per inviare, insieme ad un'e-mail in formato HTML creata con CDONTS, un'immagine associata, che venga visualizzata direttamente nel body, è necessario allegarla al messaggio stesso.
Eccone un esempio:
Eccone un esempio:
<%
Set objMail = CreateObject("CDONTS.NewMail")
' Allego un file - dal server ovviamente
objMail.AttachURL Server.MapPath("/immagini/logo.gif"), "logo.gif"
'
HTML = "<HTML><HEAD>" &_
"<title>HTML ed immagini</title>" &_
"</head>" &_
"<body bgcolor=""#FFFFFF"">" &_
"<p><img src=logo.gif><br>" &_
"<a href=//"https://www.amazon.it/Quattro-racconti-Massimiliano-Pasqualoni/dp/8892305085" target="_blank">Quattro Racconti>" &_
"ASPItalia.com</a>" &_
"<p>In questo paragrafo..." &_
"</body>" &_
"</html>"
' mittente e destinatario
objMail.From = "Questo indirizzo email è protetto dagli spambots. È necessario abilitare JavaScript per vederlo. "
objMail.To = "Questo indirizzo email è protetto dagli spambots. È necessario abilitare JavaScript per vederlo. "
' subject
objMail.Subject = "E-mail con immagine"
' formato dell'e-mail (HTML) e testo
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Body = HTML
' invio
objMail.Send()
' distruzione oggetto
set objMail = Nothing
%>