<%
varcompany = Request("company")
varname = Request("name")
varemail = Request("email")
varcity = Request("city")
varstate = Request("state")
varphone = Request("phone")
varreqtype = Request("reqtype")
varcomments = Request("comments")
varmessage = "Company: " & varcompany & vbCrLf & "Name: " & varname & vbCrLf & "Email: " & varemail & vbCrLf & "Phone: " & varphone & vbCrLf & "City: " & varcity & vbCrLf & "State: " & varstate & vbCrLf & "Request Type: " & varreqtype & vbCrLf & "Comments: " & varcomments & vbCrLf
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.pazdigital.com"
JMail.ContentType = "text/plain"
JMail.Sender = "YOUR EMAIL ADDRESS"
JMail.SenderName = "YOUR NAME"
JMail.ReplyTo = varemail
JMail.Subject = "Contact Us from: " & varname
JMail.AddRecipient "YOUR EMAIL ADDRESS"
JMail.Body = varmessage
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
set JMail = Nothing
response.Write ("Thank you for your submission.")
%>