<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rcl
Dim rcl_numRows
Set rcl = Server.CreateObject("ADODB.Recordset")
rcl.ActiveConnection = MM_ciri09_STRING
rcl.Source = "SELECT distinct ResultatsBenissaCursa09.Club FROM ResultatsBenissaCursa09"
rcl.CursorType = 0
rcl.CursorLocation = 2
rcl.LockType = 1
rcl.Open()
rcl_numRows = 0
%>
<%
Dim rl__BAT
rl__BAT = "C. A. Benissa"
If (Request.QueryString("busca") <> "") Then
rl__BAT = Request.QueryString("busca")
End If
%>
<%
Dim rl
Dim rl_numRows
Set rl = Server.CreateObject("ADODB.Recordset")
rl.ActiveConnection = MM_ciri09_STRING
rl.Source = "SELECT * FROM ResultatsBenissaCursa09 WHERE ResultatsBenissaCursa09.club='" + Replace(rl__BAT, "'", "''") + "' ORDER BY PG"
rl.CursorType = 0
rl.CursorLocation = 2
rl.LockType = 1
rl.Open()
rl_numRows = 0
%>
<%
' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
Dim rl_total
Dim rl_first
Dim rl_last
' set the record count
rl_total = rl.RecordCount
' set the number of rows displayed on this page
If (rl_numRows < 0) Then
rl_numRows = rl_total
Elseif (rl_numRows = 0) Then
rl_numRows = 1
End If
' set the first and last displayed record
rl_first = 1
rl_last = rl_first + rl_numRows - 1
' if we have the correct record count, check the other stats
If (rl_total <> -1) Then
If (rl_first > rl_total) Then
rl_first = rl_total
End If
If (rl_last > rl_total) Then
rl_last = rl_total
End If
If (rl_numRows > rl_total) Then
rl_numRows = rl_total
End If
End If
%>
<%
' *** Recordset Stats: if we don't know the record count, manually count them
If (rl_total = -1) Then
' count the total records by iterating through the recordset
rl_total=0
While (Not rl.EOF)
rl_total = rl_total + 1
rl.MoveNext
Wend
' reset the cursor to the beginning
If (rl.CursorType > 0) Then
rl.MoveFirst
Else
rl.Requery
End If
' set the number of rows displayed on this page
If (rl_numRows < 0 Or rl_numRows > rl_total) Then
rl_numRows = rl_total
End If
' set the first and last displayed record
rl_first = 1
rl_last = rl_first + rl_numRows - 1
If (rl_first > rl_total) Then
rl_first = rl_total
End If
If (rl_last > rl_total) Then
rl_last = rl_total
End If
End If
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 90
Repeat1__index = 0
rl_numRows = rl_numRows + Repeat1__numRows
%>
Classificació per XII Cursa Popular Benissa
XII Cursa Popular Benissa 9a Prova puntuable del Circuit a peu
Marina Alta 2009
Data: 20 de Juny de 2009 Exida i Meta :Plaça de Sant Jaume Organitza: C. A. Benissa
Ajuntament de Benissa
Categories fora del Circuit
Barrufets nascuts 2005 a 2009
Principiants nascuts 2003 i 2004
Pre-Benjamins nascuts el 2001 i 2002
Els dorsals desqualificats del Circuit ha perdut el dret a regals, classificacions i trofeus, i per tant no apareixen en la classificació de la carrera
153 - 407 - 448 - 583 - 625 - 634 - 655 - 667- 1027 - 1032 - 1078 - 1097 - 1129
DESQUALIFICACIONS Reglament ( art 8 ) Art.8.1 Podrà ser motiu de desqualificació el fet de córrer amb el dorsal o el xip d’un altre corredor, no comptant per tant la prova com a disputada. En este cas ambdós participants quedaran desqualificats. Art.8.2 Podrà ser motiu de desqualificació córrer sense dorsal, o portar-lo en un lloc no visible . Art.8.3 No completar la totalitat del recorregut.Recordem que és obligatori córrer amb el dorsal en lloc ben visible
XII CURSA POPULAR BENISSA
