problemi form

dolores · 3 Giu 2010

Ciao a tutti, spero possiate aiutarmi, non sono molto pratica di asp, ma sto cercando di fare un form che mandi tutto al mio indirizzo di posta, premetto che ho un dominio in aruba.

Ho realizzato 3 pagine:

form.html:

<form action="riepilogo.asp" method="post" name="prenotazione">
<table width="374" border="0" align="center" cellpadding="0" cellspacing="4" class="testo" id="table2">
<tr valign="top">
<td width="49%" height="20" align="left">*Nome</td>
<td width="51%" align="left">*Cognome</td>
</tr>
<tr valign="bottom">
<td height="24" align="left">
<label>
<input name="Nome" type="text" id="Nome" maxlength="22" />
</label>
</td>
<td align="left">
<label>
<input name="Cognome" type="text" id="Cognome" maxlength="22" />
</label>
</td>
</tr>
<tr valign="top">
<td height="20" align="left">*Telefono</td>
<td align="left">E-mail</td>
</tr>
<tr valign="bottom">
<td height="24" align="left">
<label>
<input name="Telefono" type="text" id="Telefono" maxlength="22" />
</label>
</td>
<td align="left">
<label>
<input name="Mail" type="text" id="Mail" size="22" maxlength="22" />
</label>
</td>
</tr>
<tr valign="top">
<td height="20" align="left"><font size="2">Data di arrivo </td>
<td align="left">Data di partenza </td>
</tr>
<tr valign="bottom">
<td height="24" align="left">
<label>
<input name="Arrivo" type="text" id="Arrivo" maxlength="22" />
</label>
</td>
<td align="left">
<label>
<input name="Partenza" type="text" id="Partenza" maxlength="22" />
</label>
</td>
</tr>
<tr valign="top">
<td height="19" align="left">Numero di stanze </td>
<td align="left">Numero di persone </td>
</tr>
<tr>
<td height="19" align="left">
<label>
<input name="Stanze" type="text" id="Stanze" maxlength="22" />
</label> </td>
<td align="left">
<label>
<input name="Persone" type="text" id="Persone" maxlength="22" />
</label> </td>
</tr>
<tr>
<td height="20" align="left"> </td>
<td align="left"> </td>
</tr>
<tr>
<td height="20" align="left">
<label>
<input name="Submit" type="submit" value="Invia" />
</label> </td>
<td align="left">
<label>
<input name="Submit2" type="reset" value="Cancella" />
</label> </td>
</tr> </table>
</form>

Una pagina riepilogo.asp:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="style.css" rel="stylesheet" type="text/css">
</head>

<body>
<form action="invio.asp" method="post" name="conferma" id="conferma">
<table width="269" align="center">
<input type="hidden" name="Nome" value="<%=Request.Form("Nome") %>"/>
<% if (Request.Form("Nome") <> "") then
%><tr>
<td>Nome</td>
<td><%=Request.Form("Nome") %></td></tr>
<%end if %>
<input type="hidden" name="Cognome" value="<%=Request.Form("Cognome") %>"/>
<% if (Request.Form("Cognome") <> "") then
%><tr><td>Cognome</td>
<td><%=Request.Form("Cognome") %></td></tr>
<%end if %>
<input type="hidden" name="Telefono" value="<%=Request.Form("Telefono") %>"/>
<% if (Request.Form("Telefono") <> "") then
%><tr><td>Telefono</td>
<td><%=Request.Form("Telefono") %></td></tr>
<%end if %>
<input type="hidden" name="Mail" value="<%=Request.Form("Mail") %>"/>
<% if (Request.Form("Mail") <> "") then
%><tr>
<td>E-mail</td>
<td><%=Request.Form("Mail") %></td></tr>
<%end if %>
<input type="hidden" name="Arrivo" value="<%=Request.Form("Arrivo") %>"/>
<% if (Request.Form("Arrivo") <> "") then
%><tr>
<td>Data arrivo </td>
<td><%=Request.Form("Arrivo") %></td></tr>
<%end if %>
<input type="hidden" name="Partenza" value="<%=Request.Form("Partenza") %>"/>
<% if (Request.Form("Partenza") <> "") then
%><tr>
<td>data partenza </td>
<td><%=Request.Form("Partenza") %></td></tr>
<%end if %>
<input type="hidden" name="Stanze" value="<%=Request.Form("Stanze") %>"/>
<% if (Request.Form("Stanze") <> "") then
%><tr>
<td>numero stanze </td>
<td><%=Request.Form("Stanze") %></td></tr>
<%end if %>
<input type="hidden" name="Persone" value="<%=Request.Form("Persone") %>"/>
<% if (Request.Form("Persone") <> "") then
%><tr>
<td>numero persone </td>
<td><%=Request.Form("Persone") %></td></tr>
<%end if %>

