<% set rsm=server.createobject("adodb.recordset") sqlm="select top 6 * from message where class='"&rsc("class")&"' order by id desc" rsm.open sqlm,conn,1,1 do until rsm.eof %> <% end if %> <% rsm.movenext loop %> <% rsc.movenext loop %>