,music name=keywords>
<%=XDsystemName% src="div/logo.gif" width=190>
<% set rs = Server.CreateObject("ADODB.Recordset") leib="首页" set rs=conn.execute("SELECT * FROM SClass order by SClassid") if not rs.eof then i=0 do while not rs.eof i=i+1 leib=leib&"»"&rs("SClass")&"" rs.movenext loop end if leib = Replace(leib,"组合","") rs.close set rs=nothing response.write leib %>
最 新 专 辑
<% if i>=MaxList then exit do rs.movenext loop rs.close %>
『最近更新的100张专辑』
上面的推荐歌曲与下面的排行歌曲可以混合选择，选好想听的歌曲后按下面的“播放所选歌曲”即可连续播放

 
友情链接：<% set rs=server.createobject("adodb.recordset") sql="SELECT * FROM FriendSite order by id desc" rs.Open sql,conn,1,1 do while not rs.eof %>" target="_blank"><%=rs("SiteName")%>┊<% rs.movenext loop rs.close set rs=nothing closedatabase %>