HISTORIAL DE: |
<% response.write (nombre) %> |
| ">TODOS SUS RESULTADOS |
|
DATOS |
Nº VICTORIAS | <% dim SumaVictorias SumaVictorias=0 SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") AUX= "SELECT carreras.piloto, Count(*) AS SUMA " AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] " AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha " AUX= AUX &"WHERE (((carreras.pos_final)='01')) " AUX= AUX &"AND (carreras.piloto)='" & nombre & "'" AUX= AUX &"GROUP BY carreras.piloto " CONSULTA.OPEN aux,conn if not consulta.eof then IF NOT ISNULL(CONSULTA("SUMA")) THEN SumaVictorias=CONSULTA ("SUMA") %>"> <%response.write (CONSULTA ("SUMA")) ELSE%> <%response.write("0") end if else%> <%response.write("0") end if %> |
Nº
POLES |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") AUX= "SELECT carreras.piloto, Count(*) AS SUMA " AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] " AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha " AUX= AUX &"WHERE (((carreras.pos_parrilla)='01')) " AUX= AUX &"AND (carreras.piloto)='" & nombre & "'" AUX= AUX &"GROUP BY carreras.piloto " CONSULTA.OPEN aux,conn if not consulta.eof then IF NOT ISNULL(CONSULTA("SUMA")) THEN %> "> <% response.write (CONSULTA ("SUMA")) ELSE%> <% response.write("0") end if else%> <%response.write("0") end if %> |
Nº
V.R. |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") AUX= "SELECT carreras.piloto, Count(*) AS SUMA " AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] " AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha " AUX= AUX &"WHERE (((carreras.vuelta)='VR')) " AUX= AUX &"AND (carreras.piloto)='" & nombre & "'" AUX= AUX &"GROUP BY carreras.piloto " CONSULTA.OPEN aux,conn if not consulta.eof then IF NOT ISNULL(CONSULTA("SUMA")) THEN %>"> <% response.write (CONSULTA ("SUMA")) ELSE%> <% response.write("0") end if else%> <%response.write("0") end if %> | Nº PODIUMS. | <% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") AUX= "SELECT carreras.piloto, Count(*) AS SUMA " AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] " AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha " AUX= AUX &"WHERE (((carreras.pos_final)<'04')) " AUX= AUX &"AND (carreras.piloto)='" & nombre & "'" AUX= AUX &"GROUP BY carreras.piloto " CONSULTA.OPEN aux,conn if not consulta.eof then IF NOT ISNULL(CONSULTA("SUMA")) THEN %> "> <% response.write (CONSULTA ("SUMA")) ELSE%> <%response.write("0") end if else%> <%response.write("0") end if %> | |
| 1ª VICTORIA | 1ª POLE | 1ª V.R. | 1ª PODIUM. |
||||||
| DEBUT | <% Set consulta=server.createobject("ADODB.Recordset") AUX = "SELECT carreras.piloto, carreras.escuderia," aux= aux &" carreras.pos_final,carreras.pos_parrilla," aux= aux &" carreras.fecha, [fechas carreras].circuito," aux= aux &" [fechas carreras].pais " aux= aux &" FROM carreras INNER JOIN [fechas carreras]" aux= aux &" ON carreras.fecha = [fechas carreras].fecha" aux= aux &" WHERE PILOTO ='" & nombre & "'" aux= aux &" AND carreras.fecha=(select MIN(FECHA)" aux= aux &" from CARRERAS where PILOTO ='" & nombre & "')" CONSULTA.OPEN aux,conn %><%response.write( CONSULTA ("fecha"))%> <%response.write (consulta.fields.item("circuito"))%> <%response.write (consulta.fields.item("pais"))%> |
FECHA |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") aux="SELECT carreras.piloto, carreras.escuderia," aux= aux &" carreras.pos_final, carreras.pos_parrilla," aux= aux &" carreras.fecha, [fechas carreras].circuito," aux= aux &" [fechas carreras].pais" aux= aux &" FROM carreras INNER JOIN [fechas carreras]" aux= aux &" ON carreras.fecha = [fechas carreras].fecha" aux= aux &" WHERE ((((carreras.piloto)='" & nombre & "'" aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)" aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'" aux= aux &" and pos_final='01')))))" CONSULTA.OPEN aux,conn if not consulta.eof then%> <%response.write( CONSULTA ("FECHA")) else response.write("---") end if CONSULTA.CLOSE %> |
FECHA |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") aux="SELECT carreras.piloto, carreras.escuderia," aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha," aux= aux &" [fechas carreras].circuito, [fechas carreras].pais" aux= aux &" FROM carreras INNER JOIN [fechas carreras]" aux= aux &" ON carreras.fecha = [fechas carreras].fecha" aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'" aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)" aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'" aux= aux &" and pos_parrilla='01'))))" CONSULTA.OPEN aux,conn if not consulta.eof then%> <%response.write( CONSULTA ("FECHA")) else response.write("---") end if CONSULTA.CLOSE %> |
FECHA |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") aux="SELECT carreras.piloto, carreras.escuderia," aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha," aux= aux &" [fechas carreras].circuito, [fechas carreras].pais" aux= aux &" FROM carreras INNER JOIN [fechas carreras]" aux= aux &" ON carreras.fecha = [fechas carreras].fecha" aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'" aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)" aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'" aux= aux &" and vuelta='VR'))))" CONSULTA.OPEN aux,conn if not consulta.eof then%> <%response.write( CONSULTA ("FECHA")) else response.write("---") end if CONSULTA.CLOSE %> |
FECHA |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET") aux="SELECT carreras.piloto, carreras.escuderia," aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha," aux= aux &" [fechas carreras].circuito, [fechas carreras].pais" aux= aux &" FROM carreras INNER JOIN [fechas carreras]" aux= aux &" ON carreras.fecha = [fechas carreras].fecha" aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'" aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)" aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'" aux= aux &" and pos_final<'04'))))" CONSULTA.OPEN aux,conn if not consulta.eof then%> <%response.write( CONSULTA ("FECHA")) else response.write("---") end if CONSULTA.CLOSE %> |
PRESENCIAS |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
AUX= "SELECT carreras.piloto, Count(*) AS SUMA "
AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] "
AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha "
AUX= AUX &"WHERE (((carreras.pos_parrilla)<>'xxx')) "
AUX= AUX &"AND (carreras.piloto)='" & nombre & "'"
AUX= AUX &"GROUP BY carreras.piloto "
CONSULTA.OPEN aux,conn%>
<%response.write (CONSULTA ("SUMA"))
CONSULTA.CLOSE %>
|
||||||||
DISPUTADOS |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
AUX= "SELECT carreras.piloto, Count(*) AS SUMA "
AUX= AUX &"FROM carreras INNER JOIN [fechas carreras] "
AUX= AUX &"ON carreras.fecha = [fechas carreras].fecha "
AUX= AUX &"WHERE (((carreras.pos_parrilla)<'99')) "
AUX= AUX &"AND (carreras.piloto)='" & nombre & "'"
AUX= AUX &"GROUP BY carreras.piloto "
CONSULTA.OPEN aux,conn%>
<%response.write (CONSULTA ("SUMA"))
CONSULTA.CLOSE %>
|
CIRCUITO |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla,"
aux= aux &" carreras.fecha, [fechas carreras].circuito,"
aux= aux &" [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE ((((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_final='01')))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("circuito"))
else
response.write("---")
end if
CONSULTA.CLOSE %>
|
CIRCUITO |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_parrilla='01'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then %>
<%response.write (consulta ("circuito"))
end if %>
|
CIRCUITO |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and vuelta='VR'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("circuito"))
else
response.write("---")
end if
%>
|
CIRCUITO |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_final<'04'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("circuito"))
else
response.write("---")
end if%>
|
|
TOTAL PUNTOS
|
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT piloto, SumaDepuntos_fin"
aux= aux &" FROM [puntos_total_piloto]"
aux= aux &" WHERE (piloto)='" & nombre & "'"
CONSULTA.OPEN aux,conn%>
">
<%response.write (consulta ("SumaDepuntos_fin"))
%>
|
G.P. |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla,"
aux= aux &" carreras.fecha, [fechas carreras].circuito,"
aux= aux &" [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE ((((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_final='01')))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("pais"))
else
response.write("---")
end if
CONSULTA.CLOSE %>
|
G.P. |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_parrilla='01'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("pais"))
else
response.write("---")
end if
CONSULTA.CLOSE %>
|
G.P. |
<%
SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and vuelta='VR'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("pais"))
else
response.write("---")
end if
%>
|
G.P. |
<% SET CONSULTA=SERVER.CREATEOBJECT("ADODB.RECORDSET")
aux="SELECT carreras.piloto, carreras.escuderia,"
aux= aux &" carreras.pos_final, carreras.pos_parrilla, carreras.fecha,"
aux= aux &" [fechas carreras].circuito, [fechas carreras].pais"
aux= aux &" FROM carreras INNER JOIN [fechas carreras]"
aux= aux &" ON carreras.fecha = [fechas carreras].fecha"
aux= aux &" WHERE (((carreras.piloto)='" & nombre & "'"
aux= aux &" AND ((carreras.fecha)=(select MIN(FECHA)"
aux= aux &" from CARRERAS where PILOTO ='" & nombre & "'"
aux= aux &" and pos_final<'04'))))"
CONSULTA.OPEN aux,conn
if not consulta.eof then%>
<%response.write (consulta ("pais"))
else
response.write("---")
end if%>
|
ESCUDERIAS |
| AÑO | ESCUDERIA | NºCARRERAS |
| <% response.write(consulta2.fields.item("fechaPoraNo"))%> | "><% response.write(consulta2.fields.item("escuderia"))%> | <% response.write(consulta2.fields.item("Cuenta De carreras"))%> | <%else%>
| <% response.write(consulta2.fields.item("fechaPoraNo"))%> | "><% response.write(consulta2.fields.item("escuderia"))%> | <% response.write(consulta2.fields.item("Cuenta De carreras"))%> | <% end if linea=linea+1 consulta2.movenext loop %>