% Dim oMRTCs, oMRTRs, strSQL set oMRTCs = server.createobject("ADODB.Connection") oMRTCs.Open "Driver={Microsoft Excel Driver (*.xls)}; DBQ=" & Server.MapPath("/season/07-08/data") & "/premtable.xls;" strSQL = "SELECT * FROM [Summary$] ORDER BY Pos, Team ;" Set oMRTRs = oMRTCs.Execute(strSQL) %>