<tr>
<td colspan="2"><br />
<input type="submit" value="conferma">
<label>
<input type="button" value="Indietro" onClick="javascript:history.back()" name="button">
</label></td></tr>
</table></form>Ovviamente abbiamo il tasto torna
</body>
</html>

e fin qui tutto ok, il problema nasce quando clicco su conferma ovvero non riesco ad aprire la pagina invio:

invio.asp:

<%@LANGUAGE=”VBSCRIPT” CODEPAGE=”1252?%>
<%
Dim IP
IP=Request.ServerVariables(”HTTP_X_FORWARDED_FOR”)
If IP=" Then
IP=Request.ServerVariables(”REMOTE_ADDR”)"
End If
destinatario = "[email protected]"
messaggio = "Nome: " & Request.Form("Nome") & vbCrLf &_
"Cognome: " & Request.Form("Cognome") & vbCrLf &_
"Numero_telefono : " & Request.Form("Telefono") & vbCrLf &_
"E-mail: " & Request.Form(”Mail”) & vbCrLf &_
"Data_Arrivo: " & Request.Form("Arrivo") & vbCrLf &_
"Data_partenza: " & Request.Form("Partenza") & vbCrLf &_
"Numero_stanze: " & Request.Form("Stanze") & vbCrLf &_
"Numero_persone: " & Request.Form("Persone") & vbCrLf
messaggio = messaggio & "Informazioni: " & Request.Form("info")& vbCrLf & "INDIRIZZO ip: " & IP
'Invio email
Set Mail = Server.CreateObject("CDO.Message")
Mail.To = mittente
Mail.From = Request.Form("Mail")
Mail.Subject = "Prenotazione stanze"
Mail.TextBody = messaggio
Mail.Send
Set Mail = nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
Le informazioni sono state spedite correttamente
</body>
</html>

Vi prego aiutatemi......sono disperata

Paolo69 · 4 Giu 2010

Prova questo nella pagina "INVIO.ASP":

Codice:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D" NAME="CDO for Windows 2000 Type Library" -->
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library" -->
<%

Dim Nome, Cognome, NumeroTelefono, EMail
Dim DataArrivo, DataPartenza, Numero_Stanza
Dim NumeroPersone, Body
	Nome 			= Request.form("Nome")
	Cognome 		= Request.Form("Cognome")
	NumeroTelefono 	= Request.Form("Telefono")
	EMail 			= Request.Form("Mail")
	DataArrivo 		= Request.Form("Arrivo")
	DataPartenza 	= Request.Form("Partenza")
	Numero_Stanza 	= Request.Form("Stanze")
	NumeroPersone 	= Request.Form("Persone")

Dim nomedominio, indirizzoIp, modulo, browserSistemaOperativo
	nomeDominio 				= Request.ServerVariables("HTTP_HOST")
	indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
	modulo						= Request.ServerVariables("HTTP_REFERER")
	browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")

		Body = "<font face=verdana size=2>Questi i dati inseriti nel modulo:<br> " & nome & " </b><br />" & Cognome &"<br />"

' Info server	
		strMessage		= "Email address is empty. Cannot send email."
		cSmtpServer 	= "smtp.aruba.it"
		cSmtpPort 		= "25"
		cSMTPUser		= ""
		cSMTPPassword 	= ""
' Windows XP / 2003 
	Set myMail			= CreateObject("CDO.Message")
		myMail.Subject 	= "Contatto dal dominio " & nomeDominio
		myMail.From		= "[email protected]"
		myMail.To		=  "[email protected]" ' Destinatario
'		myMail.bCC 		= "" 'destinatario nascosto		
' Corpo messaggio	
		myMail.HTMLBody	= "<font face=verdana size=2>Questi i dati inseriti nel modulo presente alla pagina <b> " & modulo & " </b><br />da utente con indirizzo IP <b>" & indirizzoIp & " </b><br />browser e sistema operativo <b>" & browserSistemaOperativo  & "</b><br>" & Body
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= cSmtpServer
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= cSmtpPort 
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = cSMTPPassword
		myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = cSMTPUser
		myMail.Configuration.Fields.Update
		myMail.Send
	Set myMail = Nothing

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
Le informazioni sono state spedite correttamente
</body>
</html>

Fammi sapere.

dolores · 4 Giu 2010

Grazie mille funziona finalmente, però nell'email che ricevo compaiono solo il nome e il cognome, ho guardato bene la pagina che mi hai postato forse dovrei aggiungerli :

Questi i dati inseriti nel modulo:<br> " & nome & " </b><br />" & Cognome &"<br />"(qui giusto?).
Spero di si...
E se dovessi aggiungere un secondo destinatario?

Grazie di tutto

Paolo69 · 4 Giu 2010

Ciao dolores,
per pigrizia non ho inserito tutti i campi, pensaci te non è difficile.

Per inserire un secondo destinatario puoi fare così:

Codice:

