<% strHost = "localhost" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress Request("To") ' message subject Mail.Subject = Request("Subject") ' message body ' LEGGO LE VARIABILI DELLA FORM Rapr = Request("rapr") Impo = Request("impo") Cognome1 = Request("cognome1") Nome1 = Request("nome1") Occupazione = Request("occupazione") Via1 = Request("via1") CAP1 = Request("cap1") Citta1 = Request("citta1") Nazione1 = Request("nazione1") Messaggio1 = Request("messaggio1") Telefono1 = Request("telefono1") Fax1 = Request("fax1") from1 = Request("from1") Messaggio1 = Request("messaggio1") Azienda = Request("Azienda") Attivita = Request("attivita") Cognome2 = Request("cognome2") Nome2 = Request("nome2") Via2 = Request("via2") CAP2 = Request("cap2") citta2 = Request("citta2") Nazione2 = Request("nazione2") Telefono2 = Request("telefono2") Fax2 = Request("fax2") From2 = Request("from2") Messaggio2 = Request("messaggio2") Corpo = "Rappresentante: " & rapr & " " & "Importatore:" & impo & chr(13) & chr(10) & "-- Singolo --" & chr(13) & chr(10) & "Cognome: " & cognome1 & " " & "Nome: " & nome1 & " " & "Occupazione: " & occupazione & chr(13) & chr(10) & "Via: " & via1 & chr(13) & chr(10) & "CAP: " & cap1 & " " & "Città: " & citta1 & " " & "Nazione: " & nazione1 & chr(13) & chr(10) & "Telefono: " & telefono1 &" " & "Fax: " & fax1 & " " & "E-mail: " & from1 & chr(13) & chr(10) & "Messaggio: " & chr(13) & chr(10) & messaggio1 & chr(13) & chr(10) & chr(13) & chr(10) & "-- Azienda --" & chr(13) & chr(10) & "Azienda: " & azienda & " " & "Attività: " & attivita & chr(13) & chr(10) & "Cognome: " & cognome2 & " " & "Nome: " & nome2 & chr(13) & chr(10) & "Via: " & via2 & " " & "CAP: " & cap2 & " " & "Città: " & citta2 & " " & "Nazione: " & nazione2 & chr(13) & chr(10) & "Telefono: " & telefono2 & " " & "Fax: " & fax2 & " " & "E-Mail: " & from2 & chr(13) & chr(10) & chr(13) & chr(10) & "Messaggio: " & chr(13) & chr(10) & messaggio2 & chr(13) & chr(10) Mail.Body = corpo cono = cognome1 & " " & nome1 & " - " & cognome2 & " " & nome2 Mail.FromName = cono strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %> ZOE - Information request form for representatives and importers

<% If strErr <> "" Then %>

Error occurred: <% = strErr %>

<% End If %> <% If bSuccess Then %>

Messaggio inviato correttamente, Grazie per averci Contattato

<% End If %>

   Information request form for representatives and importers.

I’d like to have more detailed information about your conditions for vacancies as:

Representatives  Importers 

 

I’m a free-lance:

First name:
 Surname:
Business kind:
Street:
 Postcode:
Town:
 Country:
Message:

 
I’d like to be contacted by:
Telephone:
Fax:
E-mail:
 

 

 

We are a business

Company:
 Business kind:
Person in charge:
First name:
 Surname:
Street:
 Postcode:
Town:
 Country:
Message:

 
We’d like to be contacted by:
Telephone:
Fax:
E-mail:
 

   

 

     According to the law 675/96, the data are collected in order to record the applicants and will be processed electronically according to the laws in force. The data transfer is compulsory, as confirmation of the truth of the sent message.
The applicant has the rights foreseen by the Art. 13, Law 675/96.
Owner and person in charge of the collected data is ZOE of Gola Giovanna - Artigianato Artistico Italiano via Tasselli, 69 46045 Marmirolo Mantova Italy. Tel.+390376324373, Fax.+39376299182. e-mail: zoe@zoe.it

The applicant, according to the l.675/96 gives its permission to the electronic data processing.

 
 

Zòe di Gola Giovanna
- ARTIGIANATO ARTISTICO ITALIANO -
via Tasselli n°69 - 46045 - Marmirolo MANTUA (Italy)
Tel. +39 0376 294527 - Fax +39 0376 299182 E-mail: info@zoe.it