<%
set rsa=server.CreateObject("adodb.recordset")
rsa.open "select title,ShowPic from index_info where flag=0 and Nclassid=1 order by LeSeno_id desc",conn,1,1
if not rsa.eof then
do while not rsa.eof
%>
<%
rsa.movenext
loop
end if
rsa.close
set rsa=nothing
%>