Blondett s.r.l. - dal 1964 serramenti metallici
<% inviacancella = request.querystring("ic") if inviacancella=1 then Dim accettaprivacy Set Mailer = Server.CreateObject("SMTPsvg.Mailer") accettaprivacy=Request.Form("radioa") Mailer.FromName = Request.Form("textfield") Mailer.FromAddress= Request.Form("email") If accettaprivacy="true" Then Mailer.RemoteHost = "whost3.alicomitalia.it" Mailer.AddRecipient "Blondett s.r.l.", "info@blondett.it" Mailer.Subject = "Richiesta informazioni da sito web" Mailer.BodyText = "*****RICHIESTA INFORMAZIONI DA SITO WEB******" & VbCrLf & VbCrLf &"Nome e Cognome:" & VbCrLf & Request.Form("textfield") & VbCrLf & VbCrLf &"Testo del Messaggio:" & VbCrLf & Request.Form("textfield2") if Mailer.SendMail then Response.Write "L'operazione è stata eseguita con successo!" inviacancella=0 nomecognome="" mail="" messaggio= "" else Response.Write "ERRORE! Controllare che il campo e-mail sia corretto!" inviacancella=0 nomecognome=Request.Form("textfield") mail=Request.Form("email") messaggio= Request.Form("textfield2") end if else Response.Write "Impossibile spedire il messaggio se non si accetta l'informativa sulla Privacy." inviacancella=0 nomecognome=Request.Form("textfield") mail=Request.Form("email") messaggio= Request.Form("textfield2") end if else Response.Write " " end if %>
Nome Cognome:
(*) e-mail:
Messaggio:
Privacy:
  Accetto Non Accetto
   
 
Blondett s.r.l.
Via Chiaravagna, 70R
16153 Genova
Tel. 010.6519735
Fax 010.6590602
E-mail
 
   
Showroom Genova Sestri P.

Via Chiaravagna, 86R
16153 Genova
 



 
il campo (*) è obbligatorio