谁给我讲讲音乐网站的连播功能是怎么具体实现的啊

wzcgy 2005-06-22 05:40:00
我把选定的歌曲ID按数组存放 然后用FOR循环也不行 不管怎么都只唱第一首歌
...全文
117 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
白夜花寒 2005-06-22
  • 打赏
  • 举报
回复
用asx文件就可以了,可以参考大版的http://dotnet.aspx.cc/play.asx你看看这个如果没记错的,这个网站是孟子的
coolstr 2005-06-22
  • 打赏
  • 举报
回复
例:realserver做服务器的。


将连播列表放入一个文件XX.ram中,然后客户端再调用这个文件即可。
wzcgy 2005-06-22
  • 打赏
  • 举报
回复
musicplay.asp

<!--#include file="conn.asp"-->
<!--#include file="../const.asp"-->
<!--#include file="CHAR.INC"-->

<%
set rs=server.createobject("adodb.recordset")
sql="select * from MusicList where id="&request("id")
rs.open sql,conn,1,3
if rs.eof then
errmsg=errmsg+"<br><li>对不起!请正确选择歌曲。</li>"
founderr=true
else
id=rs("id")
Singer=rs("Singer")
MusicName=rs("MusicName")
ListenUrl=rs("wma")
hits=rs("hits")
%>
<!--#include file="../inc/musicurl.asp"-->
<%
end if
%>
<script language=javascript src=../adjs/ping.js></script>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" onkeydown="KeyDown()" onselectstart="return false" oncontextmenu="event.returnValue=false">
<%if info="rm" or info="ram" or info="avi" or info="ra" or info="rmvb" or info="smil" then%>
<TABLE cellSpacing=0 cellPadding=0 width=250 border=0 >
<TBODY>
<TR>
<TD valign="top"><script language="JavaScript">
<!--
document.write(" <OBJECT classid=\"clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA\" height=70 id=video1 style=\"LEFT: 0px; TOP: 0px\" width=300 VIEWASTEXT>");
document.write(" <param name=\"_ExtentX\" value=\"7435\">");
document.write(" <param name=\"_ExtentY\" value=\"1588\">");
document.write(" <param name=\"AUTOSTART\" value=\"-1\">");
document.write(" <param name=\"SHUFFLE\" value=\"0\">");
document.write(" <param name=\"PREFETCH\" value=\"0\">");
document.write(" <param name=\"NOLABELS\" value=\"0\">");
document.write(" <param name=\"SRC\" value=\"<%=playurl%><%=ListenUrl%>\">");
document.write(" <param name=\"CONTROLS\" value=\"StatusBar,ControlPanel\">");
document.write(" <param name=\"CONSOLE\" value=\"RAPLAYER\">");
document.write(" <param name=\"LOOP\" value=\"0\">");
document.write(" <param name=\"NUMLOOP\" value=\"0\">");
document.write(" <param name=\"CENTER\" value=\"0\">");
document.write(" <param name=\"MAINTAINASPECT\" value=\"0\">");
document.write(" <param name=\"BACKGROUNDCOLOR\" value=\"#000000\">");
document.write(" </OBJECT>");
//-->
</script></TD>
</TR>
</TBODY>
</TABLE>
<%elseif info="mp3" or info="wma" or info="asf" or info="mpeg" or info="wmv" or info="mpg" or info="asx" or info="vod" or info="wav" or info="midi"then%>
<table width="250" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<script language="jscript">
<!--
document.write ("<object id=\"mPlayer1\" width=280 height=64 \n")
document.write ("classid=\"CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6\" type=application/x-oleobject standby=\"Loading Windows Media Player components...\">\n")
document.write ("<param name=\"URL\" value='<%=playurl%><%=ListenUrl%>'>\n")
document.write ("<param name=\"rate\" value=\"1\">\n")
document.write ("<param name=\"balance\" value=\"0\">\n")
document.write ("<param name=\"currentPosition\" value=\"0\">\n")
document.write ("<param name=\"defaultFrame\" value=\"\">\n")
document.write ("<param name=\"playCount\" value=\"100\">\n")
document.write ("<param name=\"autoStart\" value=\"-1\">\n")
document.write (" <param name=\"currentMarker\" value=\"0\">\n")
document.write ("<param name=\"invokeURLs\" value=\"-1\">\n")
document.write ("<param name=\"baseURL\" value=\"\">\n")
document.write ("<param name=\"volume\" value=\"100\">\n")
document.write ("<param name=\"mute\" value=\"0\">\n")
document.write ("<param name=\"uiMode\" value=\"full\">\n")
document.write ("<param name=\"stretchToFit\" value=\"0\">\n")
document.write ("<param name=\"windowlessVideo\" value=\"0\">\n")
document.write ("<param name=\"enabled\" value=\"-1\">\n")
document.write ("<param name=\"enableContextMenu\" value=\"0\">\n")
document.write ("<param name=\"fullScreen\" value=\"0\">\n")
document.write ("<param name=\"SAMIStyle\" value=\"\">\n")
document.write ("<param name=\"SAMILang\" value=\"\">\n")
document.write ("<param name=\"SAMIFilename\" value=\"\">\n")
document.write ("<param name=\"captioningID\" value=\"\">\n")
document.write ("</object><br>\n")
//-->
</script></td>
</tr>
</table>
<%else%>
<table width="250" height="30" border="0" cellpadding="0" cellspacing="0" bgcolor="ffffff" class="bg">
<tr>
<td align="center">数据连接有误,请梢后进行试听!</td>
</tr>
</table><% end if%></body>
wzcgy 2005-06-22
  • 打赏
  • 举报
