📄 down_sort_save.asp

📁 很好的企业网站管理系统!可以适应各种不同的小型企业!
💻 ASP
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="程序制作：xoyu（QQ：5964887）www.xoyu.com">
<title>晓宇听幽网站内容管理系统</title>
<link rel="stylesheet" href="admin.css" type="text/css">
</head>
<body>
<%
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误：禁止从站点外部提交数据!.')</script>")
response.end
end if

if request("xoYuStudioID")="" then
response.write("<script>alert('错误:拜托~ 先选个软件再确定好不好!');history.go(-1)</script>")
response.end
elseif request("xoYuStudioDo")="生成" then
xoYuStudioID=replace(request("xoYuStudioID")," ","")
response.redirect "down_makesoftall.asp?type=xoYuStudioID&xoYuStudioID="&xoYuStudioID&""
response.end
elseif request("xoYuStudioDo")="移动" then
xoYuStudioID=replace(request("xoYuStudioID")," ","")
response.redirect "down_move.asp?xoYuStudioMoveType=id&xoYuStudioID="&xoYuStudioID&""
response.end
end if
%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_down.asp"-->
<%
if request("xoYuStudioDo")="删除" then
conn.execute("delete from down where id in("&request("xoYuStudioID")&")")
conn.execute("delete from downfile where downid in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "down_sort.asp?id="&request("id")&"&page="&request("page")&"&k="&request("k")&""
response.end
elseif request("xoYuStudioDo")="星级" then
if request("hot")<>"" then
conn.execute("update down set hot='"&request("hot")&"' where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.write("<script>alert('成功:软件评级(星级)修改完成!');history.go(-1)</script>")
response.end
else
conn.close
set conn=nothing
response.write("<script>alert('错误:全部不给星星吗? 有点过份哦~~!');history.go(-1)</script>")
response.end
end if
elseif request("xoYuStudioDo")="推荐" then
if request("show")<>"" then
conn.execute("update down set show='"&request("show")&"' where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "down_sort.asp?id="&request("id")&"&page="&request("page")&"&k="&request("k")&""
response.end
else
conn.close
set conn=nothing
response.write("<script>alert('错误:推不推荐也做个决定吧!');history.go(-1)</script>")
response.end
end if
elseif request("xoYuStudioDo")="类别" then
if request("cd")<>"" then
conn.execute("update down set cd='"&request("cd")&"' where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.write("<script>alert('成功:软件类别修改完成!');history.go(-1)</script>")
response.end
else
conn.close
set conn=nothing
response.write("<script>alert('错误:麻烦你先选个类别~!');history.go(-1)</script>")
response.end
end if
elseif request("xoYuStudioDo")="会员" then
if request("hy")<>"" then
conn.execute("update down set hy='"&request("hy")&"' where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "down_sort.asp?id="&request("id")&"&page="&request("page")&"&k="&request("k")&""
response.end
else
conn.close
set conn=nothing
response.write("<script>alert('错误:会员软件这个非同小可,请先选好给那个等级的会员下载!');history.go(-1)</script>")
response.end
end if
end if
%>
</body></html>
⌨️ 快捷键说明

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