⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 3d.asp

📁 音乐类型的好网站
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="inc/config.asp"-->
<!--#include file="mdb.asp"-->
<!--#include file="inc/FORMAT.ASP" -->
<%
dim founderr,errmsg
founderr=false
errmsg=""
if request.querystring("dj_id")="" then
  founderr=true
  errmsg=errmsg+"<br>"+"<li>你必须指定操作的对象!"
else
  dim djid
  if not isInteger(request.querystring("dj_id")) then
    founderr=true
    errmsg=errmsg+"<br>"+"<li>非法的歌曲id参数。"
  else
    djid=cint(request.querystring("dj_id"))
  end if
end if
if founderr then
  call diserror()
else
sql="select * from dj where dj_id="&djid
set rs=conn.execute(sql)
dim djurl,djpic
djurl=rs("dj_url")
djpic=rs("dj_pic")
djname=rs("dj_name")
sql="UPDATE dj SET dj_count = dj_count + 1 where dj_id="&djid
conn.execute(sql)
rs.close
set rs=nothing
%>
<html>
<head>
<title><%=djname%>-:::<%=WebName%></title>
<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">
<link href="admin/inc/css.css" rel="stylesheet" type="text/css">
</HEAD>
<script>
var oLastBtn=0,bIsMenu=false 
if (window.Event)
{
document.captureEvents(Event.MOUSEUP); 
}
function nocontextmenu()
{ 
event.cancelBubble=true;
event.returnValue=false; 
return false; 
}
function norightclick(e) 
{ 
if(window.Event) 
{ 
if (e.which !=1)
{
return false; 
}
} 
else 
if(event.button!=1) 
{ 
event.cancelBubble=true;
event.returnValue=false; 
return false; 
} 
}
document.oncontextmenu=nocontextmenu; 
document.onmousedown=norightclick; 
function onKeyDown()
{
if ((event.altKey)||((event.keyCode==8)&&(event.srcElement.type!="text"&&event.srcElement.type!="textarea"&&event.srcElement.type!="password"))||((event.ctrlKey)&&((event.keyCode==78)||(event.keyCode==82)))||(event.keyCode==116))
{
event.keyCode=0;
event.returnValue=false;
}
}
</script>
<script>if(top==self)top.location="play.asp?dj_id=<%=djid%>" </script>
</head>
<body topmargin="0" leftmargin="0" onkeydown="onKeyDown()" onresize="resizeTo(260,268)" scroll=no oncontextmenu="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false" background="menu">
<noscript><iframe src=*.htm></iframe></noscript>
<%if djpic="rm" then%>
<script LANGUAGE="javaScript">              
var ERR_NonePlayer="播放器提示您:您的系统中没有安装Real Player播放器,请在主页上下载。\n\nMovie播放器将关闭。";
var ERR_FileNotFind="播放器提示您:对不起,未发现你要点播的文件。\n\n请更换其他影片!";
var ERR_NotLocateServer="播放器提示您:无法定位歌曲服务器。请更换其他歌曲!";
var ERR_UnkownError="播放器提示您:在线用户过多,服务器限制,请抢线或稍后观看!";
</script>
<table width="100%" height="180" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="100%" valign="top">
 <table border="0" width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="135" align="center"><br>
  <%=padvertise%></td>
</tr>
<tr>
<td width="100%" align="center" height="30"><a href="re_error.asp?dj_id=<%=djid%>">如果歌曲无法视听,请点&nbsp;
这里报告错误!</a></td>
</tr>      
</table></td>                 
</tr>          
</table>      
<div align="center">
<object classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" name="player" width="304" height="30" align="middle" id="player">  
    <param name="_ExtentX" value="7938">
    <param name="_ExtentY" value="1588">
    <param name="AUTOSTART" value="-1">
    <param name="SHUFFLE" value="0">
    <param name="PREFETCH" value="0">
    <param name="NOLABELS" value="0">
    <param name="SRC" value="<%=djurl%>">
    <param name="CONTROLS" value="StatusBar,ControlPanel">
    <param name="LOOP" value="-1">
    <param name="NUMLOOP" value="0">
    <param name="CENTER" value="0">
    <param name="MAINTAINASPECT" value="0">
    <param name="BACKGROUNDCOLOR" value="#000000">
</object>
<script language="javascript"> 
player.SetEnableContextMenu(false);
player.SetWantErrors(true);
</script>
<%elseif djpic="asf" then%>
</div>
<table width="100%" height="231" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="menu">
<tr>
<td width="100%" valign="top" >
<table border="0" width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="135" align="center"><br>
  <%=padvertise%></td>
</tr>
<tr>
<td width="100%" align="center" height="20"><a href="re_error.asp?dj_id=<%=djid%>">如果歌曲无法视听,请点击这里报告错误!</a></td>
</tr>     
</table></td>                 
</tr>
<tr>
<td height="43" align="center" >
  <script language="javascript">
<!--
var str
str="<%=djurl%>";
document.write ("<OBJECT id=Player name=Player classid=CLSID:22d6f312-b0f6-11d0-94ab-0080c74c7e95 border=\"0\" width=304 height=70 type=application/x-oleobject standby=\"Loading Windows Media Player components...\">\n")
document.write ("<param name=\"AudioStream\" value=\"-1\">\n")
document.write ("<param name=\"AutoSize\" value=\"0\">\n")
document.write ("<param name=\"AutoStart\" value=\"-1\">\n")
document.write ("<param name=\"AnimationAtStart\" value=\"-1\">\n")
document.write ("<param name=\"AllowScan\" value=\"-1\">\n")
document.write ("<param name=\"AllowChangeDisplaySize\" value=\"-1\">\n")
document.write ("<param name=\"AutoRewind\" value=\"0\">\n")
document.write ("<param name=\"Balance\" value=\"10\">\n")
document.write ("<param name=\"BaseURL\" value>\n")
document.write ("<param name=\"BufferingTime\" value=\"5\">\n")
document.write ("<param name=\"CaptioningID\" value>\n")
document.write ("<param name=\"ClickToPlay\" value=\"-1\">\n")
document.write ("<param name=\"CursorType\" value=\"0\">\n")
document.write ("<param name=\"CurrentPosition\" value=\"-1\">\n")
document.write ("<param name=\"CurrentMarker\" value=\"0\">\n")
document.write ("<param name=\"DefaultFrame\" value>\n")
document.write ("<param name=\"DisplayBackColor\" value=\"0\">\n")

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -