Advertisement Info  
NY Events Calendar  
New Coupons/Specials 
Classes & Courses  
 Online Videos  
NY Wellness Blog  
  User Forums  
Friends Network  
Natural Health News  
Add Listings  
Add Content  
NY Tees & Gifts  
Free Date NY  
Contact  



 New York Wellness Calendar 
 View NY Events
 Add Your Event

Community Forum
Daily Horoscope
Free Online Games
Free e-Cards
Add Events

If you know of any wellness related events taking place in New York araa, please let us know.
Feel free to suggest a new category. We'll gladly add your information for you.

As always, we welcome your feedback, comments, and suggestions.


<% ELSE %>
<% IF request.Form("submitform")<>"yes" THEN %>
Your Name:
Event Title:
Type of Event:
If other explain below.
Event Date:
Event Time:
Address:
Phone:
Website:
Email:
Cost:
Please add me to the NYWellnessGuide mailing list so I can receive monthly newsletter with web site updates, special offers, local wellness events and other useful information. You must enter your e-mail address to join! We appreciate our readers and honor their privacy; we promise not to sell, rent, or share your information with anyone else. (Previous Newsletters: 09.05 )
Brief Description:  
Thank you for sending the following information:

If you're interested in additional information, other types of listings or affordable web design, please click here.


Contact Name: <%=Request.Form("userName")%>
Event Title: <%=Request.Form("EventTitle")%>
Event Type: <%=Request.Form("EventType")%>
Event Date: <%=Request.Form("EventDate")%>
Event Time: <%=Request.Form("EventTime")%>
Event Address: <%=Request.Form("EventAddress")%>
Phone: <%=Request.Form("EventPhone")%>
Website: <%=Request.Form("EventWebsite")%>
Email: <%=Request.Form("EventEmail")%>
Cost: <%=Request.Form("EventPrice")%>
Newsletter: <%=Request.Form("Newsletter-Signup")%>
Description: <%=Request.Form("EventDescription")%>
<% IF Request.Form("understand")="Yes" THEN Response.Write"" ELSE Response.Write"

" END IF Response.Write"Thank you for your contribution. Yoor submission will be posted within 24 hours." Set MyCDONTSMail = CreateObject("CDONTS.NewMail") MyCDONTSMail.From= "ultratonic@gmail.com" ' ****************************************************** ' change the email address below to whoever you want the email to go to ' ****************************************************** MyCDONTSMail.To= "ultratonic@gmail.com" MyCDONTSMail.Subject="Events Calendar Submsission" MyBody = Request.Form("userName") & " has sent an email." & vbCrLf MyBody = MyBody & "Event Title: " & Request.Form("EventTitle") & vbCrLf MyBody = MyBody & "Event Type: " & Request.Form("EventType") & vbCrLf MyBody = MyBody & "Event Date: " & Request.Form("EventDate") & vbCrLf MyBody = MyBody & "Event Time: " & Request.Form("EventTime") & vbCrLf MyBody = MyBody & "Event Address: " & Request.Form("EventAddress") & vbCrLf MyBody = MyBody & "Phone: " & Request.Form("EventPhone") & vbCrLf MyBody = MyBody & "Website: " & Request.Form("EventWebsite") & vbCrLf MyBody = MyBody & "Email: " & Request.Form("EventEmail") & vbCrLf MyBody = MyBody & "Cost: " & Request.Form("EventPrice") & vbCrLf MyBody = MyBody & "Newsletter Sign-Up: " & Request.Form("Newsletter-Signup") & vbCrLf MyBody = MyBody & "Description: " & Request.Form("EventDescription") & vbCrLf IF Request.Form("understand")="Yes" THEN MyBody = MyBody & "" & vbCrLf ELSE MyBody = MyBody & "" & vbCrLf END IF MyCDONTSMail.Body= MyBody MyCDONTSMail.Send set MyCDONTSMail=nothing END IF %>

If you have any questions/problems, you can email us at: info@nywellnessguide.com.

  >> Back to Main Page

Copyright©2004. All rights reserved. Webdesign by Ultratonic Designs. Contact Us.