If you have any questions or are in need of assistance, feel free to contact us by using the form below.
<%if request.querystring("go") = "1" then%>
<%BodyText = BodyText & vbcrlf & "Name: " & request.form("Name") & _
vbcrlf & "Company: " & request.form("Company") & _
vbcrlf & "Phone: " & request.form("Phone") & _
vbcrlf & "Email: " & request.form("Email") & _
vbcrlf & "Subject: " & request.form("Subject") & _
vbcrlf & vbcrlf & request.form("Comments")
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = request.form("name")
if request.form("email") = "" or instr(request.form("email"),"@") = 0 then
Mailer.FromAddress = "cici@beencouraged.net"
else
Mailer.FromAddress = request.form("Email")
end if
Mailer.RemoteHost = "mail.addisontech.com"
Mailer.AddRecipient "cici@beencouraged.net", "cici@beencouraged.net"
Mailer.AddBCC "contactform@addisontech.com", "contactform@addisontech.com"
Mailer.Subject = "BeEncouraged.net Book Engagement Form"
Mailer.BodyText = BodyText
if Mailer.SendMail then%>
Thank you for taking the time to contact us.
Your message has been received.
<%end if%>
<%set Mailer=nothing%>
<%else%>
<%end if%>