<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../../common/dbconn.asp"-->
<%=Request("checkid")%>
<%
Dim i,id,Num
if request("id")<>"" then
id=request("id")
else
If Request("checkid")="" or isnull(Request("checkid")) or isempty(Request("checkid")) Then
response.write "没有选择记录"
end if
end if
set rs=server.createobject("adodb.recordset")
sql="select * from yx_music where id in ("&Request("checkid")&") order by id desc"
rs.open sql,conn,1,3
rs("click")=rs("click")+1
rs.update
'=========判断文件后缀=============
file = rs("zuopin_url")
ary_file = split(file,".")
filetype = ary_file(UBound(ary_file ))
'================================
<param NAME="url" VALUE="<%=url%>">
这个URL里包括了多个文件,还是说有多个文件,以url来表示。
打个比方说:你有个数据库里面有很多条音乐的资料:
1、Close to you
2、I believe I can fly
3、Right here waiting
这样的话,你只用一个循环不就搞定了吗
如果说你的url是直接包括很多文件的,如:url="Close to you,I believe I can fly,Right here waiting"
那你就用split(",")将它分离出来,然后把它赋值就是啦
当然,如果你的音乐播放器,还支持作者、时间等一系列的东西,那还可以用下面这些啦
<Entry>
<Duration value = "00:03:40" /> <!--播放时间-->
<Author >canning</Author> <!--作者-->
<Param Name = "Description" Value = "http://www.jl.cninfo.net" /> <!--描述值-->
<Param Name = "FileSize" Value = "3530752" /> <!--文件大小,下面是类型-->
<Param Name = "FileType" Value = "mp3" />
<Param Name = "SourceURL" Value = "CloseToYou.mp3" /> <!--文件的位置--,可以本地或网上都是可以的-->
<Title >靠近你</Title> <!--歌曲名称,即在那个列表中显示的名字!-->
</Entry>