Come inviare email con AspEmail

Non esiste solo CDONTS per spedire e-mail.

Ecco a voi AspEmail.

<%
Set objASPEMail = Server.CreateObject("Persits.MailSender")
objASPEMail.Host = "smpt.tuodominio.it"
objASPEMail.From = "test@tuoindirizzo.it"
objASPEMail.FromName = "Tuo nome"
objASPEMail.AddAddress "achi@tuodominio.it", "Destinatario 1"
objASPEMail.AddAddress "achi2@tuodominio.it", "Destinatario 2"
objASPEMail.Subject = "Prova con ASPEmail"
objASPEMail.Body = "testo del messaggio"
' impediamo di dare un errore in caso di mancato invio
On Error Resume Next
objASPEMail.Send()
If Err <> 0 Then
Response.Write "Si è verificato questo errore: " & Err.Description
End If
Set objASPEMail = Nothing
%>

Ciao Fab