<% if request("form1")="1" then Dim ObjSendMail Dim iConf Dim Flds Set ObjSendMail = Server.CreateObject("CDO.Message") Set iConf = CreateObject("CDO.Configuration") Set Flds = iConf.Fields Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 '**** Path below may need to be changed if it is not correct Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\inetpub\mailroot\pickup" Flds.Update Set ObjSendMail.Configuration = iConf ObjSendMail.To = "john@mtsterlingconstruction.com" ObjSendMail.Subject = "Website Form Submission" ObjSendMail.From = Request("Email") & "(" & Request("Name") & ")" ' we are sending a text email.. simply switch the comments around to send an html email instead strBody = "Name: " & Request("Name") & "
" strBody = "Name: " & Request("Name") & "
" strBody = strBody & "Phone Number: " & Request("Phone") & "
" strBody = strBody & "Email: " & Request("Email") & "
" strBody = strBody & "Address: " & Request("Address") & "
City, ST Zip: " & Request("City") & ", " & Request("State") & " " & Request("Zip") & "
" strBody = strBody & "Comments: " & Request("Comments") ObjSendMail.HTMLBody = strBody 'ObjSendMail.TextBody = strBody ObjSendMail.Send Set ObjSendMail = Nothing end if %> Mt Sterling Custom Homes - Building Quality Homes throughout Cache Valley
 
925 W 200 N Ste A5 • Logan, UT 84321
1-435-752-1480
Briefcase

Ask the Experts

<%if request("form1")="1" then%>
Thank you. Your question has been received.
<%end if%>

We know that building a home can be confusing at times, and it usually doesn’t help when contractors use terms that are hard to understand. With Mt Sterling’s glossary of common construction terms, you’re just a few clicks away from making a little more sense of it all. If you can’t find what you’re looking for, just drop us a line and we’ll be happy to answer your questions.

  * indicates required field
Name: *
Phone Number: *
Address:
City:
State:
Zip:
Email: *
Question: *