form mail

**de.micky** · 25-05-2007, 11:33

ciao a tutti
questo è un form mail, dati arrivano direttamente nell'email dell'indirizzo indicato nel codice.
tutto ok tranne le caselle di controllo checkbox che non prendono i dati nell'email.

mi aiutate a capire cosa devo fare?non sono molto pratica di programmazione.
grazie mille
M.

<%@ Language = "VBScript" %>
<%
Select Case Request.Querystring("Action")
Case "Send"

on error resume next
'Set variables
Dim BackURL
Dim stra
Dim strb
Dim strc
Dim strNome
Dim strCognome
Dim strCarica
Dim strAzienda
Dim strIndirizzo
Dim strTelefono
Dim strFax
Dim strEmail
Dim strdati1
Dim strdati2
Dim strdati3
Dim strSubject
Dim strUserIP
Dim strToEmail
Dim daCdoMail

'Replace this email with your real email id
strToEmail = "mdelloca@dagcom.com"
BackURL = Request.ServerVariables("HTTP_REFERER")
stra = Request.form("a")
strb = Request.form("b")
strc = Request.form("c")
strNome = Request.form("Nome")
strCognome = Request.form("Cognome")
strCarica = Request.form("Carica")
strAzienda = Request.form("Azienda")
strIndirizzo = Request.form("Indirizzo")
strTelefono = Request.form("Telefono")
strFax = Request.form("Fax")
strEmail = Request.form("Email")
strdati1 = Request.form("dati1")
strdati2 = Request.form("dati2")
strdati3 = Request.form("dati3")
strSubject = "iscrizione alle sessioni live"
strUserIP = Request.ServerVariables("REMOTE_ADDR")

'Create Mail Object
Set daCdoMail = CreateObject("CDONTS.NewMail")
daCdoMail.To = strToEmail
daCdoMail.From = strEmail
daCdoMail.Subject = strSubject
daCdoMail.Body = "<font size=""small"">Iscrizione alle sessioni live: " & stra & " " & strb & " " & strc & " </font>

Nome: " & strNome & "
Cognome: " & strCognome & "
Carica: " & strCarica & "
Azienda: " & strAzienda & "
Indirizzo: " & strIndirizzo & "
Telefono: " & strTelefono & "
Fax: " & strFax & "
Email: " & strEmail & "
presta il suo consenso al trattamento dei dati personali per i fini indicati nella suddetta informativa: " & strdati1 & "
presta il suo consenso per la comunicazione dei dati personali per le finalità ed ai soggetti indicati nell’informativa e per la diffusione dei dati personali per le finalità e nell’ambito indicato nell’informativa: " & strdati2 & "
Nego il consenso: " & strdati3 & "</font>"
'You can change the mail body format setting below
'0 = HTML, 1 = TEXT
daCdoMail.BodyFormat = 0
'You can change the mail format setting below
'0 = HTML, 1 = TEXT
daCdoMail.MailFormat = 0
'Set Server Side Validation to make sure we got both sender and recipient email Id to send email
If strToEmail = "" OR strEmail = "" Then
Session("msg") = "Sender Email or Resipient Email is blank. This message can not be sent. Please try again"
Response.redirect (BackURL)
Else
'Now send email to the address you specified at line no. 16
daCdoMail.Send
End If
'Destroy mail object
Set daCdoMail = Nothing

'Create result text in a Sesion
Session("MsgSent") = "I dati sono stati inviati correttamente"
'Redirect and show the result
Response.redirect (BackURL)
End Select
%>
<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Iscrizione alla sessione live</title>

<link href="style.css" rel="stylesheet" type="text/css" media="screen"/>
<SCRIPT>

</SCRIPT>
<SCRIPT language=javascript>
function check()
{
if (document.myform.Nome.value.length==0)
{
alert("Inserisci il tuo nome");
document.myform.Nome.focus();
}
else if(document.myform.Email.value.length==0 || document.myform.Email.value.indexOf("@")==-1 || document.myform.Email.value.indexOf(".")==-1 || document.myform.Email.value.indexOf(" ")==0)
{
alert("L'indirizzo e-mail non è valido")
document.myform.Email.focus();
}

else
{
document.myform.submit()
}
}
</SCRIPT>

