|
|

|
Statement of Philosophy
Blackhawk Athletics are rich in tradition and have enjoyed a long history of excellence. West Aurora Athletics are a source of great pride in the West Aurora Community. We take seriously our roles as community leaders. The West Aurora Athletic department strives to build a strong relationship with the community and boosters. That ongoing support helps us maintain the strength of our community well into the future.
The success of athletics at West Aurora High School is in part dependent on strong youth and community feeder programs. Herget, Jefferson, Jewel, and Washington Middle Schools are an important part of the West Aurora Athletics Program. Blackhawk Athletics strive to build strong partnerships with community feeder programs that support our mission of providing positive athletic experiences for our youth.
Athletics and activities are a critical piece of the overall educational experience in the West Aurora school community. A dynamic program of athletics is vital to the educational development of the student-athlete. The West Aurora Athletic Program will provide a variety of experiences to enhance the development of positive student habits and attitudes that will prepare students for life in a democratic society.
Statement of Objectives
The objectives of the West Aurora Athletic program are:
-
To provide a superior program of athletics that encourages every West Aurora student to participate in an interscholastic activity of his/her choice.
-
To promote the ideals of courage, loyalty, and sportsmanship with respect to the tradition of West Aurora Athletics.
- To provide adequate and natural opportunities for:
- Physical, mental, and emotional growth and development
- Acquisition and development of motor skills to the individual’s greatest potential
- Directed leadership and supervision that stresses self-discipline, self-motivation, excellence, and the ideals of good sportsmanship
- Acquisition and development of knowledge related to sports rules and strategies
- Acquisition and development of knowledge of sports traditional to our culture
- Development and maintenance of training habits consistent with requirements and a concern for the health, safety and welfare of all.
- Development of strong sense of school spirit and unity
|
|
|
<%
Dim strGender, strTeamCode, strTLevel, strSchool, strSLevel
Dim strTeamName, strTeamGender, commTeamname, rsTeamname
strGender = Request.QueryString("gender")
strTeamCode = Request.QueryString("teamcode")
strTLevel = Request.QueryString("tlevel")
strSchool = Request.QueryString("school")
strSLevel = Request.QueryString("slevel")
Sub DisplayRedBanner
Set commTeamname = Server.CreateObject("ADODB.Command")
With commTeamname
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "teamnameSelectByCode"
.Parameters.Append( .CreateParameter ("teamCode", adVarchar, adParamInput, 50, strTeamCode ) )
End With
Set rsTeamname = commTeamname.Execute
If NOT rsTeamname.EOF Then
strTeamName = rsTeamname("teamname")
Else
strTeamName = "N/A"
End If
If strGender = "G" Then
strTeamGender = "Girls"
Else
strTeamGender = "Boys"
End If
End Sub
Sub DisplayRightNavigation
Dim countMenuHomePage, countMenuAnnouncements, countMenuPhotoGallery, countMenuForms, countMenuCoaches
Dim commMenuHomePage, rsMenuHomePage
Set commMenuHomePage = Server.CreateObject("ADODB.Command")
With commMenuHomePage
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "welcomeSelectDetail"
.Parameters.Append( .CreateParameter ("Gender", adVarchar, adParamInput, 50, strGender ) )
.Parameters.Append( .CreateParameter ("Teamcode", adVarchar, adParamInput, 50, strTeamCode ) )
.Parameters.Append( .CreateParameter ("TLevel", adVarchar, adParamInput, 50, strTLevel ) )
.Parameters.Append( .CreateParameter ("School", adVarchar, adParamInput, 50, strSchool ) )
End With
Set rsMenuHomePage = commMenuHomePage.Execute
countMenuHomePage = rsMenuHomePage.RecordCount
rsMenuHomePage.Close
Set rsMenuHomePage = Nothing
Set commMenuHomePage.ActiveConnection = Nothing
Set commMenuHomePage = Nothing
Dim commMenuAnnouncements, rsMenuAnnouncements
Dim currentDate, startYear, endYear
currentDate = Now()
If Month(currentDate) > 0 and Month(currentDate) < 9 Then
startYear = Year(currentDate) - 1
endYear = Year(currentDate)
Else
startYear = Year(currentDate)
endYear = Year(currentDate) + 1
End If
Set commMenuAnnouncements = Server.CreateObject("ADODB.Command")
With commMenuAnnouncements
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "announcementSelectBySchoolYear"
.Parameters.Append( .CreateParameter ("Gender", adVarchar, adParamInput, 50, strGender ) )
.Parameters.Append( .CreateParameter ("Teamcode", adVarchar, adParamInput, 50, strTeamCode ) )
.Parameters.Append( .CreateParameter ("TLevel", adVarchar, adParamInput, 50, strTLevel ) )
.Parameters.Append( .CreateParameter ("School", adVarchar, adParamInput, 50, strSchool ) )
.Parameters.Append( .CreateParameter ("startYear", adInteger, adParamInput, 50, startYear ) )
.Parameters.Append( .CreateParameter ("endYear", adInteger, adParamInput, 50, endYear ) )
End With
Set rsMenuAnnouncements = commMenuAnnouncements.Execute
countMenuAnnouncements = rsMenuAnnouncements.RecordCount
rsMenuAnnouncements.Close
Set rsMenuAnnouncements = Nothing
Set commMenuAnnouncements.ActiveConnection = Nothing
Set commMenuAnnouncements = Nothing
Dim commMenuPhotoGallery, rsMenuPhotoGallery
Set commMenuPhotoGallery = Server.CreateObject("ADODB.Command")
With commMenuPhotoGallery
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "photogalleryLoadInfo"
.Parameters.Append( .CreateParameter ("Teamcode", adVarchar, adParamInput, 50, strTeamCode ) )
.Parameters.Append( .CreateParameter ("Gender", adVarchar, adParamInput, 50, strGender ) )
.Parameters.Append( .CreateParameter ("TLevel", adVarchar, adParamInput, 50, strTLevel ) )
.Parameters.Append( .CreateParameter ("School", adVarchar, adParamInput, 50, strSchool ) )
End With
Set rsMenuPhotoGallery = commMenuPhotoGallery.Execute
countMenuPhotoGallery = rsMenuPhotoGallery.RecordCount
rsMenuPhotoGallery.Close
Set rsMenuPhotoGallery = Nothing
Set commMenuPhotoGallery.ActiveConnection = Nothing
Set commMenuPhotoGallery = Nothing
Dim commMenuForms, rsMenuForms
Set commMenuForms = Server.CreateObject("ADODB.Command")
With commMenuForms
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "formsLoadInfo"
.Parameters.Append( .CreateParameter ("Teamcode", adVarchar, adParamInput, 50, strTeamCode ) )
.Parameters.Append( .CreateParameter ("Gender", adVarchar, adParamInput, 50, strGender ) )
.Parameters.Append( .CreateParameter ("TLevel", adVarchar, adParamInput, 50, strTLevel ) )
.Parameters.Append( .CreateParameter ("School", adVarchar, adParamInput, 50, strSchool ) )
End With
Set rsMenuForms = commMenuForms.Execute
countMenuForms = rsMenuForms.RecordCount
rsMenuForms.Close
Set rsMenuForms = Nothing
Set commMenuForms.ActiveConnection = Nothing
Set commMenuForms = Nothing
Dim commMenuCoaches, rsMenuCoaches
Set commMenuCoaches = Server.CreateObject("ADODB.Command")
With commMenuCoaches
.ActiveConnection = conn
.CommandType = adCmdStoredProc
.CommandText = "coachesSelectDetail"
.Parameters.Append( .CreateParameter ("Gender", adVarchar, adParamInput, 50, strGender ) )
.Parameters.Append( .CreateParameter ("Teamcode", adVarchar, adParamInput, 50, strTeamCode ) )
.Parameters.Append( .CreateParameter ("TLevel", adVarchar, adParamInput, 50, strTLevel ) )
.Parameters.Append( .CreateParameter ("School", adVarchar, adParamInput, 50, strSchool ) )
End With
Set rsMenuCoaches = commMenuCoaches.Execute
countMenuCoaches = rsMenuCoaches.RecordCount
rsMenuCoaches.Close
Set rsMenuCoaches = Nothing
Set commMenuCoaches.ActiveConnection = Nothing
Set commMenuCoaches = Nothing
%>
<%
End Sub
%> |