<% if request.Form("add")="yes" Then NetsysName=Trim(Request.Form("NetsysName")) NetsysPass=Trim(Request.Form("NetsysPass")) NetsyClass=Trim(Request.Form("NetsyClass")) NetsysQuestion=Trim(Request.Form("NetsysQuestion")) sql="select * from Netsys_Manage where NetsysName='"&NetsysName&"'" set rs=createobject("adodb.recordset") rs.open sql,conn,1,3 if rs.eof and rs.bof then rs.Addnew rs("NetsysName")=NetsysName rs("NetsyClass")=NetsyClass rs("NetsysPass")=MD5(NetsysPass) rs("NetsysQuestion")=NetsysQuestion rs.update else response.Write "" response.End end if rs.close set rs=nothing response.Write "" response.End Response.end end if %>

当前位置 >> 网站管理员 | 新增管理员

登录用户名： * 用户姓名全名： * 角色权限： 管理员 员工 * 登录密码： * 确认密码 *