📄 playsong.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<!--#include file="function.asp"-->
<%
if request("checked")="" then
errmsg="<li>连播请至少选择一首歌！</li>"
call error()
response.end
end if
if OpenConListen<>1 then
errmsg="<li>对不起！本站暂时不提供连播功能，请原谅！</li>"
call error()
response.end
elseif isnull(session("DJ58User")) or isnull(session("HappyMusicPwd")) or session("DJ58User")="" or session("HappyMusicPwd")="" then
errmsg="<li>请登陆！只有会员才能听歌。</li>"
call error()
response.end
else
set rs=server.createobject("adodb.recordset")
sql="select * from user where UserName='"&Session("DJ58User")&"' and PassWord='"&Session("HappyMusicPwd")&"'"
rs.Open sql,conn,1,3
if not rs.eof then
rs("points")=rs("points")+1
rs("Listens")=rs("Listens")+1
rs.Update
else
errmsg="<li>会员不存在！请联系管理员或重新注册。</li>"
call error()
response.end
end if
rs.close
set rs=nothing
end if
conn.close
set conn=nothing
lbSongUrl=replace(request("checked")," ","")
%>
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>歌曲连播</title>
</head>
<STYLE type=text/css>TD {
FONT-SIZE: 12px; COLOR: #ffffff
}
A {
COLOR: #cccccc; TEXT-DECORATION: none
}
</STYLE>
<META content="Microsoft FrontPage 5.0" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0>
<div align="left">
<table border="2" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#1F415C" id="AutoNumber4" bordercolorlight="#2C5B83" bordercolordark="#2C5B83" height="353">
<tr>
<td width="276" height="353">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber5" bgcolor="#1F415C">
<tr>
<td width="274" height="7" colspan="3">
<p align="center">
<img border="0" src="补间" width="5" height="5"></td>
</tr>
<tr>
<td width="5" height="3" rowspan="3">
<img border="0" src="补间" width="5" height="5"></td>
<td bgcolor="#132839" height="112" width="261">
<div align="center">
<center>
<table border="3" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#0F212F" width="265" id="AutoNumber8">
<tr>
<td width="100%">
<p align="center">
<object id=video1 classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" height=227 width=255>
<param name="controls" value="imagewindow">
<param name="console" value="Clip1">
<param name="autostart" value="-1">
<param name="src" value="song.asp?checked=<%=lbSongUrl%>">
<param name="_ExtentX" value="6747">
<param name="_ExtentY" value="6006">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="0">
<param name="BACKGROUNDCOLOR" value="#000000">
<embed src="song.asp?checked=<%=lbSongUrl%>" type="audio/x-pn-realaudio-plugin" console="Clip1" controls="imagewindow" height=66 width=248 autostart=true></object></td>
</tr>
</table>
</center>
</div>
</td>
<td width="5" height="3" rowspan="3">
<img border="0" src="补间" width="5" height="5"></td>
</tr>
<tr>
<td width="261" height="1">
<img border="0" src="补间" width="5" height="5"></td>
</tr>
<tr>
<td width="261" height="1" bgcolor="#1B3850">
<p align="center"><font color="#408AC1">--=此播放器只能连播Real类型舞曲=--</font></td>
</tr>
<tr>
<td width="7" height="28"> </td>
<td width="261" height="28">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#183247" width="100%" id="AutoNumber6">
<tr>
<td width="100%" bgcolor="#1B3850">
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#14293A" width="96%" id="AutoNumber7" height="1">
<tr>
<td width="100%" height="1" bgcolor="#0F212F" colspan="2">
<p align="center">
<img border="0" src="补间.gif" width="1" height="5"></td>
</tr>
<tr>
<td width="100%" height="1" bgcolor="#000000" colspan="2">
<embed src="song.asp?checked=<%=lbSongUrl%>" type="audio/x-pn-realaudio-plugin" console="Clip1" controls="ControlPanel" height=27 width=261> </embed></td>
</tr>
<tr>
<td width="100%" height="1" bgcolor="#000000" colspan="2">
看不到图像或听不到声音请下载<a href="tools/real_plus.zip">Realplayer_plus</a></td>
</tr>
<tr>
<td width="64%" height="1" bgcolor="#000000">
无法显示具体舞曲名称 </td>
<td width="36%" height="1" bgcolor="#000000">
<a title="点歌给朋友" target="_blank" href="WriteSMusic.asp?id=<%=id%>">
<img border="0" src="images/admin_class1.gif">点歌</a>
<a title="收藏此舞曲]" target="_blank" href="UserCollect.asp?action=add&id=<%=id%>">
<img border="0" src="images/admin_class2.gif">收藏</a></td>
</tr>
<tr>
<td width="100%" height="1" bgcolor="#0F212F" colspan="2">
<p align="center">
</embed><img border="0" src="补间.gif" width="1" height="3"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td width="6" height="28"> </td>
</tr>
<tr>
<td width="274" height="12" colspan="3">
<p align="center">
<font color="#2E6089">中国DJ娱乐网版权所有 Copyright © 2002</font></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</div>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -