www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/user_save.asp
<!--#include file="top.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="WWW.2KY.CN 共享世纪">
<title>共享世纪新闻文章管理系统</title>
<link rel="stylesheet" href="admin.css" type="text/css">
</head>
<body>
<%
'==========================================
'
' 晓宇听幽新闻文章管理系统 2004
'
' 主页地址：http://www.xoYu.com
'
'==========================================
'程序名称：晓宇听幽新闻文章管理系统
'英文名称：xoYu News 2004 Professional
'程序创建时间：2003-7-10
'程序完成时间：2003-9-11
'最后修改时间：2003-10-10
'==========================================
if request("xoYuStudioDo")="搜索用户名" then
response.redirect "user_list.asp?k="&request.form("k")&""
response.end
end if
if request("xoYuStudioID")="" then
response.write("<script>alert('错误:拜托~ 先选个用户再操作好不好!');history.go(-1)</script>")
response.end
end if
%>
<%Admin="UserAdmin"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_user.asp"-->
<%
if request("xoYuStudioDo")="删除" then
conn.execute("delete from userinfo where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "user_list.asp?dj="&request("dj")&"&page="&request("page")&"&k="&request("k")&""
response.end
elseif request("xoYuStudioDo")="锁定" then
conn.execute("update userinfo set lock=1 where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "user_list.asp?dj="&request("dj")&"&page="&request("page")&"&k="&request("k")&""
response.end
elseif request("xoYuStudioDo")="激活" then
conn.execute("update userinfo set lock=0 where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "user_list.asp?dj="&request("dj")&"&page="&request("page")&"&k="&request("k")&""
response.end
elseif request("xoYuStudioDo")="等级" then
if request("newdj")="" then
response.write("<script>alert('错误:拜托~ 先选个级别好不好!');history.go(-1)</script>")
conn.close
set conn=nothing
response.end
end if
conn.execute("update userinfo set dj="&request("newdj")&" where id in("&request("xoYuStudioID")&")")
conn.close
set conn=nothing
response.redirect "user_list.asp?dj="&request("dj")&"&page="&request("page")&"&k="&request("k")&""
response.end
end if
%>
</body></html>