Lunch Moms Inc.- Delivering nutritious lunches to your children!

<%@ Language=VBScript %> <% dim action if Request.Form("ACT") = "SND" then dim objSMTP name = Request("name") age = Request("age") street_address = Request("street_address") street_address2 = Request("street_address2") city = Request("city") province = Request("province") pcode = Request("pcode") home_phone = Request("home_phone") work_phone = Request("work_phone") fax = Request("fax") email = Request("email") interested_in = Request("interested_in") horse_experience = Request("horse_experience") goals = Request("goals") location_description = Request("location_description") references = Request("references") set objSMTP = Server.CreateObject("Dynu.Email") objSMTP.Host = "192.168.11.10" objSMTP.From = email objSMTP.FromName = name objSMTP.Subject = "Contact Us Form" objSMTP.AddAddress "info@longrunretirement.com","LongRun Form" 'objSMTP.AddAddress "cindy@halex.com","LongRun Form" objSMTP.Body = "" ' Compose the Email Message StrBody = "The Following Lead Was Submitted From LongRunRetirement.com" & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Name : " & name & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Age : " & age & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Street Address : " & street_address & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Street Address 2 : " & street_address2 & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "City : " & city & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Province : " & province & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Postal Code : " & pcode & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Home Phone : " & home_phone & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Work Phone : " & work_phone & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Fax : " & fax & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Email : " & email & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Interested In : " & interested_in & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Horse Experience : " & horse_experience & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Goals : " & goals & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "Location and Description : " & location_description & Chr(13) & Chr(10) StrBody = StrBody & Chr(13) & Chr(10) StrBody = StrBody & "References : " & references & Chr(13) & Chr(10) objSMTP.Body = StrBody If objSMTP.Send() Then ERR = 0 Response.Redirect "confirmation.html" Else ERR = 1 End IF set objSMTP = nothing end if %> Lunch Moms Inc.- Delivering nutritious lunches to your children!

Interested in the menu for your school? We would be happy to email one to you!

Our menu options are rotated each month adding new and exciting options to go alongside our favourite selections! Take a peek at one of our menus and see what we've been cooking up this year!

How about having our hot nutritious lunches delivered to your child's school? You'll even earn valuable fundraising dollars for your school just
by ordering! Contact us to learn more.

Got a favourite food you want to see on our menu? Let us know. We would love to hear from you!

this site optimized for 800 X 600 (16 bit colour)
View Site Requirements