<% Set msg = Server.CreateObject("CDO.Message" ) msg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 'Name or IP of remote SMTP server msg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="67.227.184.10" 'Server port msg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 msg.Configuration.Fields.Update msg.From = Request("email") msg.Subject = "General Enquiry" msg.To = "archana@expertentity.com" strBody="" strBody=strBody &"

First Name: "&Request("firstname")&"

"&vbnewline strBody=strBody &"

Last Name: "&Request("lastname")&"

"&vbnewline strBody=strBody &"

Company: "&Request("company")&"

"&vbnewline strBody=strBody &"

Job Titile: "&Request("jobtitile")&"

"&vbnewline strBody=strBody &"

Type of Business: "&Request("business")&"

"&vbnewline strBody=strBody &"

Email: "&Request("email")&"

"&vbnewline strBody=strBody &"

Phone: "&Request("phone")&"

"&vbnewline strBody=strBody &"

Fax: "&Request("fax")&"

"&vbnewline strBody=strBody &"

Street: "&Request("street")&"

"&vbnewline strBody=strBody &"

City: "&Request("city")&"

"&vbnewline strBody=strBody &"

State/Region: "&Request("state")&"

"&vbnewline strBody=strBody &"

Post/Zip code: "&Request("pcode")&"

"&vbnewline strBody=strBody &"

Country: "&Request("country")&"

"&vbnewline strBody=strBody &"

Where did you hear about us?: "&Request("myOptions")&"

"&vbnewline strBody=strBody &"

Comments/Questions: "&Request("comments")&"

"&vbnewline strBody=strBody &"

Products/Services of interest: "&Request("interest")&"

"&vbnewline strBody=strBody&"" msg.HTMLBody = strBody msg.Send Set msg = Nothing Response.redirect("thankyou-for-general-enguiry.html") %>