2-
<%
Dim rsYEar,rsMain,sqlMain,sqlYear,arrYear, arrList
set rsYEar=server.CreateObject("ADODB.recordset")
set rsMain=server.CreateObject("ADODB.recordset")
sqlYear = "Select Distinct Year from Courses_STTP Order By Year desc"
rsYEar.Open sqlYear, Conn,adOpenForwardOnly
arrYear = rsYEar.getrows()
%>
nike air max 95 premium tape qs|nike free run 3 colours 8gb|nike air max perth sale qld
<%
sqlMain = "Select * from Courses_STTP where Year =" & arrYear(0,iYear)
rsMain.Open sqlMain,Conn,adOpenForwardOnly
arrList = rsMain.GetRows()
rsMain.Close()
For iCnt = 0 To ubound(arrList,2)
if iCnt MOD 2 = 0 then
strCss = "list_pnl_under"
else
strCss = "list_pnl_under1"
End if
%>
air max 90 shoes uk salenike free run baby size 5nike free run 3 laf mens healthnike free run 2 gray quotesnike free run 3 zalando loungenike air max 2015