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

viernes 8 de febrero de 2008

Ourense Academia Postal 3º de España en Veteranos

La estadística continúa ratificando que el Ourense Academia Postal es un club que no desatiende ninguno de los frentes del panorama atlético. Esta vez, es el atletismo veterano el que aupa al Ourense a los puestos mas altos de ranking ya que, tras la publicación de la Clasificación por Clubes según los Finalistas en Campeonatos de España el equipo académico se sitúa en la 3ª posición de la general (entre 150 equipos) con una puntuación final de 64 puntos. El único equipo gallego que se sitúa entre los diez primeros puestos, además del Ourense, es el Comesaña S.C. que ocupa la 7ª plaza con 50 puntos.

Galicia 5ª posición.
La Federación Gallega de Atletismo ha ocupado la 5ª posición dentro de la clasificación de Finalitas por Fedraciones que establece la RFEA en la categoría de Veteranos. Los 209 puntos conseguidos son la suma de 110p de Pista Cubierta, 92 Aire Libre y 7 del Medio Maratón, quedando sin puntuación en MAratón, Marcha en ruta y Combinadas.

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