<% Dim objConn Dim strConn Set objConn = Server.CreateObject("ADODB.Connection") ' Response.Write Server.MapPath("/fpdb/WCST2002TEAM.MDB") ObjConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/fpdb/WCST2003TEAM.mdb") %> WCST Stingrays Meet Results

 

2003 WCST Stingrays Swimmer Statistics

Please select a swimmer to view results...

Select Swimmers Name: <% dim oRScl Dim strSQL strSQL = "SELECT DISTINCT ATHLETE.ATHLETE, ATHLETE.LAST, ATHLETE.FIRST, ATHLETE.INITIAL " & _ "FROM ATHLETE INNER JOIN RESULT ON ATHLETE.ATHLETE = RESULT.ATHLETE " & _ "ORDER BY LAST, FIRST, INITIAL;" set oRScl=server.createobject("ADODB.recordset") oRScl.Open strSQL, objConn oRScl.movefirst %>

  

If you think a time is missing, please contact the statistician Rich Bernat at WCST-Statistician@walnutcountry.com .  It is possible that a time was not recorded correctly or that they were disqualified.  In either case, they end up with 0 for a time.  Zero's are omitted from these statistics.