推荐-影音视频
作者:cmscn 日期:2005-10-18
sub musik_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 id desc"
set rs=joekoe_cms.exec(sql,1)
response.write vbcrlf&musik_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 musik_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
评论: 5 | 引用: 0 | 查看次数: 878
发表评论