% Option Explicit Dim objNewMail Set objNewMail = Server.CreateObject("CDONTS.NewMail") objNewMail.From = "admin@labwel.com" objNewMail.To = "info@labwel.com" objNewMail.Value("Reply-To") = Request.Form.Item("S_email") objNewMail.Subject = "Enquiry from website - labwel.com" objNewMail.Body = "
Enquiry from www.labwel.com | |
Name: | " & Request.Form.Item("name") & vbCrLf &_ " |
Company Name: | " & Request.Form.Item("S_organization") & vbCrLf &_ " |
Address: | " & Request.Form.Item("S_streetaddress")& vbCrLf &_ " |
City: | " & Request.Form.Item("S_city") & vbCrLf &_ " |
Pin: | " & Request.Form.Item("S_pin") & vbCrLf &_ " |
Country: | "& Request.Form.Item("S_country") & vbCrLf &_ " |
Email: | "& Request.Form.Item("S_email") & vbCrLf &_ " |
Phone: | "& Request.Form.Item("S_phone") & vbCrLf &_ " |
Fax: | "& Request.Form.Item("S_fax") & vbCrLf &_ " |
Comments: | "& Request.Form.Item("mess") & vbCrLf &_ " |