回复
PLAY.asp

<!--#include file="conn.asp"-->
<!--#include file="../const.asp"-->
<!--#include file="CHAR.INC"-->
<%
id_array=split(request.QueryString("id"),",")
id=request.QueryString("id")
founderr=false
if id="" then
errmsg=errmsg+"<br><li>对不起!请选择歌曲!</li>"
call error()
Response.End
end if


set rs=server.createobject("adodb.recordset")

sql = "SELECT * FROM MusicList WHERE id="&id
rs.open sql,conn,1,3
if rs.eof then
errmsg=errmsg+"<br><li>对不起!请正确选择歌曲。</li>"
founderr=true
else
MusicName=rs("MusicName")
Singer=rs("Singer")
ListenUrl=rs("ListenUrl")
Specialid=rs("Specialid")
Classid=rs("Classid")
SClassid=rs("SClassid")
NClassid=rs("NClassid")
hits=rs("hits")
%>
<%
end if
rs.close



if Specialid<>"" and not isnull(Specialid) then
sql = "SELECT pic,name FROM Special WHERE Specialid="&Specialid
rs.open sql,conn,1,1
if not rs.eof then
SpecialName=rs("name")
pic=rs("pic")
end if
rs.close
end if

set rs=nothing
conn.close
set conn=nothing
if founderr=true then
call error()
else
call ShowMusic
end if

%>
<%
sub ShowMusic
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=MusicName%></title>
</head>
<script language=javascript src=../adjs/ping.js></script>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" onkeydown="KeyDown()" onselectstart="return false" oncontextmenu="event.returnValue=false">
<link href="../Images/music/xmb.css" rel="stylesheet" type="text/css">
<link href="../css/style.css" rel="stylesheet" type="text/css">

<table width="200" border="0" align="center" cellpadding="0" cellspacing="0" oncontextmenu="return false" ondragstart="return false" onselectstart ="return false" onselect="document.selection.empty()" oncopy="document.selection.empty()" onbeforecopy="return false" onmouseup="document.selection.empty()">
<tr>
<td align="center" valign="top">
<table width="100%" height="27" border="0" cellpadding="0" cellspacing="0" background="../images/music/bg1.gif" class="bk" >
<tr>
<td width="24"> </td>
<td align="center"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="25"> </td>
<td align="center">
<table width="100" height="27" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="20"></td>
</tr>
</table>
</td>
<td width="25"> </td>
</tr>
</table>

</td>
<td width="25" align="right"> </td>
</tr>
</table>
<table width="250" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#f7f7f7" class="bk" height="10">
<tr>
<td>
<div align="center">

<iframe border=0 frameborder=0 framespacing=0 height=90 width=280 marginheight=1 marginwidth=1 name=list noResize src=musicplay.asp?id=<%=id%> vspale=0 scrolling="no">||你的浏览器不支持嵌入式框架||</iframe></div>
</td></tr>

