Ourense At. Academia Postal: VII Carreira Expourense Megaxove

Formulario inscripciones] [Comunicación datos atletas] [FORO Galicia Atletica] [Web antigua]
[Nuevo Album de Fotos del Club] [+ fotos en FotoAtletismo.com]

domingo 10 de diciembre de 2006

VII Carreira Expourense Megaxove

En una fría mañana se celebró una nueva edición de esta prueba, organizada por el Club Ourense Academia Postal con el patrocinio de Expourense. La prueba contó con la presencia del internacional español Juan Carlos Higuero como apoyo a la misma, y también en la ceremonia de entrega de trofeos a los vencedores de cada categoría.

Rubén Diz Díaz e Iria Fernández Fontenla, ambos atletas académicos, lograron la victoria en la prueba absoluta, sobre una distancia de 6 kilómetros. Al primero secundaron en el podio sus compañeros de Club Javier Paredes y José Antonio Paz, mientras que en féminas completaban el podio la atleta independiente Ingrid Rodríguez y su compañera de Club Consi Gómez.

Otros atletas del Club también lograron la victoria en sus respectivas categorías, como Alba Fernández y Daniel Estévez en Junior, José Enrique Blanco en Juvenil o Alejandro Pérez en Cadete.

[Ver cuadro de vencedores]

[Resultados Carrera Absoluta]

[Resultados por Categorías]

Etiquetas: carrera, ourense, popular

[Enlace a esta noticia] 12/10/2006 06:00:00 PM

Comentarios: Publicar un comentario en la entrada

<< Página principal

Suscribirse a Entradas [Atom]

OurenseAtletismo.com

Localización de los visitantes a nuestra web

<% sub ProximasCompeticiones on error resume next set Con = Server.CreateObject("ADODB.Connection") Con.Open "DSN=ourenseatletismo.com.calendario" sSQL="SELECT * FROM Calendario " & _ " WHERE fecha>=date() and fecha <= (date() + 31) and (ambito='GAL' or cto_nacional )" & _ " ORDER BY fecha " ' Set RS=Con.Execute (sSQL) if RS.EOF THEN ' informo de que no hay datos response.write ("No se encontraron pruebas en el calendario") else ' hago un bucle para cada uno de los meses fmes=0 while not rs.eof if fmes <> rs("fecha") then fmes = rs("fecha") response.write ("
" & rs("fecha") & "
") end if response.write (" - " ) if len("" & rs("URL_PaginaWeb")) > 0 then response.write ("") end if response.write (rs("competicion")) if len("" & rs("URL_PaginaWeb")) > 0 then response.write ("") end if response.write( " (" & rs("localidad") & ")
") rs.movenext wend end if end sub function Qfoto() Dim intLowerBound ' Lower bound of the random number range Dim intUpperBound ' Upper bound of the random number range Dim intRangeSize ' Size of the range Dim sngRandomValue ' A random value from 0 to intRangeSize Dim intRandomInteger ' Our final result - random integer to return intLowerBound = 1 intUpperBound = 276 Randomize() ' Find range size intRangeSize = intUpperBound - intLowerBound + 1 ' Get a random number from 0 to the size of the range sngRandomValue = intRangeSize * Rnd() ' Center the range of possible random numbers over the desired result set sngRandomValue = sngRandomValue + intLowerBound ' Convert our value to an integer intRandomInteger = Int(sngRandomValue) Qfoto = intRandomInteger end function %>