myMail.To =  "[email protected];[email protected]" ' Destinatario

in pratica puoi inserire tutti gli indirizzi che vuoi con un semplice ";" senza spazi.
Ciaooooooooo

dolores · 4 Giu 2010

adesso ci provo speriamo bene...

Grazie

dolores · 7 Giu 2010

Problemi con select

Ciao a tutti scusate ma ho un nuovo problema, forse chiedo troppo ma per chi s'imbatte per la prima volta con il codice asp non è per niente facile capire certi passaggi.
Allora ho inserito un select e un imput radio per la privacy, ma c'è qualcosa che non mi torna, quanto è brutto essere ignoranti.......
Cmq vi posto le pagine e vi ringranzio in anticipo per ogni eventuale aiuto.
Grazie ancora

Pagina form.htm:

<form action="riepilogo.asp" method="post" name="informazione" id="informazione"><table width="341" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="339"> </td>
</tr>
<tr>
<td><div align="center" class="spedita">SCHEDA RICHIESTA INFORMAZIONI </div></td>
</tr>
</table>
<br>
<table width="802" border="0" align="center" cellpadding="0" cellspacing="4" class="testo" id="table2">
<tr valign="top">
<td width="49%" height="20" colspan="7" align="left" class="text">*Il/la Titolare/Legale rappresentante(cognome nome)</td>
<td width="51%" align="left">*Nome Azienda</td>
</tr>
<tr valign="bottom">
<td height="10" colspan="7" align="left">
<label>
<input name="Nome" type="text" id="Nome" maxlength="50" />
</label>
</td>
<td align="left">
<label>
<input name="Azienda" type="text" id="Azienda" maxlength="22" />
</label>
</td>
</tr>
<tr valign="bottom">
<td height="3" colspan="7" align="left">*Esercente l'attività di </td>
<td align="left">*Telefono</td>
</tr>
<tr valign="bottom">
<td height="3" colspan="7" align="left"><input name="Settore" type="text" id="Settore" maxlength="50" /></td>
<td align="left"><label>
<input name="Telefono" type="text" id="Telefono" maxlength="22" />
</label></td>
</tr>
<tr valign="top">
<td height="20" colspan="7" align="left">*Mobile</td>
<td align="left">*E-mail</td>
</tr>
<tr valign="bottom">
<td height="24" colspan="7" align="left"><label>
<input name="Mobile" type="text" id="Mobile" maxlength="22" />
</label>

</td>
<td align="left">
<label>
<input name="Mail" type="text" id="Mail" size="22" maxlength="22" />
</label>
</td>
</tr>
<tr valign="top">
<td height="20" colspan="7" align="left">*Fax</td>
<td align="left">*Indirizzo</td>
</tr>
<tr valign="bottom">
<td height="24" colspan="7" align="left">
<label>
<input name="Fax" type="text" id="Fax" maxlength="22" />
</label>
</td>
<td align="left">
<label>
<input name="Indirizzo" type="text" id="Indirizzo" maxlength="22" />
</label>
</td>
</tr>
<tr valign="top">
<td height="19" colspan="7" align="left">*Nr.</td>
<td align="left">*Città</td>
</tr>
<tr>
<td height="7" colspan="7" align="left">
<label>
<input name="Numero" type="text" id="Numero" maxlength="22" />
</label> </td>
<td align="left">
<label>
<input name="Citta" type="text" id="Citta" maxlength="22" />
</label> </td>
</tr>
<tr>
<td height="8" colspan="7" align="left">*Cap</td>
<td align="left"> </td>
</tr>
<tr>
<td height="8" colspan="7" align="left"><label>
<input name="Cap" type="text" id="Cap" maxlength="22" />
</label></td>
<td align="left"> </td>
</tr>
<tr>

