Fattoria l'Amorosa

<%@LANGUAGE="VBSCRIPT"%> <% session.lcid=2064 ' ---- check per verificare i campi obbligatori Dim liValidate If request.form("send") = "1" then liValidate = true if request.form("sname") = "" then lsError_nome = "First name*" liValidate = false end if if request.form("ssurname") = "" then lsError_cognome = "Family name*" liValidate = false end if end if if request("send") = "1" and livalidate then 'spedisco l'email if request.form("semail") = "" then varEmail="info@amorosa.ch" else varEmail=trim(request.form("semail")) end if Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From = varEmail objMail.To = "info@amorosa.ch" objMail.Subject = "Contatto - www.amorosa.ch - EN" objMail.Body = _ "Nome: " & request.form("sname") & vbCrLf & _ "Cognome: " & request.form("ssurname") & vbCrLf & _ "Telefono: " & request.form("stel") & vbCrLf & _ "E-mail: " & request.form("semail") & vbCrLf & _ "Messaggio: " & request.form("snote") objMail.importance = 1 objMail.Send Set objMail = nothing response.redirect("grazie.asp") end if %> Fattoria l'Amorosa | Contact

Fattoria l’Amorosa
Via Moyar
6514 Sementina-Gudo
phone +41 (0)91 840 29 50
fax +41 (0)91 840 29 51

From the 1st November until the 31st of March the Restaurant is closed on Sunday evening and on Monday the whole day.

<% if 1=2 then %>

<% if lsError_nome ="" then response.write "First name*" else response.write lsError_nome end if %>	">
<% if lsError_cognome ="" then response.write "Family name*" else response.write lsError_cognome end if %>	">
Telephone	">
E-mail	">
Message	<%=request.form("snote")%>

<% end if %>