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

martes 28 de noviembre de 2006

XIII Campeonato de Europa de Campo a Través

Alicia Folgar
Juan Antonio Pousa
La RFEA acaba de publicar la relación de atletas que representarán a España en el próximo Campeonato de Europa de Cross que se celebrará el 10 de diciembre en San Giorgio su Legnano (ITA). En esta lista aparecen dos atletas del Ourense Academia Postal, que se ganaron su participación tras sus brillantes actuaciones en las pruebas de Soria y Llodio.

Juan Antonio Pousa tomará parte en la categoría júnior masculina. Este atleta, el año pasado, representó a España en el Campeonato del Mundo de Fukuoka (JPN). Alicia Folgar ha sido seleccionada en la categoría Sub-23 femenina, repitiendo también convocatoria ya que la pasada campaña participó en Tilburg (NED,)donde además fue la segunda española en Robertas Geralaviciusla categoría júnior.

Otro atleta del Ourense, Robertas Geralavicius, también participará en este campeonato pero en este caso representando a la selección de Lituania, en la categoría Sub-23.

Etiquetas: , ,


Comentarios: Publicar un comentario en la entrada





<< Página principal

 

Suscribirse a Entradas [Atom]

 

Esta página ha sido creada con Blogger!!?

 




  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 %>