<% dim db, rs, sql set db = Server.CreateObject("ADODB.connection") set rs = server.CreateObject("ADODB.recordset") db.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("fpdb\ltcdb.mdb") %> Thunder Run - Lincoln Track Club

LTC Results Database

View and Search Past Race Results

The Lincoln Track Club Results Database has 20+ years of results. Search the database below:

NAME (last, first) or partial name
Sort by:
<% if request("submit1")<>"" then sql = "select * from ltcdb where name like " + "'" + request("name") sql = sql + "%' order by " + request("sort1") + ", " + request("sort2") + ", " + request("sort3") rs.Open sql, db if rs.EOF then Response.Write "No Records Found" else Response.Write "" & vbcrlf Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" & vbcrlf rowcounter=0 while not rs.EOF 'For Each Record, create a table row. Response.Write "" & vbcrlf Response.write "" Response.write "" Response.write "" Response.write "" Response.write "" & vbcrlf Response.Write "" & vbcrlf rs.MoveNext rowcounter = rowcounter+1 wend end if rs.Close end if db.Close set rs=nothing set db=nothing %>
YEARRACENAMETIMEPACE
" & vbcrlf Response.Write rs("Year") Response.Write "" & vbcrlf Response.Write rs("Race") Response.Write "" & vbcrlf Response.Write rs("Name") Response.Write "" & vbcrlf Response.Write rs("Time") Response.Write "" & vbcrlf Response.Write rs("Pace") Response.Write "
" Response.Write "

© Lincoln Track Club | Design by