www.gusucode.com > 艺帆全站DIV+CSS体育用品公司网站源码 1.7.5源码程序 > i5808/add_administrator_pass.asp
<!--#include file="../Conn.asp" --> <!--#include file="seeion.asp" --> <!--#include file="md5.Asp" --> <% set rs=server.createobject("adodb.recordset") sql="select * from admin" rs.open sql,conn,1,3 admin=request.form("admin") password=request.form("password") password3=request.form("password3") zsname=request.form("zsname") mail=request.form("mail") qx=request.form("qx") if admin="" then response.Write("<script language=javascript>alert('登陆帐号不能为空!');history.go(-1)</script>") response.end end if IF not isNumeric(request("admin")) then response.write("<script>alert(""登陆帐号必须为字母或数字!""); history.go(-1);</script>") response.end end if if password="" then response.Write("<script language=javascript>alert('登陆密码不能为空!');history.go(-1)</script>") response.end end if rs.addnew if request.Form("password")<>request.Form("password3") then Response.Write "<script>alert('密码输入不一致!请重新输入!');history.go(-1);</script>" response.end end if rs("admin")=admin rs("password")=md5(request.form("password")) rs("zsname")=zsname rs("mail")=mail rs("qx")=qx rs.update rs.close set rs=nothing conn.close set rs=nothing Response.Write "<script>alert('添加成功!点击继续添加!');window.location.href='admin_administrator.asp';</script>" %>