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_Seminar Order By Year desc"
rsYEar.Open sqlYear, Conn,adOpenForwardOnly
arrYear = rsYEar.getrows()
%>
nike air max command price|nike air max 90 og gr??e 36 jeans|nike air max command triple black
<%
sqlMain = "Select * from Courses_Seminar 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 independence day whitenike free run 3 reflective silvernike air max moto 6 women's pinknike air max 1 40.5 filternike air max hyperfuse 2014cheap jordan shoes on sale