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