</head>

<body>
<%If Session("msgSent") = "" Then%>
<table cellSpacing="1" border="0" bordercolor="#111111" id="table1" width="100%">
<form action="Contact.asp?Action=Send" method="post" name="myform">

<tr>
<td align="right" colspan="2">
<h3 align="left" class="testo"></h3>
</td>
</tr>
<tr>
<td colspan="2" class="testo">
</td>
</tr>
<%If Session("msg") <> "" Then%>
<tr>
<td colspan="2">
<span class="testo"><%=Session("msg")%></span></td>
</tr>
<%End If%>
<tr>
<td colspan="2"><table width="100%" border="0" cellspacing="3" cellpadding="0">
<tr>
<td height="20" colspan="2"><P align=center class="titolo-pag"><font color="#003366">Iscrizione alle sessioni live </font></P></td>
</tr>
<tr bgcolor="6699cc">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" class="testo">
<td height="14" colspan="2">

<input type="checkbox" name="a" value=<%= Request.form("a") %>>
1° sessione live il 6 giugno 2007 ore 18.30<O:P></O:P></P></td>
</tr>
<tr valign="top" bgcolor="#CCCCCC" class="testo">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" class="testo">
<td height="14" colspan="2"><input type="checkbox" name="a" value=<%= Request.form("b") %>>
2° sessione live il 13 giugno 2007 ore 18.30<O:P></O:P> </td>
</tr>
<tr valign="top" bgcolor="#CCCCCC" class="testo">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" class="testo">
<td height="14" colspan="2"><input name="c" type="checkbox" id="sessione 11 luglio 2007" value=<%= Request.form("c") %>>
3° sessione live l'11 luglio 2007 ore 18.30</td>
</tr>
<tr valign="top" bgcolor="#CCCCCC" class="testo">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" class="testo">
<td width="56" height="14"><div align="left">Nome </div></td>
<td width="392"><input name="Nome" type="text" class="testo" id="Nome" value="<%= Request.form("Nome") %>" size="40"></td>
<tr valign="top" class="testo">
<td width="56" height="14"><div align="left">Cognome </div></td>
<td><input name="Cognome" type="text" class="testo" id="Cognome" value="<%= Request.form("Cognome") %>" size="40"></td>
<tr valign="top" class="testo">
<td width="56"><div align="left">Carica </div></td>
<td><input name="Carica" type="text" class="testo" id="Carica" value="<%= Request.form("Carica") %>" size="40"></td>
<tr valign="top" class="testo">
<td width="56"><div align="left">Azienda </div></td>
<td><input name="Azienda" type="text" class="testo" id="Azienda" value="<%= Request.form("Azienda") %>" size="40"></td>
<tr valign="top" class="testo">
<td width="56"><div align="left">Indirizzo </div></td>
<td><input name="Indirizzo" type="text" class="testo" id="Indirizzo" value="<%= Request.form("Indirizzo") %>" size="40"></td>
<tr valign="top" class="testo">
<td width="56"><div align="left">Telefono </div></td>
<td><input name="Telefono" type="text" class="testo" id="Telefono" value="<%= Request.form("Telefono") %>" size="40"></td>
</tr>
<tr valign="top" class="testo">
<td width="56"><div align="left">Fax </div></td>
<td><input name="Fax" type="text" class="testo" id="Fax" value="<%= Request.form("Fax") %>" size="40"></td>
<tr valign="top" class="testo">
<td><div align="left">E-mail </div></td>
<td><input name="Email" type="text" class="testo" id="Email" value="<%= Request.form("Email") %>" size="40"></td>
</tr>
<tr valign="top" class="testo">
<tr valign="top" bgcolor="#CCCCCC" class="testo">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" bgcolor="#CCCCCC" class="testo">
<td height="1" colspan="2"></td>
</tr>
<tr valign="top" class="testo">
<td height="14" colspan="2">
<p align="center" class="testo">CONSENSO AI SENSI DELL’ART. 23 DEL D. Lgs. 196/03</p>
<p class="testo">Il /la sottoscritto/a, acquisite le informazioni fornite dal titolare del trattamento ai sensi dell’art. 13 del D.Lgs. 196/2003:

