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

📄 admin_down.asp

📁 网站整站
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/set.asp"-->
<!--#include file="inc/adminfunction.asp"-->
<%
call hacker()
call checkadmin("down")
%>
<html>
<head>
<script type='text/javascript' language='javascript' src='inc/adminjs.js'></script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
</head>
<body style="padding:0;margin:0">
<table width="100%" border="0" cellpadding="0" cellspacing="0" rules=none class=3d><tr class="bg"  height="22"><td>&nbsp;<img src=img/admin.gif border=0 width=15 height=15 align=absMiddle>&nbsp;<a href="admin_down.asp?action=type">分类管理</a>&nbsp;<a href="admin_down.asp?action=addtype">添加分类</a>&nbsp;<a href="admin_down.asp">下载管理</a>&nbsp;<a href="admin_down.asp?action=add">添加下载</a>&nbsp;&nbsp;<a href="html/buy.htm" target="ddd">批量上传文件</a></td></tr></table>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updown style="position:absolute;left:100;top:208;display:none">
<tr onmousedown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class="uptitle"><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件</b>
<img onclick="document.all.updown.style.display=(document.all.updown.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=down"></iframe>
</td>
</tr>
</table>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updownpic style="position:absolute;left:100;top:100;display:none">
<tr onmousedown="MDown(updownpic)" style="cursor:move" height=22><td colspan="2" class="uptitle"><b>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传软件缩略图片</b>
<img onclick="document.all.updownpic.style.display=(document.all.updownpic.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=downpic"></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_down Where id="&id&"")
response.write"<script>location.href='admin_down.asp';</script>"
case"type"
call alltype("YC_downclass","下载")
case"edittype"
call edittype("YC_downclass",request("id"))
case"edittypename"
call submittype("YC_downclass",request("id"),request("classname"))
case"addtype"
call addtype()
case"addtypeok"
call addtypeok("YC_downclass",request("classname"))
case"addtype2"
call addtype2(request("id"))
case"addtype2ok"
call addtype2ok("YC_downclass",request("classname"),request("id"))
case"deltype"
call deltype("YC_downclass",request("id"))
case "list" 		
call list()
case "add"%>
<script language="javascript">
function chk(){
if(document.form.title.value==""){
alert("下载标题不能为空");
document.form.title.focus();
return false;}
if(document.form.url.value==""){
alert("本地下载不能为空");
document.form.url.focus();
return false;}
if(document.form.content.value==""){
alert("本地内容简介不能为空");
document.form.content.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>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;发布下载&nbsp;[发布人:<%if superuser="" then YC("您已经超时!") else YC(superuser) end if%>]</b></td></tr>	
<tr class="bg" height="25"><td>&nbsp;下载名称:<input name="title" type="text" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:220px"><%call addcolor()%></td></tr>
<tr class=bg height="25"><td>&nbsp;推荐程度:<select name="commend" class="yecao" class=yecao style="width:200px">
<option value="★☆☆☆☆">[一星级]★☆☆☆☆</option>
<option value="★★☆☆☆">[二星级]★★☆☆☆</option>
<option value="★★★☆☆" selected>[三星级]★★★☆☆</option>
<option value="★★★★☆">[四星级]★★★★☆</option>
<option value="★★★★★">[五星级]★★★★★</option>
</select>&nbsp;
</td></tr>
<tr class="bg" height="25"><td>&nbsp;下载分类:<%call newclass("YC_downclass")%></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载大小:<input name="filesize" type="text" id="size" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:120px" value="未知"></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载演示:<input name="show" type="text" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:300px" value="<%=weburl%>"></td></tr>
<tr class="bg" height="25"><td>&nbsp;官方主页:<input name="web" type="text" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:300px" value="<%=weburl%>"></td></tr>
<tr height="25" class="bg"><td>&nbsp;下载缩图:<input name="pic" type="text" id="pic" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:300px">&nbsp;<button onclick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" class=button>上传缩图</button></td></tr>
<tr class="bg"><td>&nbsp;下载地址:<input type="text" id="url" name="url" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" size=60 value="" title="设置多个地址请用“|”符号分隔。">&nbsp;<button onclick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" class=button>上传软件</button></td></tr>
<tr height="25" class="bg">
<td>&nbsp;查看权限:<input name="reads" type="radio" value="0" checked>&nbsp;
访问游客&nbsp;<input name="reads" type="radio" value="1">&nbsp;
普通用户&nbsp;<input name="reads" type="radio" value="2">&nbsp;
收费用户&nbsp;积分:<input name="exper" type="text" class="yecao" style="width:30px" value="0"></td></tr>
<tr class="bg"><td><textarea name="content" id="content" style="display:none">暂时没有说明!</textarea>
<iframe ID="HtmlEditor1" src='html/index.asp' frameborder=0 scrolling=no width='100%' HEIGHT='350'></iframe></td></tr>
<tr><td class="hr"></td></tr>
<tr height="30" class=foot><td  align="center"> 
<input name="best" type="checkbox"  id="best" value="1"> 推荐
<input name="new" type="submit" class="adminbutton" id="new" value="发 布">&nbsp;<input name="Submit2" type="reset" class="adminbutton" value="清 空" onclick="ClearReset()">
<input name="pass" type="checkbox"  id="pass" value="1" checked /> 通过</td></tr>
</table> 
</form>

<%
'◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆
'◇功  能:处理添加记录            ◆
'◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇
case "addok"
title=replace(trim(request.Form("title")),"'","")  
color=replace(trim(request.Form("color")),"'","")
writer=replace(trim(request.Form("writer")),"'","")
copyright=replace(trim(request.Form("copyright")),"'","")
pic=replace(trim(request.Form("pic")),"'","")
content=replace(trim(request.Form("content")),"'","")
showpage=cint(request.Form("showpage"))
filesize=replace(trim(request.Form("filesize")),"'","")
commend=replace(trim(request.Form("commend")),"'","")
show=replace(trim(request.Form("show")),"'","")
url=replace(trim(request.Form("url")),"'","")
web=Trim(request.Form("web"))
minclass=cint(trim(request.Form("class")))
exper=cint(request.Form("exper"))
reads=cint(request.Form("reads"))
if minclass="" then
response.write"<script>alert('请选择分类!若没有请添加!');history.back()</script>"
response.end
end if


set rs7=server.CreateObject("adodb.recordset")
sql7="select * from [YC_downclass] where id="&Cint(Trim(request.Form("class")))
rs7.open sql7,conn,1,1
set rs=server.CreateObject("adodb.recordset")
rs.open "YC_down",conn,1,3
rs.addnew
	rs("user")=superuser
	rs("title")=title
	rs("color")=color
	rs("commend")=commend
	rs("pic")=pic
	rs("content")=content
	rs("filesize")=filesize
    rs("show")=show
    rs("url")=url
    rs("web")=web
	rs("bigclass")=cint(rs7("class"))
	rs("reads")=reads
	rs("class")=minclass
	rs("exper")=exper
if request.Form("best")=1 then
    rs("best")=1
end if
if request.Form("pass")=1 then
    rs("pass")=1
end if
call addexper("2","1")
rs.update
rs.close
set rs=nothing
rs7.close
set rs7=nothing
response.write"<script>location.href='admin_down.asp';</script>"
'◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆
'◇功  能:编辑记录                ◆
'◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇◆◇
case "edit"
set rs=server.CreateObject("adodb.recordset")
sql="select * from YC_down where id="&request.QueryString("id")
rs.open sql,conn,1,3%>
<script language="javascript">
function chk(){
if(document.form.title.value==""){
alert("下载标题不能为空");
document.form.title.focus();
return false;}
if(document.form.url1.value==""){
alert("本地下载不能为空");
document.form.url1.focus();
return false;}
if(document.form.content.value==""){
alert("本地内容简介不能为空");
document.form.content.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>&nbsp;<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;修改下载</b></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载名称:<input name="title" type="text" id="title" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:220px" value="<%=rs("title")%>"><%call editcolor()%></td></tr>
<tr class=bg height="25"><td>&nbsp;推荐程度:<select name=commend style="width:200px">
<option value="★☆☆☆☆" <%if rs("commend")="★☆☆☆☆" then response.write "selected"%>>★☆☆☆☆</option>
<option value="★★☆☆☆" <%if rs("commend")="★★☆☆☆" then response.write "selected"%>>★★☆☆☆</option>
<option value="★★★☆☆" <%if rs("commend")="★★★☆☆" then response.write "selected"%>>★★★☆☆</option>
<option value="★★★★☆" <%if rs("commend")="★★★★☆" then response.write "selected"%>>★★★★☆</option>
<option value="★★★★★" <%if rs("commend")="★★★★★" then response.write "selected"%>>★★★★★</option>
</select></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载分类:<%call editclass("YC_downclass",rs("class"))%></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载大小:<input name="filesize" type="text" id="size" size="20" put="0" 
onmouseover='this.className="overput";' 
onmouseout='if (this.put=="0")this.className="put";'
onclick="document.getElementByid("code").style.display='';"
onblur='this.className="put";this.put="0";' 
onfocus='this.className="overput";this.put="1";' class="put" style="width:120px" value="<%=rs("filesize")%>"></td></tr>
<tr class="bg" height="25"><td>&nbsp;下载演示:<input name="show" type="text" size="20" put="0" 
onmouseover='this.className="overput";' 

⌨️ 快捷键说明

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