无形时尚社区专用音乐播放器
00:00 | 00:00
正在读取歌曲列表...请稍等...
选择
点歌清单
<% '≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡ '≡ 网页媒体播放器下载旗舰站点 ≡ '≡ 翠 竹 网 站 ≡ '≡ http://www.cuiz.net ≡ '≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡ '程序作者：辣辣箭 '电子邮箱：jian08@126.com '个人主页：http://www.cuiz.net '请保留以上版权信息，谢谢 Dim RsObj Set RsObj = Conn.Execute("SELECT cz_id,cz_type From cz_class ORDER BY cz_id asc") Do While Not RsObj.EOF Response.Write Chr(9) & Chr(9) & "
" Response.Write RsObj("cz_type") Response.Write "
" & vbCrLf RsObj.movenext Loop Set RsObj = Nothing%>