</tr>
<tr>
<td height="2" colspan="7" align="left"><div align="right">Seleziona il tuo sesso:</div></td>
<td align="left"><label><select name="Sesso">
<option selected> -- </option>
<option value="maschio"> Maschio </option>
<option value="femmina"> Femmina </option>
</select></label>
</td>
</tr>
<tr>
<td height="2" colspan="7" align="left"><div align="right">Privacy:</div></td>
<td align="left"> </td>
</tr>
<tr>
<td height="8" colspan="7" align="left"> </td>
<td align="left"><textarea name="testoprivacy" cols="50" rows="6" id="textarea">Il trattamento dei dati personali che La riguardano è finalizzato ad offrirLe un servizio di informazione nel rispetto delle normative comunitarie e nazionali in tema di privacy. Tutto ciò verrà svolto mediante elaborazione elettronica dei suoi dati. Lei può tranquillamente opporsi, qualora lo ritenga necessario e in tal caso l'ECIPAG provvederà alla cancellazione del suo dato senza alcun onere a suo carico. Il DLgs. 196/2003 Le conferisce il diritto di conoscere l'eventuale trattamento dei suoi dati e di averne comunicazione dal titolare o dal responsabile del trattamento. Di avere altresì, dei dati stessi, comunicazione in forma intelligibile, origine e logica e finalità del trattamento. Potrà, eventualmente rinnovare la richiesta dei suoi dati con intervallo non minore dì 90 giorni, di ottenerne la cancellazione ovvero la trasformazione in forma anonima o il blocco dei dati trattati nel caso in cui vi sia violazione della legge, compresi quelli di cui non è necessaria la conservazione in relazione agli scopi per i quali essi sono stati raccolti o successivamente trattati; di richiedere la rettificazione ovvero, qualora vi abbia interesse, l'integrazione dei suoi dati, di ottenere l'attestazione che le operazioni predette siano portate a conoscenza di coloro ai quali i dati siano stati comunicati o diffusi; di opporsi in tutto o in parte, per motivi legittimi, al trattamento dei dati personali che La riguardano, ancorché pertinenti allo scopo della raccolta; di opporsi in tutto o in parte, al trattamento dei dati personali che la riguardano, previsto ai fini di informazioni commerciali o di vendita diretta ovvero per il compimento di ricerche di mercato, e tale diritto può essere esercitato gratuitamente. II titolare del presente trattamento è l'ECIPAG, via Imera , 223/c Agrigento (AG) Attraverso il conferimento del suo indirizzo e-mail, del numero di telefax e/o di telefono e/o di cellulare esprime il suo specifico consenso all'utilizzo di detti strumenti per l'invio di informazioni commerciali.</textarea></td>
</tr>
<tr>
<td height="2" colspan="7" align="left"> </td>
<td align="left"> </td>
</tr>
<tr>
<td height="2" colspan="7" align="left"> </td>
<td align="left"> </td>
</tr>

<tr>
<td height="8" align="left"><div align="right"></div></td>
<td align="left"> </td>
<td align="left"> </td>
<td align="left"> </td>
<td align="left"> </td>
<td align="left"><div align="right"></div></td>
<td align="left"><div align="right">
Accetto
<input name="privacy" type="radio" value="accetto" checked>
</div></td>
<td align="left">Non accetto <input name="radiobutton" type="radio" value="nonaccetto"></td>
</tr>
<tr>
<td height="8" colspan="7" align="left"> </td>
<td align="left"> </td>
</tr>
<tr>
<td height="20" colspan="7" align="left">
<label>
<input name="Submit" type="submit" value="Invia" />
</label> </td>
<td align="left">
<label>
<input name="Submit2" type="reset" value="Cancella" />
</label> </td>
</tr> </table>
</form>

Pagina riepilogo.asp:

<form action="invio.asp" method="post" name="conferma" id="conferma">
<table width="594" align="center">
<input type="hidden" name="Nome" value="<%=Request.Form("Nome") %>"/>
<% if (Request.Form("Nome") <> "") then
%><tr>
<td width="398">Il/la Titolare/Legale rappresentante(cognome nome)</td>
<td width="184"><%=Request.Form("Nome") %></td></tr>
<%end if %>
<input type="hidden" name="Azienda" value="<%=Request.Form("Azienda") %>"/>
<% if (Request.Form("Azienda") <> "") then
%><tr><td>Nome Azienda</td>
<td><%=Request.Form("Azienda") %></td></tr>
<%end if %>
<input type="hidden" name="Settore" value="<%=Request.Form("Settore") %>"/>
<% if (Request.Form("Settore") <> "") then
%><tr><td>Esercente l'attività di</td>
<td><%=Request.Form("Settore") %></td></tr>
<%end if %>
<input type="hidden" name="Telefono" value="<%=Request.Form("Telefono") %>"/>
<% if (Request.Form("Telefono") <> "") then
%><tr><td>Telefono</td>
<td><%=Request.Form("Telefono") %></td></tr>
<%end if %>
<input type="hidden" name="Mobile" value="<%=Request.Form("Mobile") %>"/>
<% if (Request.Form("Mobile") <> "") then
%><tr><td>Telefono</td>
<td><%=Request.Form("Mobile") %></td></tr>
<%end if %>
<input type="hidden" name="Mail" value="<%=Request.Form("Mail") %>"/>
<% if (Request.Form("Mail") <> "") then
%><tr>
<td>E-mail</td>
<td><%=Request.Form("Mail") %></td></tr>
<%end if %>
<input type="hidden" name="Fax" value="<%=Request.Form("Fax") %>"/>
<% if (Request.Form("Fax") <> "") then
%><tr>
<td>Fax</td>
<td><%=Request.Form("Fax") %></td></tr>
<%end if %>
<input type="hidden" name="Indirizzo" value="<%=Request.Form("Indirizzo") %>"/>
<% if (Request.Form("Indirizzo") <> "") then
%><tr>
<td>Indirizzo </td>
<td><%=Request.Form("Indirizzo") %></td></tr>
<%end if %>
<input type="hidden" name="Numero" value="<%=Request.Form("Numero") %>"/>
<% if (Request.Form("Numero") <> "") then
%><tr>
<td>Nr. </td>
<td><%=Request.Form("Numero") %></td></tr>
<%end if %>
<input type="hidden" name="Citta" value="<%=Request.Form("Citta") %>"/>
<% if (Request.Form("Citta") <> "") then
%><tr>
<td>Città </td>
<td><%=Request.Form("Citta") %></td></tr>
<%end if %>
<input type="hidden" name="Cap" value="<%=Request.Form("Cap") %>"/>
<% if (Request.Form("Cap") <> "") then
%><tr>
<td>Cap </td>
<td><%=Request.Form("Cap") %></td></tr>
<%end if %>
<input type="hidden" name="Sesso" value="<%=Request.Form("Sesso") %>"/>
<% if Sesso = "maschio" Then
Maschio
Response.Write("hai selezionato il sesso maschile")
ElseIf Sesso = "femmina" Then
Femmina
Response.Write("hai selezionato il sesso femminile")
%><tr>
<td>Sesso </td>
<td><%=Request.Form("Sesso") %></td></tr>
<%end if %>
<input type="hidden" name="privacy" value="<%=Request.Form("privacy") %>"/>
<% if (Request.Form("privacy") <> "") then
%><tr>
<td>Privacy </td>
<td><%=Request.Form("privacy") %></td></tr>
<%end if %>

