Documento sin título

<%dim nombre,aux,escu nombre=request.querystring("nombrepiloto") Set Conn=server.CreateObject("ADODB.Connection") Conn.Open ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("/db/carreras.mdb")) Set consulta=server.createobject("ADODB.Recordset") aux="SELECT carreras.piloto, Count(*) AS SUMA," aux=aux & " carreras.escuderia, [fechas carreras].circuito," aux=aux & " [fechas carreras].fecha, [fechas carreras].pais" aux=aux & " FROM carreras INNER JOIN [fechas carreras]" aux=aux & " ON carreras.fecha = [fechas carreras].fecha" aux=aux & " WHERE (((carreras.vuelta)='VR')) and piloto='" & nombre & "'" aux=aux & " GROUP BY carreras.piloto, carreras.escuderia, [fechas carreras].circuito" aux=aux & " ,[fechas carreras].fecha, [fechas carreras].pais" aux=aux & " ORDER BY [fechas carreras].fecha" CONSULTA.OPEN aux,Conn %>

Victorias del piloto: •
<%response.write(consulta.fields("piloto"))%>
<% do until consulta.eof if (linea Mod 2)<>0 then %> <%else%> <% end if linea=linea+1 consulta.movenext loop %>

ESCUDERIA	CIRCUITO	FECHA	PAIS
"> <% response.write(consulta.fields.item("escuderia"))%>	"> <% response.write(consulta.fields.item("circuito"))%>	<% response.write(consulta.fields.item("fecha"))%>	"> <% response.write(consulta.fields.item("pais"))%>
"> <% response.write(consulta.fields.item("escuderia"))%>	"> <% response.write(consulta.fields.item("circuito"))%>	<% response.write(consulta.fields.item("fecha"))%>	"> <% response.write(consulta.fields.item("pais"))%>