<% if Request.Form("azione") = "invia" then 'CONTROLLO ERRORI errore = "" if Request.Form("01M-Nome") > "" then errore = errore & "0" else errore = errore & "1" if Request.Form("09M-Email") > "" then errore = errore & "0" else errore = errore & "1" if errore = "00" then mail = "" mail = mail & "Richiesta contatti da web" & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Nome e Cognome : " & chr(13) & chr(10) mail = mail & Request.Form("01M-Nome") & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Azienda : " & chr(13) & chr(10) mail = mail & Request.Form("02-Azienda") & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Indirizzo : " & chr(13) & chr(10) mail = mail & Request.Form("03-Indirizzo") & chr(13) & chr(10) mail = mail & chr(13) & chr(10) mail = mail & "CAP : " & chr(13) & chr(10) mail = mail & Request.Form("04-CAP") & chr(13) & chr(10) mail = mail & chr(13) & chr(10) mail = mail & "Località : " & chr(13) & chr(10) mail = mail & Request.Form("05-luogo") & chr(13) & chr(10) mail = mail & chr(13) & chr(10) mail = mail & "Provincia : " & chr(13) & chr(10) mail = mail & Request.Form("06-provincia") & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Telefono : " & chr(13) & chr(10) mail = mail & Request.Form("07-telefono") & chr(13) & chr(10) mail = mail & chr(13) & chr(10) mail = mail & "Numero Fax : " & chr(13) & chr(10) mail = mail & Request.Form("08-Fax") & chr(13) & chr(10) mail = mail & chr(13) & chr(10) mail = mail & "Indirizzo E-mail : " & chr(13) & chr(10) mail = mail & Request.Form("09M-Email") & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Testo richiesta : " & chr(13) & chr(10) mail = mail & Request.Form("11-Testo") & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) mail = mail & "Data : " & formatDateTime(date() , vblongDate) & chr(13) & chr(10) mail = mail & "Ora : " & formatDateTime(time() , vblongTime) & chr(13) & chr(10) mail = mail & "------------------------------" & chr(13) & chr(10) dim posta set posta = server.createobject("CDONTS.newmail") posta.From = "info@daryestintori.it" posta.to = "info@daryestintori.it" posta.subject = "Informazioni da Web" posta.bodyformat = 1 posta.mailformat = 1 posta.body = mail posta.importance = 1 posta.send set posta = nothing 'QUI METTERE LA PAGINA DI RISPOSTA ALL'INVIO response.redirect("grazie.html") else response.redirect("errore.html") end if end if %> Dary Estintori materiale antincendio - Milano - Contatti
DARY ESTINTORI

Antincendio - Antinfortunistica - Noleggio - Vendita - Revisioni - Assistenza Tecnica - Verifica semestrale

Contatti
I campi sottolineati sono obbligatori
Nome e Cognome
Azienda
Indirizzo
Cap
Località
Provincia
Numero Telefono
Numero Fax
Indirizzo E-Mail

 

Inserite qui un messaggio di richiesta informazioni:


Autorizzo il trattamento dei dati personali secondo il D.Lgs 196/2003

Informiamo che ai sensi dell'art. 10 della legge 675/1996 recante la "Tutela della Privacy" la raccolta e i trattamenti dei dati personali devono essere autorizzati dai soggetti interessati. Desideriamo quindi informarvi che i dati personali raccolti nel modulo da voi compilato saranno soggetti di trattamento informatico o manuale per finalità statistiche sul traffico del sito "daryestintori.it" e per attività informativa su tutte le novità dei nostri prodotti e promozioni, per ricevere informazioni commerciali dalle aziende del circuito, per soddisfare le vostre richieste di informazioni.