LIGA DE CLUBS: Mujeres: Salida del bus: viernes 16.30 Pabellón Hombres: Concentración el sábado a las 14:00 enfrente a Monterrey

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

miércoles 13 de junio de 2007

Santi Pérez seleccionado para el Campeonato de Mundo de Osaka

La RFEA ha hecho pública la lista de seleccionados para el Campeonato del Mundo al Aire Libre a celebrar en Osaka en la que se incluye al fantástico marchador de nuestro club Santi Pérez.
Santi se ganó el derecho a ser seleccionado tras el excelente séptimo puesto logrado en la pasada Copa de Europa de Marcha en la que España se hacía con el subcampeonato, y tras contribuir a la permanencia del Ourense Academia Postal en la División de Honor.


Nuestra enhorabuena!!!

[Nota de prensa de la RFEA]

Etiquetas: , ,


[Enlace a esta noticia] 6/13/2007 11:00:00 AM
Comentarios: Publicar un comentario en la entrada





<< Página principal

 

Suscribirse a Entradas [Atom]

 

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

 

.:: ÚLTIMOS POST EN GALICIATLETICA.COM ::.
Club Ourense Atletismo Academia Postal
Rua Pardo de Cela,1 32003 - Ourense
CIF: G-32.314.379
ourenseatletismo@ourenseatletismo.com
  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 %>