form contatti

**evetta** · 28-06-2007, 11:02

mi sapete dire dove sta l'errore che non funziona il form? non mi da nessun tipo di errore ma il form non va....

codice:

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

on error resume next
'Set variables
Dim BackURL
Dim strName
Dim strEmail
Dim strSubject
Dim strMessage
Dim strUserIP
Dim strToEmail
Dim daCdoMail

'Replace this email with your real email id
strToEmail = "info@mmad.it"
BackURL = Request.ServerVariables("HTTP_REFERER")
strName = Request.form("Name")
strEmail = Request.form("Email")
strSubject = Request.form("Subject")
strMessage = Request.form("Message")
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"">Questo messaggio è stato inviato da " & strName & " il " & Now() & ". </font>

" & strMessage
'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") = "Il messaggio non può essere inviato. È necessario compilare tutti i campi."
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") = "La Vostra richiesta di informazioni è stat inviata correttamente. Grazie."
'Redirect and show the result
Response.redirect (BackURL)
End Select
%>
<html>
<head>
<title>Bios | Consulenza, Formazione e Analisi</title>
<meta http-equiv="Content-Type" content="text/html;">
<meta name="description" content="FW MX DW MX HTML">
<SCRIPT language=javascript>
function check()
{
	if (document.myform.Name.value.length==0)
		{
			alert("Compilare il cmapo nome");
			document.myform.Name.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("Deve essere inserito un indirizzo email valido")
			document.myform.Email.focus();
		}
	 	else if (document.myform.Subject[document.myform.Subject.selectedIndex].value.length==0)
			{
			alert("Compilare il campo oggetto");
			document.myform.Subject.focus();
		}
	else if(document.myform.Message.value==0)
		{
		alert("Compilare il corpo del messaggio");
		document.myform.Message.focus();
		}

	else
		{
		document.myform.submit()
		}
}
</SCRIPT>
<link rel="stylesheet" type="text/css" media="all" href="style.css" />
</head>
<body bgcolor="#ffffff">







<table border="0" cellpadding="0" cellspacing="0" width="800" align="center">

  <tr>

   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
   <td>[img]spacer.gif[/img]</td>
  </tr>

  <tr>
    <td rowspan="14" bgcolor="#c8dda4"></td>
   <td background="index_r1_c2.jpg"></td>
    <td rowspan="14" background="index_r1_c3.jpg"></td>
    <td colspan="9" bgcolor="#FFFFFF"></td>
    <td rowspan="14" bgcolor="#FFFFFF"></td>
    <td>[img]index_r1_c15.jpg[/img]</td>
    <td rowspan="14" bgcolor="#c8dda4"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td bgcolor="#72ac22">[img]index_r2_c2.jpg[/img]</td>
   <td rowspan="2" colspan="9">[img]index_r2_c4.jpg[/img]</td>
    <td rowspan="12"  bgcolor="#72ac22"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="6"bgcolor="#72ac22" valign="bottom"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
   <td colspan="9" >[img]consulenza_r4_c4.jpg[/img]</td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="2" bgcolor="#FFFFFF"></td>
    <td rowspan="8" background="consulenza_r5_c5.jpg"></td>
    <td colspan="2" bgcolor="#FFFFFF"></td>
    <td colspan="4" bgcolor="#FFFFFF"><p class="sede">CONTATTI</p></td>
    <td  bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="7" colspan="2" bgcolor="#FFFFFF"></td>
    <td rowspan="6" colspan="4"  bgcolor="#FFFFFF" valign="top">
	<%If Session("msgSent") = "" Then%>
<table cellSpacing="1" border="0" bordercolor="#111111" id="table1">
    <form action="Contact.asp?Action=Send" method="post" name="myform">

   <tr>
            <td colspan="2"><p class="corpo">Per eventuali chiarimenti o per richiedere informazioni, 
              Vi invitiamo a compilare l'apposito form.</p></td>
    </tr>
    <%If Session("msg") <> "" Then%>
   <tr>
    <td colspan="2">
	<p class="corpo"><%=Session("msg")%></p></td>
    </tr>
    <%End If%>
   <tr>
    <td colspan="2">
	</td>
    </tr>
  <tr>
            <td class="nortex"><p class="corpo">Nome</p></td>
    <td class="nortex">
    <input maxLength="25" size="25" name="Name" value="<%= Request.form("Name") %>"></td></tr>
  <tr>
    <td class="nortex"><p class="corpo">email</p></span></td>
    <td class="nortex">
    <input maxLength="25" size="25" name="Email" value="<%= Request.form("Email") %>"></td></tr>
  <tr>
    <td class="nortex"><p class="corpo">Oggetto</p></td>
    <td class="nortex"> 
    <input maxLength="25" size="25" name="Name" value="<%= Request.form("Subject") %>"></td></tr>
  <tr>
    <td class="nortex" valign="top"><p class="corpo">Messaggio</p></td>
    <td class="nortex">
    <textarea name="Message" rows="12" cols="25"><%= Request.form("Message") %></textarea></td></tr>
   <tr>
    <td class="nortex"></td>
    <td class="nortex">
    <input onclick="check()" type="button" value="Invio messaggio" name="sendmessage" style="float: center; font-weight:bold"></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">
    
 
   <tr>
    <td align="right">
	<p class="corpo">Messaggio Inviato</p>
	</td>
    </tr>   
   <tr>
    <td>
	<p class="corpo"><%=Session("MsgSent")%></p>;</td>
    </tr>
   <tr>
    <td>
	
	
	</td></tr>
      </table>
<%End If
'Destroy session variables
Session("MsgSent") = ""
Session("msg") = ""
%>
	</td>
    <td rowspan="7" bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
   <td bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="2"bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="6" bgcolor="#72ac22" valign="bottom"><p align="right" class="claim">ti 
        insegnamo

        a trattarli al meglio</p>[img]index_r5_c2.jpg[/img]</td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td  bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td rowspan="2"bgcolor="#FFFFFF" valign="top"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td colspan="4" bgcolor="#FFFFFF"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
   <td colspan="9" background="consulenza_r13_c4.jpg"></td>
   <td>[img]spacer.gif[/img]</td>
  </tr>
  <tr>
    <td colspan="3" bgcolor="#FFFFFF"></td>
   <td colspan="2"  background="index_r7_c5.jpg"></td>
    <td bgcolor="#72ac22" align="center"><p class="menupiede"> 
      Home Page | Sede | Contatti</p></td>
    <td background="index_r7_c11.jpg"></td>
    <td colspan="2" bgcolor="#FFFFFF"></td>
<td>[img]index_r7_c15.jpg[/img]</td>
   <td>[img]spacer.gif[/img]</td>
  </tr>

</table>

</body>
</html>

Discussione: form contatti

Strumenti discussione

Ricerca discussione

Visualizza

Visualizzazione discussione

form contatti

Permessi di invio