<%@ Language=VBScript %> <% Option Explicit %> <% Response.Expires = 0 %> <% Dim oCs, oRs, strSQL set oCs = server.createobject("ADODB.Connection") oCs.Open "Driver={Microsoft Excel Driver (*.xls)}; DBQ=" & Server.MapPath("/season/03-04/data") & "/stats.xls;" strSQL = "SELECT * FROM [Apps$] WHERE ScoredTotal > 0 ORDER BY ScoredTotal DESC ;" Set oRs = oCs.Execute(strSQL) %> ToffeeWeb - Everton Goalscorers, 2003-04

Log in or become a member

Membership of ToffeeWeb allows you to post comments to articles and letters on the site and become part of a thriving online community of fellow Evertonians.

Start your membership registration here by selecting your chosen username and entering your email address.




Member Login

Forgot password?

Goalscorers, 2003-2004


 2002-03 Goalscorers 2004-05 Goalscorers 
EVERTON GOALSCORERS Correct to:

<%Do while NOT oRs.EOF%> <%oRs.MoveNext%><%Loop%>
No.

 Player

League FA Cup WLC Total

<%=oRs("Num")%>

 <%=oRs("Player")%> <%=oRs("ScoredLeague")%>  <%=oRs("ScoredFACup")%>  <%=oRs("ScoredWLCup")%>  <%=oRs("ScoredTotal")%> 


<% oCs.Close Set oRs = Nothing %>

About these ads




About these ads


From Twitter