admin_adminuser_save.asp

来自「ASP+Accesss数据库设备WEB报修」· ASP 代码 · 共 23 行

<!--#include file =conn.asp-->
<%
if session("pass")<>"ok" then 
  Response.Redirect "index.asp"
  Response.End 
end if
'--------------------------
admin_name=request("admin_name")
'--------------------------
Set rs_user = Server.CreateObject("ADODB.Recordset")
sql="select * from admin"
rs_user.open sql,conn,3,2
rs_user.subject
'--------------------------
rs_user("admin_name")=admin_name
rs_user.update
rs_user.close
set conn=nothing
%>
<script language="javascript">
	alert("管理员修改成功！");
	window.location.href="admin_manager_list.asp";
</script>