<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<%end if %>

<tr>
<td colspan="2"><br />
<input type="submit" value="conferma">
<label>
<input type="button" value="Indietro" onClick="javascript:history.back()" name="button">
</label></td></tr>
</table>
</form>

Pagina Invio.asp:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>


<%

Dim Nome, Azienda, Settore, NumeroTelefono, Mobile, EMail
Dim Fax, Indirizzo, Numero
Dim Citta, Cap, Sesso, Privacy,Body
Nome = Request.form("Nome")
Azienda = Request.Form("Azienda")
NumeroTelefono = Request.Form("Telefono")
Mobile = Request.Form("Mobile")
EMail = Request.Form("Mail")
Fax = Request.Form("Fax")
Indirizzo = Request.Form("Indirizzo")
Numero = Request.Form("Numero")
Citta = Request.Form("Citta")
Cap = Request.Form("Cap")
Sesso = Request.Form("Sesso")
privacy = Request.Form("privacy")

Dim nomedominio, indirizzoIp, modulo, browserSistemaOperativo
nomeDominio = Request.ServerVariables("HTTP_HOST")
indirizzoIp = Request.ServerVariables("REMOTE_ADDR")
modulo = Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo = Request.ServerVariables("HTTP_USER_AGENT")

Body = "<font face=verdana size=2>Questi i dati inseriti nella scheda informazioni:<br> " & nome & " </b><br />" & Azienda &"</b><br /> " & Settore & " </b><br />" & NumeroTelefono &"</b><br /> " & Mobile &"</b><br /> " & EMail &"</b><br /> " & Fax &"</b><br /> " & Indirizzo &"</b><br /> " & Numero &"</b><br /> " & Citta &"</b><br /> " & Cap &"</b><br /> "& Sesso &"</b><br /> " & privacy &"</b><br /> "

' Info server
strMessage = "Email address is empty. Cannot send email."
cSmtpServer = "smtp.aruba.it"
cSmtpPort = "25"
cSMTPUser = ""
cSMTPPassword = ""
' Windows XP / 2003
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "Richiesta Informazioni dal dominio " & nomeDominio
myMail.From = "[email protected]"
myMail.To = "[email protected];[email protected]" ' Destinatario
' myMail.bCC = "" 'destinatario nascosto
' Corpo messaggio
myMail.HTMLBody = "<font face=verdana size=2>Questi i dati inseriti nel Scheda Informazioni presente alla pagina <b> " & modulo & " </b><br />da utente con indirizzo IP <b>" & indirizzoIp & " </b><br />browser e sistema operativo <b>" & browserSistemaOperativo & "</b><br>" & Body
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= cSmtpServer
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= cSmtpPort
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = cSMTPPassword
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = cSMTPUser
myMail.Configuration.Fields.Update
myMail.Send
Set myMail = Nothing

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Invio</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
Le informazioni sono state spedite correttamente
</body>
</html>

Paolo69 · 7 Giu 2010

Dolores, sostituisci il codice presente nella pagina form.htm con il seguente:

Codice:

<script language="javascript">
<!--
// accetta nel form mail
function accetta(el){
checkobj=el
	if (document.all||document.getElementById){
		for (i=0;i<checkobj.form.length;i++){  
var tempobj=checkobj.form.elements[i]
	if(tempobj.type.toLowerCase()=="submit")
tempobj.disabled=!checkobj.checked
							}
						}
					}

