Che cosa sbaglio nel recuperare questi dati?
Errore di compilazione di Microsoft VBScript error '800a0401'
Prevista fine istruzione
/email.asp, line 132
var azienda= new String(Request.Form("azienda"));
-----------------------^
codice:<% // Recupero i dati dal modulo var azienda= new String(Request.Form("azienda")); var cognome = new String(Request.Form("cognome")); var nome= new String(Request.Form("nome")); var telefono= new String(Request.Form("telefono")); var fax= new String(Request.Form("fax")); var email = new String(Request.Form("email")); var richiesta= new String(Request.Form("richiesta")); var trovato = new String(Request.Form("trovato")); // Recupero il campo Email var email = new String(Request.Form("email")); // Imposto l'espressione regolare per un indirizzo email var controlla = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-]{2,})+\.)+([a-zA-Z0-9]{2,})+$/; // Effettuo il controllo vero e proprio if (!controlla.test(email)) { Response.Write("<span class='testo'>L'indirizo email non è corretto!</span> <span class='link'>...torna al modulo<span>"); Response.End; } // Effettuo un banale controllo sulla validità dei campi if (cognome == "" || azienda == "" || email == "" || messaggio == "" || trovato == "") { Response.Write("<span class='testo'>Tutti i campi sono obbligatori</span> <span class='link'>...torna al modulo<span>"); Response.End; } messaggio = "Azienda: " &azienda& vbcrlf & vbcrlf &_ "Cognome: " &cognome& vbcrlf & vbcrlf &_ "Nome: " &nome& vbcrlf & vbcrlf &_ "Telefono: " &telefono& vbcrlf & vbcrlf &_ "Fax: " &fax& vbcrlf & vbcrlf &_ "E-mail: " &email& vbcrlf & vbcrlf &_ "Ci ha trovato: " &trovato& vbcrlf & vbcrlf &_ "Richiesta: " &richiesta& Dim Mail Mail = Server.CreateObject("CDO.Message") Mail.From = email Mail.To = "s.martini@webbiz.it" Mail.Subject = "Richiesta info dal sito" Mail.TextBody = messaggio Mail.Send() Mail=null Response.Write("Email inviata con successo! Vi risponderemo al più presto."); %>

Rispondi quotando