怎么在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格式启动相应播放器'