<% if trim(request("submit"))="Submit" then fromaddress=trim(request("email")) bodytext=trim(request("txtcontent")) subjecttext="Contact us from "& request("txtname") toaddress="oooadooo@aol.com" Dim objMail sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = Server.CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(sch & "sendusing") = 2 .Item(sch & "smtpserver") = "localhost" .update End With Set objMail = Server.CreateObject("CDO.Message") Set objMail.Configuration = cdoConfig objMail.From =fromaddress objMail.To =toaddress objMail.Subject= subjecttext objMail.TextBody = bodytext objMail.Send Set objMail = Nothing response.redirect "thanks.asp" end if %> Hostesses To Go - Full Service Party Planners Hostesses To Go - Full Service Party Planners

You can contact us by simply filling out the form below be sure to include your phone number and best time to call if you would like to be contacted by phone, or if you would like to talk with a party planner call us at: 1.718.948.8510

If you would like to inquire about booking an event please be sure to include event type, date and location.
name:
email:
phone:
i would like to:
comments: