四芯电话线做网线:怎么在asp网页上加一个在线播放功能！已经有播放器源码

以下是我的播放页面代码

http://www.tuowang.com/ma/login.asp

上面那个地址，用户和密码，都是admin

进去后有一个音乐管理，里有一个试听功能，就是用下面这个代码实现的。
<%
dim sid,addstr,playrm,music_add
sid=Request("sid") '获取播放歌曲的ID'
playoff="true" '给播放开关附值'

if sid="" then playoff="false" '如果获取ID失败，即关闭播放器'

if sid<>"" then '获取成功'
set rsts=Server.createobject("adodb.recordset")
sqls="Select * from music where id="&sid

rsts.open sqls,conn,1,1
music_add=rsts("music_add") '获取文件地址'
add_str=right(trim(Rsts("music_add")),3) '获取扩展名'
if instr(add_str,"rm")>0 or instr(add_str,"ram")>0 then '判断是什么格式'
playrm=1 '为RM格式启动相应播放器'

else
playrm=0
end if
%>
<% if playrm=0 then %>
<object id="mplayer" width="460" height="68" classid="CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95"
codebase="http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=6,4,5,715"
align="baseline" border="0" standby="Loading Microsoft Windows Media Player components..."
type="application/x-oleobject">
<param name="FileName" value="<%=music_add%>">
<param name="ShowControls" value="1">
<param name="ShowPositionControls" value="0">
<param name="ShowAudioControls" value="1">
<param name="ShowTracker" value="1">
<param name="ShowDisplay" value="0">
<param name="ShowStatusBar" value="1">
<param name="AutoSize" value="0">
<param name="ShowGotoBar" value="0">
<param name="ShowCaptioning" value="0">
<param name="AutoStart" value="1">
<param name="PlayCount" value="0">
<param name="AnimationAtStart" value="0">
<param name="TransparentAtStart" value="0">
<param name="AllowScan" value="0">
<param name="EnableContextMenu" value="1">
<param name="ClickToPlay" value="0">
<param name="InvokeURLs" value="1">
<param name="DefaultFrame" value="datawindow">

<embed src="<%=music_add%>" align="baseline" border="0" width="460" height="68"
type="application/x-mplayer2"
pluginspage="http://www.microsoft.com/isapi/redir.dll?prd=windows&sbp=mediaplayer&ar=media&sba=plugin&"
name="MediaPlayer" showcontrols="1" showpositioncontrols="0"
showaudiocontrols="1" showtracker="1" showdisplay="0"
showstatusbar="1"
autosize="0"
showgotobar="0" showcaptioning="0" autostart="1" autorewind="0"
animationatstart="0" transparentatstart="0" allowscan="1"
enablecontextmenu="1" clicktoplay="0" invokeurls="1"
defaultframe="datawindow">
</embed>
</object>

<%else%>

<embed name="rplayer" type="audio/x-pn-realaudio-plugin" src="<%=music_add%>"
controls="ControlPanel,StatusBar" width=460 height=68 border=0 autostart=true loop=true>
</embed>

<% end if

end if%>