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

domingo 18 de febrero de 2007

Cpto. de España Absoluto de Pista Cubierta


Alfonso Palomanes , ha logrado la mejor actuación para el Ourense Academia Postal en el Nacional Absoluto al finalizar quinto en la prueba en el triple salto con un mejor salto de 15.20 que supone un nuevo record gallego Junior de Pista Cubierta de la especialidad.
Igualmente, gran actuación de Beatriz Viteri, Ourense Academia Postal, en el Campeonato de España Absoluto de Pista Cubierta al lograr un nuevo record gallego Junior de Pista Cubierta de Salto con Pértiga con una marca de 3.51 y adjudicarse una magnífca sexta posición en el campeonato. La académica subía 1 centímetro el record anterior.
En los 400 m. Darío Vázquez no ha podido lograr el pase a la final de los 400 m.l. tras finalizar tercero de su serie con un tiempo de 48.63.
La tercera representante del Ourense Academia Postal en esta primera jornada era Alicia Folgar que con un tiempo de 9:36.28 (próxima a su mejor marca personal) ocupaba la octava plaza en la prueba de 3.000 m.l..


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