Ho una form con alcuni campi, per farmi inviare email dal sito, solo che non riesco a capire come mai se non riempio tutti i campi della form l'email non arriva, lo script è questo:
<%
Dim Nome
Dim Categoria
Dim Indirizzo
Dim Sito
Dim Referente
Dim Telefono
Dim Cellulare
Dim Email
Dim Note
Nome = request.form("Nome")
Categoria = request.form("Categoria")
Indirizzo = request.form("Indirizzo")
Sito = request.form("Sito")
Referente = request.form("Referente")
Telefono = request.form("Telefono")
Cellulare = request.form("Cellulare")
Email = request.form("Email")
Note = request.form("Note")
Set Mail = Server.CreateObject("CDONTS.NewMail")
HTML = "<html><head>" &_
"<title>Contatto</title>" &_
"</head>" &_
"<body>" &_
"<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""4"" class=""td21""><tr><td width=""0%"">NOME ATTIVITA':" & Nome & "
INDIRIZZO:" & Indirizzo & "
CATEGORIA:" & Categoria & "
Sito:" & Sito & "
REFERENTE:" & Referente & "
Tel./Cell.:" & Telefono & "/" & Cellulare & "
E-Mail" & Email & "
Note:" & Note & "
</td></tr></table>" &_
"</body>" &_
"</html>"
Mail.From = Email
Mail.To = "vetrina_web@bumper.it"
Mail.Subject = "Contatto Vetrina"
Mail.BodyFormat = 0
Mail.MailFormat = 0
Mail.Body = HTML
Mail.Send()
Set Mail = nothing
response.redirect("contatto_inviato.htm")
%>
grazie anticipatamente per l'aiuto
Rispondi quotando
