set rs=joekoe_cms.exec(sql,1)
do while not rs.eof...,Bullcn'Blog - 分享、交流、进步。" /> 首页调用音乐频道的流行爬行榜 - Bullcn'Blog

首页调用音乐频道的流行爬行榜


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

文章来自: Original
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志:
评论: 8 | 引用: 9 | 查看次数: 624
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 20 字 | UBB代码 关闭 | [img]标签 关闭