function disabilita(el){
	if (!document.all&&!document.getElementById){
			if (window.checkobj&&checkobj.checked)
return true
		else{
alert(" Compilare i campi obbligatori /n All fields required")
return false
						}
					}
				}
-->
</script>
<form action="riepilogo.asp" method="post" name="informazione" id="informazione"><table width="341" align="center" cellpadding="0" cellspacing="0">
<table width="802" border="0" align="center" cellpadding="0" cellspacing="4" class="testo" id="table2">
    <tr>
    <td height="33" colspan="2"><div align="center" class="spedita">SCHEDA RICHIESTA INFORMAZIONI</div></td>
    </tr>
    <tr>
    <td width="49%" height="20" align="left" class="text">*Il/la Titolare/Legale rappresentante(cognome nome)</td>
    <td width="51%" align="left">*Nome Azienda</td>
    </tr>
    <tr>
	<td height="10" align="left">
    <label><input name="Nome" type="text" id="Nome" maxlength="50" /></label>
    </td>
    <td align="left">
    <label><input name="Azienda" type="text" id="Azienda" maxlength="22" /></label>
    </td>
    </tr>
    <tr>
    <td align="left">*Esercente l'attivit&agrave; di </td>
    <td align="left">*Telefono</td>
    </tr>
    <tr>
    <td align="left"><input name="Settore" type="text" id="Settore" maxlength="50" /></td>
    <td align="left">
    <label><input name="Telefono" type="text" id="Telefono" maxlength="22" /></label>
    </td>
    </tr>
    <tr>
    <td align="left">*Mobile</td>
    <td align="left">*E-mail</td>
    </tr>
    <tr>
    <td height="24" align="left">
    <label><input name="Mobile" type="text" id="Mobile" maxlength="22" /></label>
    </td>
    <td align="left">
    <label><input name="Mail" type="text" id="Mail" size="22" maxlength="22" /></label>
    </td>
    </tr>
    <tr>
    <td align="left">*Fax</td>
    <td align="left">*Indirizzo</td>
    </tr>
    <tr>
    <td align="left">
    <label><input name="Fax" type="text" id="Fax" maxlength="22" /></label>
    </td>
    <td align="left">
    <label><input name="Indirizzo" type="text" id="Indirizzo" maxlength="22" /></label>
    </td>
    </tr>
    <tr>
    <td align="left">*Nr.</td>
    <td align="left">*Citt&agrave;</td>
    </tr>
    <tr>
    <td align="left">
    <label><input name="Numero" type="text" id="Numero" maxlength="22" /></label>
    </td>
    <td align="left">
    <label><input name="Citta" type="text" id="Citta" maxlength="22" /></label>
    </td>
    </tr>
    <tr>
    <td align="left">*Cap</td>
    <td align="left">&nbsp;</td>
    </tr>
    <tr>
    <td height="8" align="left"><label>
    <input name="Cap" type="text" id="Cap" maxlength="22" />
    </label></td>
    <td align="left">&nbsp;</td>
    </tr>
    <tr>
    <td height="2" align="left"><div align="right">Seleziona il tuo sesso:</div></td>
    <td align="left"><label><select name="Sesso">
    <option selected> -- </option>
    <option value="maschio"> Maschio </option>
    <option value="femmina"> Femmina </option>
    </select></label></td>
    </tr>
    <tr>
    <td align="left" colspan="2">Privacy:</td>
    </tr>
    <tr>
    <td colspan="2" align="left">Il trattamento dei dati personali che La riguardano è finalizzato ad offrirLe un servizio di informazione nel rispetto delle normative comunitarie e nazionali in tema di privacy.
