Ourense At. Academia Postal: Copa del Mundo de Marcha

Objetivo División de Honor: aun sin finalizar la temporada, ya estamos planificando el equipo para devolver a la máxima categoría a nuestro club. Contamos con tod@s. Haz club!! Apórtanos tus propuestas.

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

domingo 11 de mayo de 2008

Copa del Mundo de Marcha

Todas las opciones para poder acudir a los Juegos Olímpicos de Pekín siguen intactas para Santi Pérez tras la disputa, esta mañana, de la Copa del Mundo. Tras finalizar en el puesto 34º de la general (4º español) en la prueba de los 50 kilómetros, el académico es uno de los tres españoles que poseen a día de hoy la mínima olimpica "A", y junto con Mikel Odriozola y Jesús García Bragado son los tres únicos marchadores que encajan en los criterios de selección de la RFEA.

Ahora habrá que esperar a la decisión del Comité Técnico de la RFEA, que tendrá en cuenta las marcas realizadas en las temporadas 2006/2007 y 2007/2008, dándose a conocer la selección definitiva días después del GP de Marcha "Cantones de La Coruña".

Etiquetas: marcha, selección

[Enlace a esta noticia] 5/11/2008 03:30: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 %>