<input name="consenso al trattamento dei dati personali" type="checkbox" id="consenso al trattamento dei dati personali" value=<%= Request.form("dati1") %>>
presta il suo consenso al trattamento dei dati personali per i fini indicati nella suddetta informativa

<input name="consenso per la comunicazione dei dati personali" type="checkbox" id="consenso per la comunicazione dei dati personali" value=<%= Request.form("dati2") %>>
presta il suo consenso per la comunicazione dei dati personali per le finalità ed ai soggetti indicati nell’informativa e per la diffusione dei dati personali per le finalità e nell’ambito indicato nell’informativa

<input name="nega il consenso" type="checkbox" id="nega il consenso" value=<%= Request.form("dati3") %>>
Nego il consenso </p>
<div align="left"> </div>
<p align="center" class="testo">
<input onclick="check()" type="button" name="Send Message" class="testo" value="Invio">

<input name="Submit" type="reset" class="testo" value="Cancella">
</p>
<p class="testo"></p></td>
</tr>
<tr bgcolor="6699cc">
<td height="1" colspan="2"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="testo" valign="top"></td>
<td class="nortex"> </td></tr>
<tr>
<td class="nortex"></td>
<td class="nortex"> </td></tr>
<tr>
<td class="nortex" colspan="2"></td>
</tr>
<tr>
<td class="nortex" colspan="2">

</td>
</tr>
</form>
</table>
<%Else%>
<table cellSpacing="1" border="0" bordercolor="#111111" id="table2" width="100%">

<tr>
<td align="right">
<h3 align="left" class="titolo-pag">Iscrizione alle sessioni live </h3>
</td>
</tr>
<tr>
<td>
<span class="testo"><%=Session("MsgSent")%></span></td>
</tr>
<tr>
<td>

</td></tr>
</table>
<%End If
'Destroy session variables
Session("MsgSent") = ""
Session("msg") = ""
%>
</body>

</html>

**Roby_72** · 25-05-2007, 12:15

Non puoi chiamare un campo in questo modo:

<input name="consenso al trattamento dei dati personali"

Chiamalo ad esempio:

<input name="trattamento"...

e l'altro

<input name="comunicazione"...

ecc...

e poi in cima alla pagina:

strdati1 = Request.form("trattamento")
strdati2 = Request.form("comunicazione")

ecc..

Roby

**de.micky** · 25-05-2007, 12:29

ciao ho provato come mi hai detto ma non funziona...
ecco la mail che mi arriva.
dove ho la checkbox mi lascia il campo vuoto anche se lo checkko

Iscrizione alle sessioni live:

Nome: rrrrrrrrrr
Cognome: rrrrrrrrrrr
Carica: rrrrrrrrrrr
Azienda: rrrrrrrrrr
Indirizzo: rrrrrrrrrrr
Telefono: rrrrrrrrrr
Fax: rrrrrrrr
Email: r@r.it
presta il suo consenso al trattamento dei dati personali per i fini indicati nella suddetta informativa:
presta il suo consenso per la comunicazione dei dati personali per le finalità ed ai soggetti indicati nell’informativa e per la diffusione dei dati personali per le finalità e nell’ambito indicato nell’informativa:
Nego il consenso:

**Roby_72** · 25-05-2007, 12:33

Alle checkbox tu hai dato un valore... poiché quando entri nella pagina è sicuramente vuoto... non mettere nulla.

codice:

<input name="trattamento" type="checkbox" id="trattamento" />

Roby

**de.micky** · 25-05-2007, 12:45

perfetto!!!
mi ha dato come messaggio "on" dove ho fleggato.

Come faccio ad impostare la scritta "on" nel file? posso cambiarla?
Grazie mille
sei stato gentilissimo

**Roby_72** · 25-05-2007, 13:04

Ad esempio:

codice:

strdati1 = Request.form("trattamento")
if strdati1 &"[]" <> "[]" then
strdati1 = "Consentito"
end if

e così per gli altri impostando il testo che preferisci.

Roby

Discussione: form mail

Strumenti discussione

Ricerca discussione

Visualizza

form mail

Permessi di invio