salve a tutti
ho realizzato un modulo per l'invio di prenotazioni online. il problema è che l'email arriva regolarmente, ma i dati non sono visualizzati nell'ordine in cui li ho impostati nel form.
grazie anticipatamente...... vi riporto di seguito il codice:
pagina form.asp
<html>
<head>
<title>Form dati</title>
</head>
<body leftmargin="0" onLoad="" marginwidth="0" bgcolor="#ffffff">
<table width="720" border="0" cellpadding="8" cellspacing="0">
<tr valign="top">
<td width="157">
<p>
</td>
<td width="531">
<table width="100%" border="0" cellspacing="3" cellpadding="1" align="center">
<tr valign="top">
<td>
<p> </p>
<table border=0 cellpadding=3 cellspacing=0
width="100%">
<tbody>
<tr bgcolor="#E4E4E4">
<td>
<FORM ACTION="conferma.asp" METHOD=post>
<INPUT TYPE=hidden NAME="destinatario" VALUE = "merco@tin.it">
<input type=hidden name="testo" value="E' stata inviata la seguente prenotazione: ">
<small><strong><font face=Arial>Ragione Sociale / Nome Cognome
<br>
<input maxlength=40 name="Ragione Sociale" size=40>
</font></strong></small>
<p><small><strong><font face=Arial> Indirizzo<br>
<input maxlength=40 name="Indirizzo" size=40>
<br>
Cap<br>
<input maxlength=5 name="CAP"
size=6>
<br>
Località<br>
<input maxlength=40 name="Località"
size=40>
<br>
Provincia<br>
<input maxlength=2 name="Provincia"
size=4>
<br>
Telefono<br>
<input maxlength=20 name="Tel">
<br>
Fax<br>
<input maxlength=20 name="Fax">
<br>
Partita IVA<br>
<input name=P-IVA>
<br>
Indirizzo E-Mail per la conferma<br>
<input
name=Email>
<br>
</font></strong></small></p>
<p><small><strong><font face=Arial>
<input name=inviadati type=submit value="Invia dati">
</font></strong></small></p>
</form>
</td>
</tr>
</tbody>
</table>
<p>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
e adesso la pagina conferma.asp
<%
destinatario=Request.Form("destinatario")
email=Request.Form("email")
testo=Request.Form("testo")
For each i in Request.Form
if i <> "destinatario" and i <> "inviadati" and i <> "testo" then
body = body & i & ": " & Request.Form(i)&chr(13)&Chr(10)
end if
next
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "tuohost" 'Indicare i vostro server SMTP
Mail.From = "info@tuodominio.it" 'Indicare l'indirizzo del mittente
Mail.FromName = "tuodominio" 'Specificare il nome del mittentee
Mail.AddAddress "merco@tuodominio.it", "Gigi" 'Il messaggio di conferma andrà a Marco
Mail.AddAddress destinatario 'Il messaggio di conferma andrà al destinatario predefinito nel form
Mail.AddAddress email 'Il messaggio di conferma andrà anche al cliente che compila il form
Mail.AddCc "luca@tuodominio.it", "Marco" 'Il messaggio di conferma andrà per conoscenza anche a Luca
Mail.Subject = "Prenotazione online"
Mail.Body = testo+body
On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>
<html>
<head>
<title>Conferma</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body leftmargin="0" onLoad="" marginwidth="0" bgcolor="#ffffff">
<table width="720" border="0" cellpadding="8" cellspacing="0">
<tr valign="top">
<td width="531">
<table width="100%" border="0" cellspacing="3" cellpadding="1" align="center">
<tr valign="top">
<td>
<h1>CONFERMA</h1>
<p> </p>
<p><font face="Verdana, Arial, Helvetica, sans-serif" size="2"> <br>
</font><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Il
messaggio è stato inoltrato alla destinazine.</font></p>
<p><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Controllare
la propria casella di posta elettronica per ulteriori istruzioni.</font></p>
<p><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Grazie
!<br>
</font><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><br>
</font> </p>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