</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="../images/music/bg.gif" class="bk">
<tr>
<td align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="60" align="center"> </td>
<td align="center"> <table width="100" height="27" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="20">
</td>
</tr>
</table> </td>
<td width="30" align="center"> </td>
<td width="30"> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="252" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="f6f6f6" class="bk">
<tr>
<td valign="top">
<table width="280" border="0" cellpadding="0" cellspacing="0" height="175">
<tr>
<td align="center" height="17" width="33%" bgcolor="#FFFFFF">
<p align="left"> 歌手:<%=singer%></td>
<td align="center" height="17" bgcolor="#FFFFFF" width="67%">
歌名:<%=musicname%></td>
</tr>
<tr>
<td align="center" width="33%" height="17" bgcolor="#FFFFFF" class="border-b">
<p align="left"> 人气:<%=hits%> </td>
<td align="center" height="17" bgcolor="#F7F7F7" class="border-l-t" width="67%">
<a target="music" href="words.asp?id=<%=id%>">查看歌词</a>
<a title="进入此歌手的音乐大碟列表" target="music" href="SpecialLists.asp?Classid=<%=Classid%>&SClassid=<%=SClassid%>&Nclassid=<%=NClassid%>">最新专集</a>
<a title="进入此歌手的音乐单曲列表" target="music" href="MusicList.asp?Classid=<%=Classid%>&SClassid=<%=SClassid%>&Nclassid=<%=NClassid%>">所有歌曲</a>
</td>
</tr>
<tr>
<td align="center" colspan="2" bgcolor="#F7F7F7">
<iframe border=0 frameborder=0 framespacing=0 width=280 marginheight=1 marginwidth=1 name=music noResize src=../adjs/ad.asp vspale=0 height="125">||你的浏览器不支持嵌入式框架||</iframe></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20"><img src="../images/music/footl.gif" width="27" height="10"></td>
<td background="../images/music/footb.gif"><img src="music/images/music/footb.gif" width="7" height="10"></td>
<td width="20"><img src="../images/music/footr.gif" width="27" height="10"></td>
</tr>
</table></td>
</tr>
</table>
</div>
</div>
</body>

</html>
</body>
<%end sub%>
wzcgy 2005-06-22
  • 打赏
  • 举报
回复
选定歌曲之后就到Yxplaylist.asp页
Yxplaylist.asp

<!--#include file="conn.asp"-->
<!--#include file="function.asp"-->
<%
if request("checked")="" then
response.write"<SCRIPT language=JavaScript>alert('哈哈! 出错啦! 至少要选择歌曲一首以上才能连播!');"
response.write"javascript:window.close();</SCRIPT>"
else
end if
conn.close
set conn=nothing
ListenUrl=replace(request("checked"),"","")
ListenUrl=ListenUrl
'ListenUrl=replace(request("checked"),"","")
'ListenUrl=split(ListenUrl,",")
'response.write listenurl
%>

<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>不可不听歌曲连播</title>
</head>
<script language=javascript src=adjs/ping.js></script>
<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" onkeydown="KeyDown()" onselectstart="return false" oncontextmenu="event.returnValue=false">
<link href="Images/music/xmb.css" rel="stylesheet" type="text/css">
<link href="css/style.css" rel="stylesheet" type="text/css">

<table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top">
<table width="100%" height="27" border="0" cellpadding="0" cellspacing="0" background="images/music/bg1.gif" class="bk" >
<tr>
<td width="24"> </td>
<td align="center">
<table width="250" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#f7f7f7" class="bk" height="10">
<tr>
<td>
<div align="center">
<iframe border=0 frameborder=0 framespacing=0 height=90 width=280 marginheight=1 marginwidth=1 name=list noResize src="Play/play.asp?id=<%=ListenUrl%>" vspale=0 scrolling="no">||你的浏览器不支持嵌入式框架||</iframe></div>
</td></tr>

</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/music/bg.gif" class="bk">
<tr>
<td align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="25">
<tr>
<td width="60" align="center">视听帮助</td>
<td align="center">
<p align="right"><a target="music" href="user/box.asp">进入我的音乐盒</a> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="252" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="f6f6f6" class="bk">
<tr>
<td valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="175">
<tr>
<td align="center" bgcolor="#F7F7F7">
<iframe border=0 frameborder=0 framespacing=0 width=280 marginheight=1 marginwidth=1 name=music noResize src=adjs/ad.asp vspale=0 height="162">||你的浏览器不支持嵌入式框架||</iframe></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20"><img src="images/music/footl.gif" width="27" height="10"></td>
<td background="images/music/footb.gif">
<img src="play/music/images/music/footb.gif" width="7" height="10"></td>
<td width="20"><img src="images/music/footr.gif" width="27" height="10"></td>
</tr>
</table></td>
</tr>
</table>
</div>
</div>
</html>
</body>

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