%@ Language="VBScript" %> <% if Request.QueryString("azione") = "vai" then Dim mail Dim mailBody Dim mailName Dim mailSurname Dim mailPhone Dim mailFax Dim mailMail Dim mailCity Dim mailCompany Dim mailPosition Dim mailAddress Dim mailZip Dim mailState Dim mailGrmm Dim mailMm Dim mailMt Dim mailMt2 Dim mailTemput Dim mailRiut Dim mailUv Dim mailColor Dim mailSpecs Dim mailAltro Dim mailIp Set mail = server.CreateObject("CDONTS.NewMail") mailName = Request.Form("nome") mailSurname = Request.Form("surname") mailPhone = Request.Form("phone") mailFax = Request.Form("fax") mailMail = Request.Form("mail") mailCity = Request.Form("city") mailCompany = Request.Form("company") mailPosition = Request.Form("position") mailAddress = Request.Form("address") mailZip = Request.Form("zip") mailState = Request.Form("state") if Request.Form("cc1") = "no" then mailGrmm = Request.Form("select1") else mailGrmm = Request.Form("grm") End if if Request.Form("cc2") = "no" then mailMm = Request.Form("select2") else mailMm = Request.Form("mm") End if mailMt = Request.Form("mt") mailMt2 = Request.Form("mt2") mailTemput = Request.Form("cons") mailRiut = Request.Form("riutilizzo") mailUv = Request.Form("uv") mailSpecs = Request.Form("specs") mailColor = Request.Form("colors") mailAltro = Request.Form("textarea") mailIp = Request.ServerVariables("REMOTE_ADDR") mailBody = "
REQUEST INFORMATION ABOUT AGRIBOND
" mailBody = mailBody & "| Name: | " mailBody = mailBody & "" & mailName & " |
| Surname: | " mailBody = mailBody & "" & mailSurname & " |
| Company: | " mailBody = mailBody & "" & mailCompany & " |
| Position: | " mailBody = mailBody & "" & mailPosition & " |
| Address: | " mailBody = mailBody & "" & mailAddress & " |
| ZIP code: | " mailBody = mailBody & "" & mailZip & " |
| City: | " mailBody = mailBody & "" & mailCity & " |
| State: | " mailBody = mailBody & "" & mailState & " |
| Phone: | " mailBody = mailBody & "" & mailPhone & " |
| Fax: | " mailBody = mailBody & "" & mailFax & " |
| E-mail: | " mailBody = mailBody & "" & mailMail & " |
| G/mē: | " mailBody = mailBody & "" & mailGrmm & " |
| Mm: | " mailBody = mailBody & "" & mailMm & " |
| Mt: | " mailBody = mailBody & "" & mailMt & " |
| Tempi utilizzo: | " mailBody = mailBody & "" & mailTemput & " |
| Riutilizzo: | " mailBody = mailBody & "" & mailRiut & " |
| % UV: | " mailBody = mailBody & "" & mailUv & " |
| Colors: | " mailBody = mailBody & "" & mailColor & " |
| Technical specs: | " mailBody = mailBody & "" & mailSpecs & " |
| Richieste particolari: | " mailBody = mailBody & "" & mailAltro & " |
| IP address: | " mailBody = mailBody & "" & mailIp & " |