Baker Associates Contact Request Form

Thank you for your interest in Baker Associates. We appreciate the opportunity to earn your business and will contact you shortly in response to your request.

If you have any questions, please email questions@bakco.com



<% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") rem change this RemoteHost to a valid SMTP address before testing Mailer.RemoteHost = "mail.bakco.com" Mailer.FromName = "Baker Associates Web Site Inquiry" Mailer.FromAddress = "lturpin@bakco.com" Mailer.AddRecipient "Web Request", "lturpin@bakco.com" Mailer.Subject = "Request for Information" Mailer.BodyText = Request.Form("txtmsg") & "Agent First Name: " & Request.Form("Agent First Name") & chr(13) & "Agent Last Name: " & Request.Form("Agent Last Name") & chr(13) & "Agent Email: " & Request.Form("Agent Email") & chr(13) & "Agent Address: " & Request.Form("Address") & chr(13) & "City: " & Request.Form("City") & chr(13) & "State: " & Request.Form("State") & chr(13) & chr(13) & "Zip Code: " & Request.Form("Zip Code") & chr(13) & chr(13) & "Area Code: " & Request.Form("Area Code") & chr(13) & chr(13) & "Phone Number: " & Request.Form("Phone Number") & chr(13) & chr(13) & chr(13) & chr(13) & "Primary Market: " & Request.Form("Primary Mkt") & chr(13) & "Agent Comments: " & Request.Form("Agent Comments") & chr(13) & "Requested Information: " & Request.Form("Company Brochure") & chr(13) & "Requested Information: " & Request.Form("Contact me to discuss benefits") & chr(13) & "Requested Information: " & Request.Form("Contact me to discuss case or sales concept") if not Mailer.SendMail then Response.Write " Mailing Failed... Error is:
" Response.Write Mailer.Response else Response.Write " sent successfully...

" end if %>