AquaFX By Island Land Care

<% Response.Buffer=True if request.ServerVariables("REQUEST_METHOD") = "POST" then %> <% 'set iMsg = createobject("cdo.message") 'set iconf = createobject("cdo.configuration") ' 'Set Flds = iConf.Fields 'With Flds '.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 '.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1" '.Update 'End With ' ' ' iMsg.From = Request.Form("txtEmail") ' iMsg.To = "islandlandcare@aol.com" ' ' ' Set iMsg.Configuration = iConf ' ' iMsg.Subject = "Contact Form Response" ' ' iMsg.HTMLBody = "" & _ ' "Name: " & Request("txtName") & "
" & _ ' "E-mail Address: " & Request("txtEmail") & "
" & _ ' "Address: " & Request("txtAddress") & "
" & Request("txtAddress2") & "
" & _ ' "City:" & Request("txtCity") & "
" & _ ' "State:" & Request("selectName") & "
" & _ ' "Zip:" & Request("txtZip") & "
" & _ ' "Phone: (" & Request("txtPhoneAreaCode") & ")" & Request("txtPhoneExchange") & "-" & Request("txtPhoneSuffix") & "
" & _ ' "Best Time To Call:" & Request("txtTime") & Request("radMeridian") & "
" & _ ' "Other:" & Request("txtOther") & "
" & _ ' ' iMsg.fields.update ' iMsg.Send ' ' ' sResponse = "

Thank you for contacting us. We realize that you have many choices in landscape and aquascape design, and thank you for giving us the opportunity to serve you. Please know that we have received your request and will contact you within 24-48 hours. We look forward to assessing your needs!

- The Island Land Care Team.

" ' ' set iMsg = nothing ' set iconf = nothing Set objMail=Server.CreateObject("JMail.SMTPMail") objMail.Subject="Contact Form Response" objMail.Body="Name: " & Request("txtName") & vbCrLf &_ "E-mail Address: " & Request("txtEmail") & vbCrLf &_ "Address: " & Request("txtAddress") & " " & Request("txtAddress2") & vbCrLf &_ "City:" & Request("txtCity") & vbCrLf &_ "State:" & Request("selectName") & vbCrLf &_ "Zip:" & Request("txtZip") & vbCrLf &_ "Phone: (" & Request("txtPhoneAreaCode") & ")" & Request("txtPhoneExchange") & "-" & Request("txtPhoneSuffix") & vbCrLf &_ "Best Time To Call:" & Request("txtTime") & Request("radMeridian") & vbCrLf &_ "Interested In: " & Request("Requested_Service") & vbCrLf & _ "Other:" & Request("txtOther") objMail.Sender="aquafx@optonline.net" objMail.AddRecipient "aquafx@optonline.net" ' objMail.AddRecipient "jay@liweb.net" objMail.ServerAddress="mail.liweddings.com" objMail.Execute Set objMail=Nothing Response.Redirect("thankyou.asp") end if %> AquaFX By Island Land Care - Contact Us

" method="post">

<% if len(sResponse) > 0 then response.write(sResponse) Response.end end if %>

Thank you for showing interest in our services. Please complete the form below and a representative will contact you.

* Indicates Required Contact Information

Name:*
Address:


City:
State:
Zip Code
Phone:*
-
Best Time to Call:	- AM PM
E-mail address:*
Desired Service(s):	Natural Waterfalls / Ponds Custom Masonry Landscape Design Game Courts Accent Night Lighting Retaining Walls Site Planning Putting Greens Ponds For Kids
Other:

Jeff, You have been a joy to work with. You listened to what we wanted, made constructive suggestions, and delivered a magnificent finished product. On top that you have stood behind your work. I wish every tradesman had your commitment to quality work and customer satisfaction. Thanks for a job well done!"

- Barry R & Dorothy R Bienen