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