change_pwd.asp

来自「功能介绍：文章管理」· ASP 代码 · 共 130 行
ASP
130 行
<!--#include file="../Conn.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.form1.admin.value=="")
			{ 
				alert("错误:请输入用户名!");				
				return false;
				}
			if (document.form1.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">
<!--
.input{border: 1px solid #000099;}
.btn{ width:60px;border: 1px dashed #990000;}
.inputhover{
	border: 1px solid #FFFF00;
	background-color: #E6F4FB;
}
-->
</style>
</head>
<body style="font-size:12px;">
<!--#include file="../session.asp" -->
<p>
  <%
dim name
name=request.querystring("name")
dim rs,strsql
set rs=server.createobject("adodb.recordset")
strsql="select * from users"
rs.open strsql,db,1,2
%>
 用户名： 
 <input type="text" name="userName" value="<%=rs("userName")%>"/>
 密&nbsp;码：
 <input type="text" name="userPass" value="<%=rs("userPass")%>"/>
</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<form id="form1" name="form1" method="post" action="" onsubmit="javascript:return check1();">
  <p>&nbsp;用户名：
    <input name="userName" type="text" class="input" size="25" onchange="check2(this.value)" />
 </p>
  <p>
    &nbsp;&nbsp;密&nbsp;码：
    <input name="userPass" type="password" class="input" size="30"  />
  </p>
  <p>确认密码:
    <input name="reuserPass" type="password" class="input" size="30" />
  </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
userName=request.form("userName")
userPass=md5(request.form("userPass"))
reuserPass=md5(request.form("reuserPass"))
if userName<>"" then
	if reuserPass=userPass then
		set rers=server.createobject("adodb.recordset")
		restrsql="select * from users"
		'strsql="update users users set userName='"&userName&"'and userPass='"&userPass&"' where userName='"&userName&"'"
		'set rs=db.execute(strsql)
		rers.open restrsql,db,0,2
		'rers.addnew restrsql
		rers("userName")=userName
		rers("userPass")=userPass
		rers.update
		response.write "<script>alert('更改成功!');window.location.href='change_pwd.asp';</script>"
	else
		response.write "<script>alert('密码不一致!');form1.userName.focus();</script>"
	end if
end if
%>
</body>
</html>
⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?
change_pwd.asp

change_pwd.asp - 源码说明

⌨️ 快捷键说明
