首页调用音乐频道的流行爬行榜
作者:cmscn 日期:2005-04-11
sub main_center_music_hits()
dim topic,word,tmp1,hits,nid
sql="select top 8 * from mv_musiclist order by hits desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
nid=rs("id")
topic=rs("MusicName")
hits=rs("hits")
tmp1=tmp1&vbcrlf&"<tr><td height="&dim_num(6)&"><img src=images/music/small_wma_s.gif border=0><a href=javascript:play('"&nid&"')>"&joekoe_cms.code_html(topic,1,8)&"</a></td><td align=right class=tims>"&hits&"</td></tr>"
rs.movenext
loop
rs.close
tmp1="<table border=0 cellspacing=0 cellpadding=2 width='100%'>"&tmp1&vbcrlf&"</table>"
response.write vbcrlf&"<table cellspacing=1 cellpadding=4 class=table>" & _
vbcrlf&"<tr><td class=td0> 流行爬行榜</td></tr>" & _
vbcrlf&"<tr class=bg_td><td align=center>"&tmp1&"</td></tr>" & _
vbcrlf&"</table>"&ukong
end sub
评论: 8 | 引用: 9 | 查看次数: 624
发表评论