源码为:福建音乐网
错误说明:(无法连续播放)点一个音乐单独播放可以播放,但选择音乐几个音乐连续播放时,弹出播放器提示无法连接。
自己研究了两天两夜,走了十几个技术论坛都未能解决,还请各位朋友们帮忙。
程序下载地址:http://www.downcode.com/downcode/j_9749_cc2ab5f2.shtml
主要文件源码:
一。播放器文件(playl.asp)
<%
if request("id")="" then
response.write"<SCRIPT language=JavaScript>alert('至少要选择歌曲一首以上才能连播!');"
response.write"javascript:window.close();</SCRIPT>"
response.end
else
end if
wma=replace(request("id")," ","")
Response.CacheControl = "no-cache"
%><noscript><iframe src=*.html></iframe></noscript>
<html>
<HTML>
<HEAD>
<TITLE>福建音乐视听网-媒体播放器</TITLE>
<META name="Description" content="asf,wma,mp3,wav,mid ">
<META http-equiv="Content-Type" content="text/html; charset=gb1312">
<STYLE type="text/css">
<!--
A:link { COLOR: silver; TEXT-DECORATION: none }
A:hover { COLOR: white; TEXT-DECORATION: none }
A:active { COLOR: white; TEXT-DECORATION: none }
A:visited { COLOR: silver; TEXT-DECORATION: none }
BODY { margin: 0px 0px 0px 0px; background:white; cursor:crosshair;}
.title{font-size:9pt; font-family:tahoma;}
.time{font-size:9pt; font-family:tahoma;}
--></STYLE>
<SCRIPT Language="JavaScript" src="js/exobud.js"></SCRIPT>
<SCRIPT Language="JavaScript" src="js/set.js"></SCRIPT>
<script language='JavaScript' src='wmalist.asp?id=<%=wma%>'></script>
<SCRIPT Language ="JavaScript" src="js/imgchg.js"></SCRIPT>
<SCRIPT Language ="JScript" FOR=Exobud EVENT=openStateChange(sf)> evtOSChg(sf); </SCRIPT>
<SCRIPT Language ="JScript" FOR=Exobud EVENT=playStateChange(ns)> evtPSChg(ns); </SCRIPT>
<SCRIPT Language ="JScript" FOR=Exobud EVENT=error()> evtWmpError(); </SCRIPT>
<SCRIPT Language ="JScript" FOR=Exobud EVENT=Buffering(bf)> evtWmpBuff(bf); </SCRIPT>
</HEAD>
<BODY onLoad="initExobud();" ondragstart="return false" onselectstart="return false" topmargin=0 leftmargin=0 marginwidth=0 marginheight=0>
<OBJECT ID=Exobud CLASSID="CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6"
type="application/x-oleobject" Standby="Loading.... Microsoft Windows Media Player"
width="0" height="0" style="position:relative;left:0px; top:0px;width:0px;height:0px;">
<param name="autoStart" value="true">
<param name="balance" value="0">
<param name="baseURL" value="">
<param name="currentPosition" value="0">
<param name="currentMarker" value="0">
<param name="enableContextMenu" value="false">
<param name="enableErrorDialogs" value="false">
<param name="fullScreen" value="false">
<param name="invokeURLs" value="false">
<param name="mute" value="false">
<param name="playCount" value="1">
<param name="rate" value="1">
<param name="uiMode" value="none">
<param name="volume" value="100">
</OBJECT>
<div id=volume_move_btn style="position:absolute;left:182; top:121; z-index:10;"><img src="./img/btn_vol.gif" border=0 width="16" height=11 ondragstart="wmpVolMove('volume_move_btn');" style="cursor:hand;" ></div>
<div id=scain style="position:absolute;left:3; top:89; z-index:10;">
<img src="./img/w_scan.gif" border=0 style="cursor:hand;" title="timebar" id="timebar" width="" height="11"><img src="./img/scain.gif" border=0 >
</div>
<div id=scope style="position:absolute;left:165; top:40; z-index:10"><img name="scope" src="./img/equ.gif" border=0 width=86 height=32></div>
<table border="0" cellspacing=0 cellpadding=0 width="300">
<tr>
<td>
<table cellspacing=0 cellpadding=0>
<tr>
<td background="img/main1_01.gif" width="150" height="45" usemap="#Map">
</td>
<td background="img/main1_02.gif" width="150" height="45">
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing=0 cellpadding=0>
<tr>
<td background="img/main2_01.gif" width="259" height="20" onClick="chgTimeFmt(); this.blur();">
<font color="white">
<span id="disp2" width=100 class="time" align="center" title ="时间长度显示方式(Elaps/Laps)" style="cursor:hand;">00:00 | 00:00</span>
</font>
</td>
<td background="img/main2_02.gif" width="41" height="20" >
<img name="rept" src="./img/main2_02.gif" border=0 onClick="chkRept();this.blur();" style="cursor:hand;" title="重复"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing=0 cellpadding=0>
<tr>
<td background="img/main3_01.gif" width="261" height="24" >
<font color="white">
<marquee scrolldelay=70 behavior=alternate scrollamount=1 width=225 height=14 truespeed >
<span id="disp1" width=200 class="title" align=left>福建音乐视听网-媒体播放器</span>
</marquee>
</font>
</td>
<td background="img/main3_02.gif" width="39" height="24" >
<img name="pmode" src="./img/main3_02.gif" border=0 onClick="chgPMode();this.blur();" style="cursor:hand;" title="等待)"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing=0 cellpadding=0>
<tr>
<td background="img/main4_01.gif" width="221" height="18">
<marquee behavior="scroll" scrolldelay=70 direction="right" width="200" scrollamount=0.1><img src="img/scain.gif"></marquee>
</td>
<td onMouseOver="javascript:plist.src ='./img/main4_02_ov.gif';" onMouseOut="javascript:plist.src ='./img/main4_02.gif';" width="79" height="18">
<img src="./img/main4_02.gif" name="plist" width="79" height="18" border=0 style="cursor:hand;" title="播放列表" onClick="openPlaylist('play_list');this.blur();"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table border="0" cellspacing=0 cellpadding=0>
<tr>
<td onMouseOver="javascript:prevt.src ='./img/main5_01_ov.gif';" onMouseOut="javascript:prevt.src ='./img/main5_01.gif';" width="28" height="32">
<img name="prevt" src="./img/main5_01.gif" border=0 onClick="playPrev();this.blur();" style="cursor:hand;" title="上一首"></td>
<td width="26" height="32">
<img name="playt" src="./img/main5_02.gif" border=0 onClick="startExobud();this.blur();" style="cursor:hand;" title="播放"></td>
<td width="25" height="32">
<img name="pauzt" src="./img/main5_03.gif" border=0 onClick="wmpPP();this.blur();" style="cursor:hand;" title="暂停/播放"></td>
<td width="26" height="32">
<img name="stopt" src="./img/main5_04.gif" border=0 onClick="wmpStop();this.blur();" style="cursor:hand;" title="停止"></td>
<td onMouseOver="javascript:nextt.src ='./img/main5_05_ov.gif';" onMouseOut="javascript:nextt.src ='./img/main5_05.gif';" width="27" height="32">
<img name="nextt" src="./img/main5_05.gif" border=0 onClick="playNext();this.blur();" style="cursor:hand;" title="下一首"></td>
<td width="22" height="32">
<img name="vmute" src="./img/main5_06.gif" onClick="wmpMute();this.blur();" style="cursor:hand;" title="静音(Mute)"></td>
<td background="img/main5_07.gif" width="75" height="32"></td>
<td background="img/main5_08.gif" width="71" height="32">
</td>
</tr>
</table>
</td>
</tr>
<tr>
<TD ><div id="capText" style="width:100%;font-size:0px;color:white;display:none;"></div>
</TD>
</TR>
<TR>
<TD height=0 >
二。(wmalist.asp)文件
<!--#include file="../inc/jc_conn.asp"--><%
Dim id
id=saferequest("id")
set rs=server.createobject("adodb.recordset")
sql="select * from musiclist where musicid in (" & id & ")"
rs.open sql,conn,1,1
i=0
do while not rs.eof
i=i+1
NClass=rs("NClass")
name=rs("name")
url1=Rs("url1")
%>mkList("http://music/play/wma2.asp?u=<%=url1%>&m=<%=server.urlencode(name)%>&s=<%=server.urlencode(nclass)%>","<%=name%>","<%=NClass%>");
<%
rs.movenext
if i>=50 then exit do
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>