Tutto ciò verrà svolto mediante elaborazione elettronica dei suoi dati.
Lei può tranquillamente opporsi, qualora lo ritenga necessario e in tal caso l'ECIPAG provvederà alla cancellazione del suo dato senza alcun onere a suo carico. 
Il DLgs. 196/2003 Le conferisce il diritto di conoscere l'eventuale trattamento dei suoi dati e di averne comunicazione dal titolare o dal responsabile del trattamento. 
Di avere altresì, dei dati stessi, comunicazione in forma intelligibile, origine e logica e finalità del trattamento. Potrà, eventualmente rinnovare la richiesta dei suoi dati con intervallo non minore dì 90 giorni, di ottenerne la cancellazione ovvero la trasformazione in forma anonima o il blocco dei dati trattati nel caso in cui vi sia violazione della legge, compresi quelli di cui non è necessaria la conservazione in relazione agli scopi per i quali essi sono stati raccolti o successivamente trattati; di richiedere la rettificazione ovvero, qualora vi abbia interesse, l'integrazione dei suoi dati, di ottenere l'attestazione che le operazioni predette siano portate a conoscenza di coloro ai quali i dati siano stati comunicati o diffusi; di opporsi in tutto o in parte, per motivi legittimi, al trattamento dei dati personali che La riguardano, ancorché pertinenti allo scopo della raccolta; di opporsi in tutto o in parte, al trattamento dei dati personali che la riguardano, previsto ai fini di informazioni commerciali o di vendita diretta ovvero per il compimento di ricerche di mercato, e tale diritto può essere esercitato gratuitamente. 
II titolare del presente trattamento è l'ECIPAG, via Imera , 223/c Agrigento (AG) Attraverso il conferimento del suo indirizzo e-mail, del numero di telefax e/o di telefono e/o di cellulare esprime il suo specifico consenso all'utilizzo di detti strumenti per l'invio di informazioni commerciali.</td>
    </tr>
    <tr>
    <td colspan="2">Consenso al trattemento dati <font color="#FF0000">*</font> <input id="Privacy" onClick="accetta(this)" type="checkbox" value="Accetto il trattamento dei dati" name="Privacy" /></td>
    </tr>
    <tr>
    <td height="20" align="right">
    <label><input disabled="disabled" name="submit" type="submit" value="  Invia modulo richiesta  " /></label>
    </td>
    <td align="left">
    <label><input name="Submit2" type="reset" value="  Reset  " /></label>
    </td>
    </tr>
</table>
</form>

In pratica, grazie ad uno script JavaScript il pulsante Invio non si attiva se l'utente non ha posto il 'flag' sulla voce "Consenso trattamento dati", penso che questa sia la soluzione migliore.

Ne ho approfittato per pulirti il codice HTML da tag inutili ed errati.

dolores · 7 Giu 2010

Ciao Paolo69, grazie per aver risposto così presto,
ho provato a modificare la pagina form.htm, ma mi da errore.

Paolo69 · 7 Giu 2010

puoi essere + precisa? ti manda nella pagina di conferma o no?

dolores · 7 Giu 2010

Si scusami, praticamente nella pagina riepilogo.asp mi dice http 500 errore interno del server.
Ho provato anche adesso, pensavo fosse un problema momentaneo ma mi dice sempre la stessa cosa.

Paolo69 · 7 Giu 2010

Dolores,
nella riga 91 della pagina riepilogo.asp vi è un <%end if %> senza motivo.
questo è il blocco di codice, togli la suddetta istruzione:

Codice:

<tr>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
[B][COLOR="Red"]<%end if %>[/COLOR][/B]

<tr>
<td colspan="2"><br />
<input type="submit" value="conferma">
<label>
<input type="button" value="Indietro" onClick="javascript:history.back()" name="button">
</label></td></tr>
</table>
</form>

:mavieni:

dolores · 7 Giu 2010

Grazie mille funziona perfettamente.

dolores · 10 Giu 2010

In mezzo alla felicità, non mi sono accorta che il campo sesso nella pagina riepilogo.asp non compare completamente, sicuramente ho sbagliato il codice, grazie per ogni eventuale aiuto.

Paolo69 · 10 Giu 2010

Sostituisci il codice con il seguente:

Codice:

<tr>
<td>Sesso</td>
<td><% 
If Sesso = "Maschio" Then
	Response.Write("hai selezionato il sesso maschile")
ElseIf Sesso = "femmina" Then
	Response.Write("hai selezionato il sesso femminile")
Else 
	Response.Write("Non hai selezionato il sesso")
End If
%></td>
</tr>

dolores · 10 Giu 2010

Di funzionare funziona, solo che nella pagina riepilogo, mi dice che non ho selezionato il sesso, sia che scelgo maschio sia che scelgo femmina.

dolores · 10 Giu 2010

Allora nell'email arriva, e solo nel riepilogo che mi fa questo scherzetto, ti scrivo il codice forse mi scordo qualcosa:

<input type="hidden" name="Sesso" value="<%=Request.Form("Sesso") %>"/>
<tr>
<td>Sesso</td>
<td><%
If Sesso = "Maschio" Then
Response.Write("hai selezionato il sesso maschile")
ElseIf Sesso = "femmina" Then
Response.Write("hai selezionato il sesso femminile")
Else
Response.Write("Non hai selezionato il sesso")
End If
%></td>
</tr>

Paolo69 · 10 Giu 2010

Ovvio che non va, la variabile sesso non è valorizzata, aggiungi il codice in grassetto:

Codice:

<input type="hidden" name="Sesso" value="<%=Request.Form("Sesso") %>"/>
<tr>
<td>Sesso</td>
<td><%

[B]Dim Sesso
Sesso = Request.Form("Sesso")[/B]

If Sesso = "maschio" Then
Response.Write("hai selezionato il sesso maschile")
ElseIf Sesso = "femmina" Then
Response.Write("hai selezionato il sesso femminile")
Else
Response.Write("Non hai selezionato il sesso")
End If
%></td>
</tr>

