📄 admin_dj.asp
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/dll.asp"-->
<!--#include file="sqlx.asp"-->
<%call hacker()
if session("superlogin")<>yecao then
response.Write "<script>alert('本站提示：您还没有登陆！');this.location.href='index.asp';</script>"
Response.End
end if
if session("superadmin")<>"dj" then
if session("superadmin")<>"admin" then
response.Write "<script>alert('\n错误提示：您的权限不足！\n\n您不是娱乐管理员！');this.location.href='index.asp';</script>"
Response.End
end if
end if%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
<script src=img/adminjs.js></script>
</head>
<body <%if request("action")="edit" then%>onload="return cc();"<%elseif request("action")="editerror" then%>onload="return error();"<%end if%> style="padding:0;margin:0"><%call titlecolor()%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" rules=none class=3d><tr class="bg" height="22"><td> <img src=img/admin.gif border=0 width=15 height=15 align=absMiddle> <a href="admin_dj.asp?action=type">分类管理</a> <a href="admin_dj.asp?action=addtype">添加分类</a> <a href="admin_dj.asp">娱乐管理</a> <a href="admin_dj.asp?action=add">添加娱乐</a> <a href=admin_dj.asp?action=errorlist>错误报告管理</a></td></tr></table>
<table align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d id=updj style="position:absolute;left:270;top:40;display:none">
<tr onmousedown="MDown(updj)" style="cursor:move" height=22><td colspan="2" class=uptitle><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 上传娱乐文件</b>
<img onclick="document.all.updj.style.display=(document.all.updj.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=dj"></iframe>
</td>
</tr>
</table>
<table align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d id=updjpic style="position:absolute;left:270;top:40;display:none">
<tr onmousedown="MDown(updjpic)" style="cursor:move" height=22><td colspan="2" class=uptitle><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 上传娱乐文件</b>
<img onclick="document.all.updjpic.style.display=(document.all.updjpic.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=djpic"></iframe>
</td>
</tr>
</table>
<table align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d id=uplrc style="position:absolute;left:270;top:40;display:none">
<tr onmousedown="MDown(uplrc)" style="cursor:move" height=22><td colspan="2" class=uptitle><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 上传娱乐文件</b>
<img onclick="document.all.uplrc.style.display=(document.all.uplrc.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=lrc"></iframe>
</td>
</tr>
</table>
<%
select case request("action")
case"delnopass"
user=request.querystring("user")
id=request.querystring("id")
conn.execute("update YC_user set user_money=user_money-10,user_all=user_all-1 where user_name="""&user&"""")
Conn.Execute("Delete * From YC_dj Where id="&id&"")
response.write"<script>location.href='admin_news.asp';</script>"
case"type"
call alltype("YC_djclass","娱乐")
case"edittype"
call edittype("YC_djclass",request("id"))
case"edittypename"
call submittype("YC_djclass",request("id"),request("classname"))
case"addtype"
call addtype()
case"addtypeok"
call addtypeok("YC_djclass",request("classname"))
case"addtype2"
call addtype2(request("id"))
case"addtype2ok"
call addtype2ok("YC_djclass",request("classname"),request("id"))
case"deltype"
call deltype("YC_djclass",request("id"))
case "list"
call list()
case "add"%>
<body onload=IframeID.document.body.innerHTML='暂时没有歌词或者娱乐介绍！'>
<script language="javascript">
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form.title.value==""){
alert("娱乐标题不能为空");
document.form.title.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("娱乐内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script>
<form method="post" name="form" id="form" onsubmit="return chk();" action="?action=addok">
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title" height="22"><td><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 发布娱乐</b></td></tr>
<tr class=bg height="25"><td> 娱乐名称：<input name="title" type="text" id="title" size="20" class=yecao style="width:220px"></td></tr>
<tr class=bg height="25"><td> 标题颜色：<input name="color" type="text" onfocus="colordialog()" class=yecao
value="#000000" style="width:120px" size="20"></td></tr>
<tr class=bg height="25"><td> 娱乐作者：<input name="singer" type="text" id="singer" size="20" class=yecao style="width:120px"> <button onClick="singer.value='未知'" class=button>未知</button> <button onClick="singer.value='网络'" class=button>网络</button> <button onClick="singer.value='<%=webceo%>'" class=button><%=webceo%></button></td></tr>
<tr class=bg height="25"><td> 娱乐大小：<input name="size" type="text" id="size" size="20" class=yecao style="width:120px"></td></tr>
<tr height="25" class=bg><td> 娱乐缩图：<input name="pic" type="text" id="pic" size="20" class=yecao style="width:300px"> <button onclick="document.all.updjpic.style.display=(document.all.updjpic.style.display=='none')?'':'none'" class=button>上传娱乐缩图</button></td></tr>
<tr height="25" class=bg><td> 娱乐地址：<input name="url" type="text" id="url" size="20" class=yecao style="width:300px"> <button onclick="document.all.updj.style.display=(document.all.updj.style.display=='none')?'':'none'" class=button>上传娱乐文件</button></td></tr>
<tr class=bg height="25"><td> 歌词地址：<input name="lrc" type="text" id="lrc2" size="20" class=yecao style="width:300px"> <button onclick="document.all.uplrc.style.display=(document.all.uplrc.style.display=='none')?'':'none'" class=button>上传娱乐歌词</button></td></tr>
<tr class=bg height="25"><td> 娱乐分类：<%call newclass("YC_djclass")%></td></tr>
<tr class=bg height="25"><td> 播放选择：<select name=player class=yecao style="width:120px">
<option value="media">media视听</option><option value="mediamtv">media视频</option>
<option value="medialrc">media歌词</option>
<option value="real">real视听</option><option value="realmtv">real视频</option>
<option value="reallrc">real歌词</option>
<option value="flash">FLASH</option></td></tr>
<tr height="25" class=bg><td> 是否通过：<input name="pass" type="radio" value="true" checked> 通过 <input name="pass" type="radio" value="false"> 不通过</td></tr>
<tr height="25" class=bg><td> 是否推荐：<input name="best" type="radio" value="true" > 推荐 <input name="best" type="radio" value="false" checked> 不推荐</td></tr>
<tr height="25" class=bg><td> 查看权限：<input name="read" type="radio" value="0" checked> 访问游客 <input name="read" type="radio" value="1" > 普通会员 <input name="read" type="radio" value="2"> VIP会员</td></tr>
<tr><td><%call html()%></td></tr><tr><td class="hr"></td></tr>
<tr height="30" class=foot><td align="center">
<input name="new" type="submit" class="adminbutton" id="new" value="发 布"> <input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()"></td></tr>
<textarea name="content" cols="50" rows="50" id="content" style="display:none"></textarea>
</table>
</form>
<%
'◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆
'◇功 能：处理添加记录 ◆
'◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇
case "addok"
set rs7=server.CreateObject("adodb.recordset")
sql7="select * from [YC_djclass] where id="&Cint(Trim(request.Form("class")))
rs7.open sql7,conn,1,1
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_dj",conn,1,3
rs.addnew
rs("title")=trim(replace(request.Form("title"),"'",""))
rs("color")=trim(replace(request.Form("color"),"'",""))
rs("bigclass")=trim(replace(rs7("class"),"'",""))
rs("class")=trim(replace(request.Form("class"),"'",""))
rs("url")=trim(replace(request.Form("url"),"'",""))
rs("pic")=trim(replace(request.Form("pic"),"'",""))
rs("size")=trim(replace(request.Form("size"),"'",""))
rs("singer")=trim(replace(request.Form("singer"),"'",""))
rs("user")=trim(session("superuser"))
rs("player")=trim(replace(request.Form("player"),"'",""))
rs("content")=request.Form("content")
rs("pass")=trim(replace(request.Form("pass"),"'",""))
rs("best")=trim(replace(request.Form("best"),"'",""))
rs("read")=trim(replace(request.Form("read"),"'",""))
rs("lrc")=request.Form("lrc")
conn.execute("update YC_user set user_money = user_money + 5,user_all = user_all + 1 where user_name="""&session("superuser")&"""")
rs.update
rs.close
set rs=nothing
rs7.close
set rs7=nothing
response.write"<script>location.href='admin_dj.asp';</script>"
'◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆
'◇功 能：编辑记录 ◆
'◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇
case "edit"
set rs=server.CreateObject("adodb.recordset")
sql="select * from YC_dj where id="&request.QueryString("id")
rs.open sql,conn,1,1%>
<script language="javascript">
function cc(){
IframeID.document.body.innerHTML=document.all("content").value;
document.all("content").value="";}
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form.title.value==""){
alert("娱乐标题不能为空");
document.form.title.focus();
return false;}
document.form.singe.focus();
return false;}
if(document.form.url.value==""){
alert("娱乐地址不能为空");
document.form.url.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("娱乐内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script>
<form method="post" name="form" id="form" onsubmit="return chk();" action="?action=editok">
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" bordercolor="<%=border%>" rules=none class=3d>
<tr><td height="22" class=title><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 修改娱乐</b></td></tr>
<tr class=bg height="25"><td> 娱乐名称：<input name="title" type="text" id="title" value="<%=Server.HTMLEncode(rs("title"))%>" size="20" class=yecao style="width:220px"></td></tr>
<tr class=bg height="25"><td> 标题颜色：<input name="color" type="text" onfocus="colordialog()" class=yecao
value="<%=rs("color")%>" style="width:120px" size="20"></td></tr>
<tr class=bg height="25"><td> 娱乐作者：<input name="singer" type="text" id="singer" value="<%=rs("singer")%>" size="20" class=yecao style="width:120px"> <button onClick="singer.value='未知'" class=button>未知</button> <button onClick="singer.value='<%=webceo%>'" class=button><%=webceo%></button></td></tr>
<tr class=bg height="25"><td> 娱乐大小：<input name="size" type="text" id="size" value="<%=rs("size")%>" size="20" class=yecao style="width:120px"></td></tr>
<tr height="25" class=bg><td> 娱乐缩图：<input name="pic" type="text" id="pic" size="20" class=yecao style="width:300px" value="<%=rs("pic")%>"> <button onclick="document.all.updjpic.style.display=(document.all.updjpic.style.display=='none')?'':'none'" class=button>重新上传缩图</button></td></tr>
<tr height="25" class=bg><td> 娱乐地址：<input name="url" type="text" id="url" value="<%=rs("url")%>" size="20" class=yecao style="width:300px"> <button onclick="document.all.updj.style.display=(document.all.updj.style.display=='none')?'':'none'" class=button>重新上传娱乐文件</button></td></tr>
<tr class=bg height="25"><td> 歌词地址：<input name="lrc" type="text" id="lrc" value="<%=rs("lrc")%>" size="20" class=yecao style="width:300px"> <button onclick="document.all.uplrc.style.display=(document.all.uplrc.style.display=='none')?'':'none'" class=button>重新上传娱乐歌词</button></td></tr>
<tr class=bg height="25"><td> 娱乐分类：<%call editclass("YC_djclass",rs("class"))%></td></tr>
<tr class=bg height="25"><td> 播放选择：<select name=player class=yecao style="width:120px">
<option value="media" <%if rs("player")="media" then response.write "selected"%>>media视听</option>
<option value="mediamtv" <%if rs("player")="mediamtv" then response.write "selected"%>>media视频</option>
<option value="medialrc" <%if rs("player")="medialrc" then response.write "selected"%>>media歌词</option>
<option value="real" <%if rs("player")="real" then response.write "selected"%>>real视听</option>
<option value="realmtv" <%if rs("player")="realmtv" then response.write "selected"%>>real视频</option>
<option value="reallrc" <%if rs("player")="reallrc" then response.write "selected"%>>real歌词</option>
<option value="flash" <%if rs("player")="flash" then response.write "selected"%>>FLASH</option>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -