<% If request.form("name") <> "" Then body = "" & vbCrLf body = body _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" _ & "" & vbCrLf body = body & "

Someone has sent a message via the Boyer Young website:

Name: " & Request.Form("name") & "

Email: " & Request.Form("email") & "

Phone: " & Request.Form("phone") & "

Address: " & Request.Form("address") & "

City: " & Request.Form("city") & "

State: " & Request.Form("state") & "

Zip: " & Request.Form("zip") & "

Interested in: " & Request.Form("interested") & "

Comments: " & Request.Form("comments") & "

" & vbCrLf set cdoMessage = Server.CreateObject("CDO.Message") set cdoConfig = Server.CreateObject("CDO.Configuration") cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "MAILSERVER" cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") ="SMTPUSER" cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="SMTPPASS" set cdoMessage.Configuration = cdoConfig cdoMessage.From = "no-reply@boyeryoung.com" cdoMessage.ReplyTo = request.form("email") cdoMessage.To = "kyoung@boyeryoung.com" cdoMessage.Subject = "Boyer Young contact form" cdoMessage.HtmlBody = body cdoMessage.Send End If If request.querystring("mls") <> "" Then Set cn = Server.CreateObject("ADODB.Connection") cn.Open "Driver={mySQL ODBC 3.51 Driver};Server=SERVERNAME;Database=DBNAME;uid=DBUSER;pwd=DBPASS;" SQL = "SELECT StreetNum, StreetDir, StreetName, StreetSuffix FROM mls_univ WHERE MLS_no = "& request.querystring("mls") &";" Set rs = cn.Execute(sql) If NOT rs.EOF Then address = ": " & rs("StreetNum") & " " & rs("StreetDir") & " " & rs("StreetName") & " " & rs("StreetSuffix") End If End If %> Boyer Young | Omaha-area Land Development

Contact Us

<% If request.form("name") <> "" Then %>

Thank You!

Your information has been sent. Please expect a response soon.

<% Else %>

Boyer Young Development Company
9719 Giles Road
LaVista, NE USA 68128

Phone: (402) 334-3690
FAX: (402) 334-3688

Contact Info
Name:
Email:
Phone:
Address:
City:
State:
Zip Code:

How Did You Hear About Us?

I Am Interested In...
	Purchasing a home site
	Getting more information about:

Questions or Comments

Your email address and personal information will never be shared with or sold to any third parties. We never spam or send unsolicited messages.

<% End If %>