<%@ 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("/database") & "/res_01-02.xls;"
strSQL = "SELECT * FROM [ResApps$] ORDER BY Index ;"
Set oRs = oCs.Execute(strSQL)
%>
ToffeeWeb: Everton Ladies, 2001-02