[求助][原创]记录集问题
<%'显示最新歌曲
sql="select top "& newindex &" id,musicname,count,hit,time from music where passed=0 order by id DESC"
set rsnew=server.createobject("adodb.recordset")
rsnew.open sql,conn,1,1
do while not rsnew.eof
%>
<TR>
<TD align=left class="table2" height="22">
<IMG src="img/music.gif" border="0" align="absMiddle">
<a target="_blank" title="歌曲名:<%=rsnew("musicname")%>,下载:<%=rsnew("count")%>次,试听:<%=rsnew("hit")%>次" href="playlistmusic.asp?music_id=<%=rsnew("id")%>"><%=left(rsnew("musicname"),9)%></a><%if DateDiff("h",rsnew("time"),now())<=24 then
Response.Write "<img src='img/new.gif'>" & vbCrLf
end if%>
</TD></TR>
<%
rsnew.movenext
loop
if rsnew.eof and rsnew.bof then
response.write "<tr><td align=middle height=""60"">该分类暂时没有新歌曲</td></tr>"
response.Redirect "login.asp"
end if
rsnew.close
set rsnew=nothing
%>