facci sapere!

dolores · 10 Giu 2010

Funziona!!

Grazie mille

dolores · 7 Lug 2010

campi obbligatori

Salve, sempre su questo form vorrei che tutti i campi fossero obbligatori, da quanto poco ne capisco solo uno è obbligatorio quello del consenso dei dati personali. Grazie per qualsiasi suggerimento

Autore	Titolo	Forum	Risposte	Data
L	Problemi form Pagina php	HTML e CSS	3	3 Mag 2021
S	Problemi di visualizzazione form contatti sito web	HTML e CSS	2	19 Apr 2020
	Problemi form php/html	PHP	33	8 Set 2016
F	Problemi con ricezione mail dal form	PHP	8	22 Mag 2015
D	Problemi con form aggiornamento dati	PHP	4	28 Mar 2015
S	Problemi form registrazione newsletter	PHP	0	21 Ago 2014
V	problemi con l'invio di allegato in un form	PHP	17	24 Feb 2014
H	Problemi Form	jQuery	2	9 Gen 2014
	Problemi passaggio valori da un Form ad Una classe con query mysql	PHP	12	19 Ago 2013
P	Problemi inserimento dati database tramite form	PHP	12	3 Feb 2013
Z	Aiuto! problemi di inserimento dati da form	PHP	9	3 Dic 2012
F	problemi form utenti php e database	PHP	9	13 Ott 2012
L	problemi con invio dati Form a Database	PHP	2	4 Ott 2012
	problemi con un form	PHP	14	13 Ago 2011
M	Problemi lettura radio button da form	Javascript	0	13 Apr 2011
F	Problemi Form e PHP	PHP	4	27 Lug 2009
B	problemi form mail su flash	Flash	2	22 Apr 2008
L	Problemi con invio form via mail	Classic ASP	3	19 Lug 2007
	form, problemi con echo & include	PHP	5	8 Lug 2007
I	problemi ajax-form	Ajax	1	20 Dic 2006
I	Problemi con la creazione di una form con selezione automatica!	PHP	0	6 Mag 2006
A	problemi Mail Form	PHP	1	29 Mar 2006
F	Problemi con un form	Javascript	1	3 Mar 2006
S	problemi invio dati da un form a e.mail	HTML e CSS	1	27 Gen 2006
S	Problemi con form action	PHP	0	1 Set 2005
P	problemi con i form	HTML e CSS	2	18 Feb 2005
R	Problemi Con Impaginazione Form	HTML e CSS	5	16 Feb 2005
C	problemi con i form	HTML e CSS	7	13 Dic 2004
V	Problemi a inviare form a db	Classic ASP	7	15 Ago 2004
S	Form, problemi di output	Classic ASP	0	5 Mar 2004
N	php problemi a visualizzare video	PHP	3	8 Ott 2023
T	problemi con dati menu a tendina	HTML e CSS	2	22 Giu 2023
T	problemi di connessione	MySQL	2	4 Nov 2022
M	Upload immagine con javascript problemi con FormData()	Javascript	1	6 Ott 2021
F	Problemi visualizzazione mappa Android studio	Sviluppo app per Android	0	9 Lug 2021
S	Problemi Javascript + Aruba	Javascript	2	6 Lug 2021
A	Problemi con move_uploaded_file	PHP	7	22 Giu 2021
M	Problemi con la stampa dei valori in php	PHP	1	21 Mag 2021
L	Problemi con il login	PHP	2	18 Mag 2021
R	Tutto su utf-8 ma ancora problemi con i caratteri speciali in mysql	MySQL	1	27 Mar 2021
Z	problemi con foreach insert into	PHP	10	6 Feb 2021
B	javascript per problemi con pdf e Safari	Javascript	0	7 Gen 2021
N	Problemi kit videosorveglianza	IP Cam e Videosorveglianza	0	25 Nov 2020
M	Problemi con creazione maschere	Presentati al Forum	1	18 Nov 2020
M	Problemi con query a più tabelle	PHP	3	24 Ago 2020
R	Problemi anomalo insermento in db	PHP	9	28 Mag 2020
S	Problemi delle funzioni eliminate con PHP e MySQL	PHP	4	20 Mag 2020
S	Problemi di un principiante	PHP	3	19 Mag 2020
M	Problemi con blog Grav	CMS (Content Management System)	0	8 Mag 2020
F	Problemi di visualizzazione di un sito su più browser	WordPress	0	23 Apr 2020

problemi form

Nuovo Utente

Moderatore

Nuovo Utente

Moderatore

Nuovo Utente

Nuovo Utente

Moderatore

Nuovo Utente

Moderatore

Nuovo Utente

Moderatore

Nuovo Utente

Nuovo Utente

Moderatore

Nuovo Utente

Nuovo Utente

Moderatore

Nuovo Utente

Nuovo Utente

Discussioni simili