admin_add.asp

来自「使用Asp+Access+FSO+Jmail+Servu开发」· ASP 代码 · 共 36 行

<%@ language="VBScript"%>
<!--#include file="admin.asp"-->
<!--#include file="../inc/md5.asp"-->

<%
user=request.form("user")
pass=request.form("pass")
pass2=request.form("pass2")
flag=request.Form("flag")
if user="" or pass="" or flag="" then 
Response.write"<script>alert('管理员帐号、密码及等级均不能为空！');location.href='javascript:history.back()'</script>"
response.end
end if
if pass<>pass2 then 
Response.write"<script>alert('两次输入的密码不一致！');location.href='javascript:history.back()'</script>"
response.end
end if
sql="select * from manage_user where username='"&user&"'"
rs.open sql,conn,1,3
if not rs.eof then
Response.write"<script>alert('此管理员已经存在，请使用其它名称！');location.href='admin_admin.asp'</script>"
response.end
rs.close
end if
sql="select * from Manage_User"
rs.open sqltext,conn,1,3
'添加一个管理员帐号到数据库
rs.addnew
rs("userName")=user
rs("passWord")=md5(pass)
rs("flag")=flag
rs.update
rs.close
set rs=nothing
Response.write"<script>alert('新增管理员帐号:"&user&"成功添加！');location.href='admin_admin.asp'</script>"
%>