Soccer
Camps for children from 7 -17 years
::
In the pristine surroundings of Saat-tal's
crystal clear lakes soccer-mad children
can, besides enjoying the benefits of
modern soccer coaching, engage in a gamut
of adventure activities. These camps combine
quality soccer & fitness training
and Kayaking, Rock climbing, River Crossing,
Hiking, Volleyball, Bird Watching.
These
7 day camps are run on the technical advice
of Bill Adams of the Super Soccer Academy
along with Wildrift Adventures. The training
and coaching techniques are state-of-the-art,
and based on the English FA and international
methods.
To
enroll contact us
:: at 011-29562342, 29561202, 98108-08448
Summer 2008 Options
| Options |
No. of days |
Date |
Location |
Cost |
<%
on error resume next
filePath ="../db/wildriftmks1.mdb"
'filePath ="../db/brainwise.mdb"
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &server.MapPath(filePath)
SET rsTemp = Server.CreateObject("ADODB.Recordset")
rsTemp.CursorType = 1
rsTemp.Open "select * from childrencamp ",con,3,3
DIM intPageRecords, intRecords, intRecordCount, intCurrentPage
DIM intNumberOfPages, intDisplayPage
intPageRecords = Request.Querystring("page")
IF intPageRecords = "" THEN
intPageRecords = 1 : intRecords = 1
END IF
intRecords = intPageRecords
intPageRecords = ((intPageRecords - 1) * 6) +1
intRecordCount = 0
IF NOT rsTemp.eof THEN
rsTemp.Move (intPageRecords - 1)
p=1
DO WHILE intRecordCount < 10 and NOT rsTemp.eof
strcampId=rsTemp("campId")
strCampName=rsTemp("CampName")
strnoofdays=rsTemp("noofdays")
strDateSchedule=rsTemp("DateSchedule")
strLocation=rsTemp("Location")
strcost=rsTemp("cost")
strstatus=rsTemp("status")
%>
<%=strCampName%>
<%
if strstatus="current" then
%>
Current
<%
end if
%>
|
<%=strnoofdays%> |
<%=strDateSchedule%> |
<%=strLocation%> |
Rs.<%=strcost%> |
<%
rsTemp.MovenEXT
intRecordCount = intRecordCount +1
p=p+1
Loop
END IF
%>
(<%=intPageRecords%> - <%=intPageRecords+(intRecordCount-1)%>) Of <%=(rsTemp.RecordCount)%> School
More School
<%
intCurrentPage = Request.Querystring("page")
IF intCurrentPage = "" THEN intCurrentPage = 1
intNumberOfPages = int(rsTemp.RecordCount \ 6)
IF rsTemp.RecordCount MOD 6<> 0 THEN intNumberOfPages = intNumberOfPages + 1
Response.Write(": [")
FOR intDisplayPage = 1 TO intNumberOfPages
IF Cint(intDisplayPage) = Cint(intCurrentPage) THEN
Response.Write " " & intDisplayPage & " "
ELSE
%>
<%=intDisplayPage%>
<%
END IF
NEXT
Response.Write ("]")
rsTemp.Close
Set Con=Nothing
%>
|
*The
cost is inclusive of full board, lodging,
training and travel in 2 x 2 A/C coaches
Delhi to Delhi.
