********************** (1) Open the recordset, create an array, assign the value of the record set to an array.
<% DIM CountSet RS = Server.createObject ("AdoDb.Recordset") SQL = "Select * from bookboard ORDER BY CLASSID DESC" RS.Open SQL, CN, 1, 1%>