<!--#include file="Conn.asp"-->
<%
	Set rsNews=Server.CreateObject("ADODB.RecordSet")
	Id=Request.Form("Id")
	If Id="" Then
		rsNews.Open "Select * from Admin",conn,1,3
		rsNews.Addnew
	Else
		rsNews.Open "Select * from Admin where Id="&Id,conn,1,3
	End If
	rsNews("Admin")=Request.Form("Admin")
	rsNews("PassWord")=Request.Form("Pwd")
	rsNews.Update
	If Id="" Then
		Response.Write "<script language=javascript>alert('添加管理员成功!!');location.href='../AddAdmin.asp';</script>"
	Else
		Response.Write "<script language=javascript>alert('修改管理员信息成功!!');location.href='../SetAdmin.asp';</script>"
	End If
%>