📄 djplay.asp

📁 网站整站
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<%
'//版权所有：野草设计

'//程序作者：野草

'//当前版本：V2.0

'//联系QQ：94440079

'//官方网站：http://www.yecaoweb.com
%>
<%
call yecaosql()
Session("auth")=True 
Response.Expires=0 
Response.Expiresabsolute=Now() - 1 
Response.AddHeader "pragma","no-cache" 
Response.AddHeader "cache-control","private" 
Response.CacheControl = "no-cache"
dim djid,num,player,title,lcr
djid=YC_post("娱乐ID",request.querystring("id"),1,0,0) 
num=YC_post("娱乐集数ID",request.querystring("num"),1,0,0)  
call NowWhere("播放娱乐","showdj.asp?id="&djid)
sqlurl="SELECT title,player,url,lcr FROM [YC_djurl] WHERE urlid="&djid&" and num="&num
set rsurl=conn.execute(sqlurl)
dim djurl(4)
djurl(0)=rsurl("title")
djurl(1)=rsurl("player")
djurl(2)=rsurl("url")
djurl(3)=rsurl("lcr")
sqluser="select user_exper,user_money from [YC_user] where id="&userid
set rsuser=conn.execute(sqluser)
dim djuser(0)
djuser(0)=rsuser("user_exper")
rsuser.close
set rsuser=nothing
sql="select exper,money,reads from [YC_dj] where id="&djid
set rs=conn.execute(sql)

if rs("reads")=0 then
call godj()
elseif rs("reads")=1 then
if useradmin>=1 then
	if cint(djuser(0))>rs("exper") then
	call godj()
	else
YCGO("error.asp?action=error&text="&server.urlencode("您的积分不足！")&"")
	end if
else
YCGO("error.asp?action=error&text="&server.urlencode("只有会员才能浏览！")&"")
end if
elseif rs("reads")=2 then
if useradmin>=2 then
if cint(djuser(0))>rs("exper") then
	call godj()
	else
YCGO("error.asp?action=error&text="&server.urlencode("您的积分不足！")&"")
	end if
else
YCGO("error.asp?action=error&text="&server.urlencode("只有收费会员才能浏览！")&"")
end if
end if
rs.close
set rs=nothing
rsurl.close
set rsurl=nothing

sub godj()
YC("<html><head><title>"&djurl(0)&"</title>")
YC("<style>")
YC("#lrcollbox td, #lrcollbox font{font-size: 12px;}")
YC("#lrcoll td { color:#999999; cursor: default; }")
YC("#lrcbox { color:#999999}")
YC("#lrcbc { color:#FFFFFF}")
YC("A:visited { TEXT-DECORATION: none;color: #000000; }")
YC("A:active { COLOR: #000000; TEXT-DECORATION: none; }")
YC("A:link { TEXT-DECORATION:none ; Color:#000000 }")
YC("#idDownload {behavior:url(#default#download);}")
YC("A:hover{ TEXT-DECORATION: underline; Color:#ffffff}")
YC("#lrcfilter { filter: alpha(opacity=0) } ")
YC("</style>")
YC("<script>")
YC("function window.onhelp() {")
YC("return false}")
YC("function document.onkeydown() {")
YC("if (event.keyCode==116) {")
YC("event.keyCode = 0;")
YC("event.cancelBubble = true;")
YC("return false;")
YC("}")
YC("if (event.keyCode==122) {")
YC("event.keyCode = 0;")
YC("event.cancelBubble = true;")
YC("return false;")
YC("}")
YC("if ((event.ctrlKey && event.keyCode==82)) {")
YC("event.keyCode = 0;")
YC("event.cancelBubble = true;")
YC("return false;")
YC("}")
YC("if ((event.ctrlKey && event.keyCode==78)) {")
YC("event.keyCode = 0;")
YC("event.cancelBubble = true;")
YC("return false;")
YC("}")
YC("if ((event.keyCode == 8) && (event.srcElement.type != ""text"" && event.srcElement.type != ""textarea""&&event.srcElement.type != ""password"")) {")
YC("event.keyCode = 0;")
YC("event.cancelBubble = true;")
YC("return false;")
YC("}")
YC("}")
YC("</script>")
YC("</head><body style=""margin:0px;background:url(img/djbg.gif) #000 repeat-x;color:fff"" scroll=""no"" oncontextmenu=""return false"" ondragstart=""return false"" onselectstart=""return false"">")
'━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
if djurl(1)=1 then
YC("<script language=""javascript"">self.resizeTo(480,360);</SCRIPT>")
YC("<script src=""inc/media.js""></script>")
YC("<download id=""idDownload"">")
YC("<div id=""lrcollbox"" style=""overflow:hidden; height:260;width:100%; background:transparent;"">")
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0"" width=""100%"" id=""lrcoll"" style=""position:relative;top: -20px;"">")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt1""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt2""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt3""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt4""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt5""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"" id=""lrcwt6""></td></tr>")
YC("<tr><td nowrap height=""20"" align=""center"">")
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0"">")
YC("<tr><td nowrap height=""20""><span id=""lrcwt7"" style=""height:20""></span></td></tr>")
YC("<tr style=""position:relative;top: -20px; z-index:6""><td nowrap height=""20""><div id=""lrcfilter"" style=""overflow:hidden; ")
YC("width:100%; color:#FFFF33; height:20""></div></td></tr>")
YC("</table>")
YC("</td></tr>")
YC("<tr style=""position:relative;top: -20px""><td nowrap height=""20"" align=""center"">")
YC("<table border=""0"" cellspacing=""0"" cellpadding=""0"">")
YC("<tr><td nowrap height=""20""><span id=""lrcbox"" style=""height:20"">正在播放......</span></td></tr>")
YC("<tr style=""position:relative;top: -20px; z-index:6;""><td nowrap height=""20""><div id=""lrcbc"" style=""overflow:hidden; ")
YC("height:20; width:0;""></div></td></tr>")
YC("</table>")
YC("</td></tr>")
YC("<tr style=""position:relative;top:-40px;""><td nowrap height=""20"" align=""center"" id=""lrcwt8""></td></tr>")
YC("<tr style=""position:relative;top:-40px;""><td nowrap height=""20"" align=""center"" id=""lrcwt9""></td></tr>")
YC("<tr style=""position:relative;top:-40px;""><td nowrap height=""20"" align=""center"" id=""lrcwt10""></td></tr>")
YC("<tr style=""position:relative;top:-40px;""><td nowrap height=""20"" align=""center"" id=""lrcwt11""></td></tr>")
12 下一页
⌨️ 快捷键说明

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