ChampionChip.es: Servicio de Inscripciones On-Line <%=nombreCarrera%>

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'Recuperamos de la base de datos la información relativa a las carreras 'Creamos la conexion con la base de datos. Set dbConn = Server.CreateObject("ADODB.Connection") dbConn.Open bd_inscripciones 'Creamos el recordSet correspondiente a los datos de la carrera Set rsCarrerasAbiertas = Server.CreateObject("ADODB.Recordset") Set rsCarrerasCerradas = Server.CreateObject("ADODB.Recordset") 'Ejecutamos la consulta sqlCarrerasAbiertas = "SELECT * FROM carreras WHERE Estado AND Sitio1;" 'sqlCarrerasCerradas = "SELECT * FROM carreras WHERE not Estado and DateDiff('d',Now(),[FechaCarrera]) > -30 AND Sitio1;" sqlCarrerasCerradas = "SELECT * FROM carreras WHERE NOT Estado AND DateDiff(now(),FechaCarrera) < 30 AND Sitio1" rsCarrerasAbiertas.Open sqlCarrerasAbiertas, dbConn rsCarrerasCerradas.Open sqlCarrerasCerradas, dbConn %> ChampionChip.es: Servicio de Inscripciones On-Line <%=nombreCarrera%> <% Do While not rsCarrerasAbiertas.EOF %> <% rsCarrerasAbiertas.MoveNext Loop %> <% Do While not rsCarrerasCerradas.EOF %> <% rsCarrerasCerradas.MoveNext Loop %>

	Servicio Inscripciones on-line
	Carreras para las que la inscripción se encuentra abierta A continuación se muestra un listado de las carreras que, en estos momentos, tienen abierto el plazo de inscripción. Para acceder al formulario de inscripción haga click sobre la imagen de la carrera.
	" title="Formulario de inscripcion" target="_self"> .jpg" alt="<%=rsCarrerasAbiertas("NombreCarrera")%>" width="813" height="112" border="0"/> " title="Listado de inscritos" target="_self"> " width="112" height="112" border="0"/>
	Carreras para las que la inscripción se ha cerrado recientemente A continuación se muestra un listado de las carreras cuyo plazo de inscripción se ha cerrado recientemente. Para consultar la lista de corredores inscritos haga click sobre la imagen de la carrera.
	" title="Listado de inscritos" target="_self"> .jpg" alt="<%=rsCarrerasCerradas("NombreCarrera")%>" width="813" height="112" border="0"/> " width="112" height="112" border="0"/>