Ourense At. Academia Postal: AVISOS PARA NUESTR@S ATLETAS

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

viernes 19 de octubre de 2007

AVISOS PARA NUESTR@S ATLETAS

- Todos los atletas de Ourense que deseen acceso al gimnasio de musculación del Pabellón de Os Remedios deberán comunicarlo al Club ANTES DEL PRÓXIMO LUNES, DÍA 22 DE OCTUBRE, indicando claramente días y horas de uso para poder formular la solicitud al Consello Municipal de Deportes.

- Recordamos a todos los atletas de la necesidad de disponer de sus datos personales ACTUALIZADOS, con el fin de poder facilitar la comunicación entre los mismos y el Club. Particulamente importante es que nos faciliteis vuestros números de teléfono móvil actual y dirección de correo electrónico.

- También os recordamos que disponeis en esta misma página de impresos para solicitar vuestra alta como SOCIOS DEL CLUB para la próxima temporada (la notificación para la Cuota de Pertenencia figura algo más abajo, en esta misma página), así como un impreso de SOLICITUD DE PREMIOS de la temporada que ahora finaliza, con el que podremos comprobar los datos que hemos ido registrando a lo largo de la temporada.

Todas estas comunicaciones podeis hacerlas a la dirección del Club: ourenseatletismo@ourenseatletismo.com

Etiquetas: información

[Enlace a esta noticia] 10/19/2007 12:13:00 PM

Comentarios: Publicar un comentario en la entrada

<< Página principal

Suscribirse a Entradas [Atom]

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