分类 -影音视频

'
唱片街 分类
sub music_usa(n_num,n_cid,n_sid)
  i=0
  sql="select top "&n_num&" id,name,c_id,s_id,n_id,singer,hits from music_song where hidden=1 and c_id="&n_cid&" and s_id="&n_sid&" order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  response.write vbcrlf&musig_list_pot("center_song_main",1,"new")
  do while not rs.eof
  i=i+1
    n_topic=rs("name")
    n_topic=joekoe_cms.code_js(n_topic,1)
    response.write musig_list(i,rs("id"),rs("c_id"),rs("s_id"),rs("n_id"),n_topic,rs("singer"),"list")
  rs.movenext
  loop
  rs.close
  response.write vbcrlf&musiu_list_end()
end sub


sub musiu_new(n_num)
  i=0
  sql="select top "&n_num&" id,name,c_id,s_id,n_id,singer,hits from music_song where hidden=1 and istop=1 order by hits desc,id desc"
  set rs=joekoe_cms.exec(sql,1)
  response.write vbcrlf&musiu_list_pot("center_song_main",1,"new")
  do while not rs.eof
  i=i+1
    n_topic=rs("name")
    n_topic=joekoe_cms.code_js(n_topic,1)
    response.write musiu_list(i,rs("id"),rs("c_id"),rs("s_id"),rs("n_id"),n_topic,rs("singer"),"list",rs("hits"))
  rs.movenext
  loop
  rs.close
  response.write vbcrlf&musiu_list_end()
end sub

文章来自: Original
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: