|
| |
Do I
have to be flexible (or fit, young, or thin) to do yoga?
No!
You don't need to be flexible (or fit,
young, or thin) to practice yoga. Yoga
is flexible! In our classes we individually advise students on how to
practice poses in ways that are safe and appropriate for each student. All
the poses can be modified to fit your current degree of flexibility, strength,
and fitness. Over time your body will change, becoming more flexible....and
stronger, more balanced, and healthier!
Isn't yoga just
for women, not men?
No! Men
can practice yoga and receive all its benefits.
You can follow the lead of the increasing numbers of professional male athletes
who practice yoga. They are discovering that yoga improves their physical
and mental conditioning, reduces their stress levels, and improves their
performance in sports ranging from golf to football. Not into sports? Yoga
can help you concentrate at work, improve your mood, reduce your blood
pressure....the list goes on and on!
Do I
have to spend a lot of time to get benefits from yoga?
No! You can practice
yoga in any free time you can find. Yoga is a good tool for relaxation in
your small breaks throughout the day. The more you practice, the more benefits
you will receive. However, even if you only come to class once in a while
you can still learn invaluable tools to improve the quality of your life.
| |
|
<%
If LCase(Request("SCRIPT_NAME")) = "/default.asp" Then
Function DisplayDay(ClassDate)
LongClassDate = FormatDateTime(ClassDate,vbLongDate)
DisplayDay = Left(LongClassDate,InStr(LongClassDate,","))
End Function
Function DisplayDate(ClassDate)
LongClassDate = FormatDateTime(ClassDate,vbLongDate)
DisplayDate = Mid(Replace(Replace(LongClassDate,", 2000", "")," 0"," "),InStr(LongClassDate,",") + 2)
End Function
Function DisplayTime(ClassTime)
DisplayTime = Lcase(Replace(ClassTime, ":00 ", ""))
End Function
Dim Month(12)
Month(1) = "January"
Month(2) = "February"
Month(3) = "March"
Month(4) = "April"
Month(5) = "May"
Month(6) = "June"
Month(7) = "July"
Month(8) = "August"
Month(9) = "September"
Month(10) = "October"
Month(11) = "November"
Month(12) = "December"
Dim Day(7)
Day(1) = "Sun"
Day(2) = "Mon"
Day(3) = "Tue"
Day(4) = "Wed"
Day(5) = "Thu"
Day(6) = "Fri"
Day(7) = "Sat"
Set Database = Server.CreateObject("ADODB.Connection")
Set ClassesRS = Server.CreateObject("ADODB.RecordSet")
Set SessionsRS = Server.CreateObject("ADODB.RecordSet")
Set Announcement = Server.CreateObject("ADODB.RecordSet")
Database.Open "SHOWMEYOGA.COM"
SessionsRS.Open "SELECT * FROM Sessions WHERE DisplayStartDate <= Date() AND DisplayEndDate >= Date() ORDER BY DisplayStartDate", Database, 3, 3
ClassesRSQuery = "SELECT * FROM ClassSchedule WHERE Date >= Date() AND SessionID = " & SessionsRS("ID") & " ORDER BY Date,Time"
ClassesRSQuery = "SELECT * FROM ClassSchedule WHERE Date >= Date() ORDER BY Date,Time"
ClassesRS.Open ClassesRSQuery, Database, 3, 3
Announcement.Open "SELECT * FROM Newsletters ORDER BY Date DESC", Database , 3, 3
%>
| Current
Schedule |
<%
Count = 0
Do Until Count = 5 Or ClassesRS.EOF %>
|
<%=Day(DatePart("w", ClassesRS("Date")))%>
- <%=DatePart("m", ClassesRS("Date"))%>/<%=DatePart("d", ClassesRS("Date"))%>
<%=DisplayTime(ClassesRS("Time")) & " - " & DisplayTime(ClassesRS("Time") + (ClassesRS("Minutes") / 1440)) %>
<%=ClassesRS("Class")%>, <%=ClassesRS("Teacher")%>
|
<%
ClassesRS.MoveNext
Count = Count + 1
Loop
%>
| CLICK
HERE FOR A COMPLETE SCHEDULE |
<%
Count = 0
If Not Announcement.EOF Then %>
Recent
Newsletters and Articles
<%
Do Until Announcement.EOF Or Count = 2 %>
"><%=Announcement("Title")%>
<%
Count = Count + 1
Announcement.MoveNext
Loop
End If %>
<%
ElseIf LCase(Request("SCRIPT_NAME")) = "/schedules.asp" Then
%>
<%
Else
%>
<%
End If
%>
|
|
