<%@ 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!

  







All good ideas start in the sandbox!

Sometimes a great idea begins in the most unusual place. As moms of school age children, we all agreed on one thing - the importance of nutrition in our children's daily lives. We also recognized how hectic today's lives can be. Thus was born - Lunch Moms Inc.
  • Fatima loves being a mom to a eleven year old boy and a nine year old girl. Working outside the home meant finding something that was flexible and allowed her to work around the hectic life of her family. She loves to cook homemade meals for her family and brings her authentic recipes to share with other families. Your kids will be glad you ordered!

  • Nadia is kept busy with two little boys aged ten and six. She too decided to leave the corporate world to find something that allowed her to work around the schedules of her family. She loves being "her children's mom" and thinks Lunch Moms Inc. is a wonderful way to pass on her love for children and a warm home cooked meal.

And to think we were making sandcastles when we came up with the idea!
 
Copyright © 2008 Lunch Moms Inc.
info@lunchmomsinc.com
(905) 461-KIDS (5437)

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