' Dichaiaro le variabile per il modulo
Dim StrMail 'Email mittente
Dim StrNome 'Nome mitttente
Dim StrMessaggio
' Popolo le variabili con i valori della form

StrMail=Request.Form("email")
StrNome=Request.Form("nome")
StrMessaggio=Request.Form("txt")
'--invio email


Set Mail = Server.CreateObject("Persits.MailSender")
mail.host = "smpt.dominio.net"
mail.from = StrMail
mail.fromname = StrNome
mail.addaddress "info@dominio.it"
mail.subject = "PROVA DA SITO WEB"
Mail.body = StrMessaggio
Mail.IsHTML = False

on error resume next
Mail.Send


Ma non invia un bel nulla
Come mai?
CIAO