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

domingo 28 de octubre de 2007

NUEVA TEMPORADA 2007-2008

Con la finalidad de disponer de tiempo suficiente para preparar la documentación a entregar a la Federación para las renovaciones, se informa por parte del Coordinador Deportivo del Club que el lunes se cierra el plazo de confirmación de renuncia a estar en el mismo; de no confirmarse, se procecerá a la renovación de los atletas, a excepción de aquellos que no hayan cumplido la normativa del Club. Como siempre, las confirmaciones deberán hacerse a la dirección del Club: ourenseatletismo@ourenseatletismo.com


Ana ToralFICHAJES TEMPORADA 2007-08

En su intento por recuperar a atletas ourensanos que militan en clubs de otras provincias, el Ourense Academia Postal ha logrado el regreso al atletismo ourensano de la atleta afincada en Fuerteventura Ana Toral, lo que constituye una buena noticia tanto para el atletismo local como gallego tras varias temporadas militando en el Playas de Jandía. Un buen refuerzo para el equipo femenino que se estrenará este año en la División de Honor.

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