www.gusucode.com > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外 > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外文翻译)\音乐网站设计\home_sort.asp
<% set rs=server.createobject("adodb.recordset") sql="select top 15 * from kq order by click desc" rs.open sql,conn,1,1 %> <% dim x,y y=rs.recordcount if y>15 then y=15 end if for x=1 to y %> <LI><a href=# onClick=windowOpen('mfplayrm.asp?id=<%=rs("id")%>') title=评价:★★★★★><%=rs("kqmc")%></A> [<%=rs("click")%>次]</LI> <% rs.movenext next rs.close %>