Salve a tutti.
Mi ha affascinato l'articolo apparso su questo portale
http://www.lukeonweb.net/leggi.asp?id=98
dal titolo un semplice form inviato con cdonts.
Vengo al punto avevo intenzione di modificarlo inserendovi delle opzioni per sapere dal visitatore del mio sito come e' arrivato da me.
Questo il semplice form (vei codice sotto) che ho modificato con le opzioni inserite.
Il punto e' come modificare il file email.asp che invia il form cosi' come lo ho modificato affinche' inivii tutto il conenuto del form 8comrpese le opzioni che ho inserito.
Qualcuno mi puo' aiutare?
form.htm
-----------
<form method="post" action="email.asp">
Come ci hai trovato?
<tr>
<td width="20%"><input type="checkbox" name="C1" value="ON" checked>Motori
di ricerca</td>
<td width="20%"><input type="checkbox" name="C2" value="ON">Amici</td>
<td width="20%"><input type="checkbox" name="C3" value="ON">Colleghi</td>
<td width="20%"><input type="checkbox" name="C4" value="ON">Lavoro</td>
<td width="20%"><input type="checkbox" name="C5" value="ON">newsgroup</td>
</tr>
</table>
<p>Nome<br>
<input type="text" name="nome" size="20"><br>
Email<br>
<input type="text" name="email" size="20"><br>
Messaggio<br>
<textarea name="messaggio" rows="5" cols=30></textarea><br>
<input type="submit" value="Invia"> </p>
</form>
Come deve essere modificato il file email.asp originale che riporto sotto affinche' funzioni con le opzioni inserite?
email.asp
-------------
<%@LANGUAGE = JScript%>
<%
// Recupero i dati dal modulo
var nome = new String(Request.Form("nome"));
var email = new String(Request.Form("email"));
var messaggio = new String(Request.Form("messaggio"));
// Effettuo un banale controllo sulla validità dei campi
if (nome == "" || email == "" || messaggio == "") {
Response.Write("ERRORE: Tutti i cami sono obbligatori");
Response.End;
}
// Creo l'oggetto (o classe) CDONTS.NewMail
var OggettoCDONTS = new ActiveXObject("CDONTS.NewMail");
OggettoCDONTS.From = email; // Mittente
OggettoCDONTS.To = "[email protected]"; // Destinatario (inserisci la tua email)
OggettoCDONTS.Subject = "Messaggio da " + nome; // Oggetto
OggettoCDONTS.Body = messaggio; // Corpo
OggettoCDONTS.Send(); // Invio la mail
// Reindirizzo il mittente verso la pagina di conferma
Response.Redirect("inviata.htm");
%>
inviata.htm
COme fare visualizzare nel file inviata.htm i campi inseriti nella pagina form.htm (i contenuti che tra l'altro sono inviati in email)
Mi ha affascinato l'articolo apparso su questo portale
http://www.lukeonweb.net/leggi.asp?id=98
dal titolo un semplice form inviato con cdonts.
Vengo al punto avevo intenzione di modificarlo inserendovi delle opzioni per sapere dal visitatore del mio sito come e' arrivato da me.
Questo il semplice form (vei codice sotto) che ho modificato con le opzioni inserite.
Il punto e' come modificare il file email.asp che invia il form cosi' come lo ho modificato affinche' inivii tutto il conenuto del form 8comrpese le opzioni che ho inserito.
Qualcuno mi puo' aiutare?
form.htm
-----------
<form method="post" action="email.asp">
Come ci hai trovato?
<tr>
<td width="20%"><input type="checkbox" name="C1" value="ON" checked>Motori
di ricerca</td>
<td width="20%"><input type="checkbox" name="C2" value="ON">Amici</td>
<td width="20%"><input type="checkbox" name="C3" value="ON">Colleghi</td>
<td width="20%"><input type="checkbox" name="C4" value="ON">Lavoro</td>
<td width="20%"><input type="checkbox" name="C5" value="ON">newsgroup</td>
</tr>
</table>
<p>Nome<br>
<input type="text" name="nome" size="20"><br>
Email<br>
<input type="text" name="email" size="20"><br>
Messaggio<br>
<textarea name="messaggio" rows="5" cols=30></textarea><br>
<input type="submit" value="Invia"> </p>
</form>
Come deve essere modificato il file email.asp originale che riporto sotto affinche' funzioni con le opzioni inserite?
email.asp
-------------
<%@LANGUAGE = JScript%>
<%
// Recupero i dati dal modulo
var nome = new String(Request.Form("nome"));
var email = new String(Request.Form("email"));
var messaggio = new String(Request.Form("messaggio"));
// Effettuo un banale controllo sulla validità dei campi
if (nome == "" || email == "" || messaggio == "") {
Response.Write("ERRORE: Tutti i cami sono obbligatori");
Response.End;
}
// Creo l'oggetto (o classe) CDONTS.NewMail
var OggettoCDONTS = new ActiveXObject("CDONTS.NewMail");
OggettoCDONTS.From = email; // Mittente
OggettoCDONTS.To = "[email protected]"; // Destinatario (inserisci la tua email)
OggettoCDONTS.Subject = "Messaggio da " + nome; // Oggetto
OggettoCDONTS.Body = messaggio; // Corpo
OggettoCDONTS.Send(); // Invio la mail
// Reindirizzo il mittente verso la pagina di conferma
Response.Redirect("inviata.htm");
%>
inviata.htm
COme fare visualizzare nel file inviata.htm i campi inseriti nella pagina form.htm (i contenuti che tra l'altro sono inviati in email)