Use the form below to contact by email.
<% dim submitted submitted=0 if Request.Form("submit") = "submit" then if Request.form("txtName") = "" or Request.form("txtEmail") = "" or Request.Form("txtPhone") = "" or Request.Form("txtMessage") = "" then Response.write "" else Set objMail = Server.CreateObject("CDONTS.Newmail") objmail.MailFormat = 0 objmail.BodyFormat = 0 objMail.To = "john@fullerarchitecture.com" objMail.From = "Request.form(txtEmail)" objmail.Subject = "Contact from Website" strBody = strBody & "" & vbCrLf strBody = strBody & "" & vbCrLf strBody = strBody & "" & vbCrLf strBody = strBody & "" & vbCrLf strBody = strBody & "
Name: " & request.Form("txtName") & "
Email: " & request.Form("txtEmail") & "
Phone:" & request.Form("txtPhone") & "
Message: " & request.Form("txtMessage") & "
" objMail.Body = strBody objMail.Send Set objMail = Nothing Response.write "" end if end if %>
Name:
Email:
Phone:
Message:
 
68 Court Square Suite 200 Mocksville, NC 27028 p:336.751.0400 f:336.751.1660