📄 users.asp

📁 blog 又搭工
💻 ASP
字号:
<!-- #include file="conn.asp"-->
<!-- #include file="changepwd.asp"-->
<!-- #include file="md5.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>用户管理</title>
<script language="javascript" type="text/javascript">
	function check1()
	{
			if (document.form.admin.value=="")
			{ 
				alert("错误:请输入用户名!");				
				return false;
				}
			if (document.form.pwd.value=="")
			 { 
 				 alert("错误：请输入密码!");
				 return false;
 	 }
	 return true;	
		}				
</script>
<script type="text/jscript">
		var uReg=/[^A-Za-z0-9]/ig;
		function check3(vAlue){	 	
 		if (uReg.test(vAlue)){
		alert('错误:密码不能输入非法字符!');
		document.form1.password.value=""
			form.password.focus();
			 }
		if (vAlue.length>16){
		alert('错误:密码只能输入16位!');
		document.form1.password.value=""
			form.pwd.focus();
			}
		}
		</script>
		<script type="text/jscript">
		var uReg=/[^A-Za-z0-9]/ig;
		function check2(vAlue){
	 	if (uReg.test(vAlue)){
	 	alert('错误:用户名不能输入非法字符!');
		 document.form1.admin.value=""
			form.admin.focus();
			 }
		if (vAlue.length>12){
		alert('错误:用户名只能输入12位!');
		document.form1.admin.value=""
			form1.admin.focus();
			} 		
		}
		if (vAlue.length<5){
		alert('错误:用户名不得小于5位!');
		document.form1.admin.value=""
			form1.admin.focus();
			} 		
		}
		</script>
<style type="text/css">
<!--
.btn {
	border: 1px solid #F5B814;
	background-color: #F1F8D1;
}
-->
</style>
</head>
<body style="font-size:12px;">
<p>
  <%
dim name
name=request.querystring("name")
dim rs,strsql
set rs=server.createobject("adodb.recordset")
strsql="select * from users where admin='"&name&"'"
rs.open strsql,db,1,2
%>
 用户名： 
 <input type="text" name="admin" value="<%=rs("admin")%>"/>
 密&nbsp;码：
 <input type="text" name="password" value="<%=rs("password")%>"/>
</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<form id="form1" name="form1" method="post" action="" onsubmit="javascript:return check1();">
  <p>&nbsp;用户名：
    <input name="admin" type="text" class="btn" size="19" onchange="check2(this.value)" />
 </p>
  <p>
    &nbsp;&nbsp;密&nbsp;码：
    <input name="password" type="password" class="btn" size="20"  />
  </p>
  <p>确认密码:
    <input name="repassword" type="password" class="btn" size="20" />
      </p>
  <p>
    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    <input name="Submit" type="submit" class="btn" value="修改" />
  </p>
</form>
<%
dim admin,password,rers,restrsql,repassword
admin=request.form("admin")
password=md5(request.form("password"))
repassword=md5(request.form("repassword"))
if admin<>"" then
	if repassword=password then
		set rers=server.createobject("adodb.recordset")
		restrsql="select * from users"
		strsql="update users users set admin='"&admin&"'and password='"&password&"' where admin='"&name&"'"
		set rs=db.execute(strsql)
		rers.open restrsql,db,0,2
		rers.addnew restrsql
		rers("admin")=admin
		rers("password")=password
		rers.update
		response.write "<script>alert('添加成功!');</script>"
	else
		response.write "<script>alert('密码不一致!');form1.admin.focus();</script>"
	end if
end if
%>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -