📄 useredit.asp
字号:
<!-- #include file="ChkPwd.asp" -->
<%
UserId = Session("UserId")
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("Database/discuss.mdb")
SET rs = Conn.Execute("SELECT * FROM Users WHERE UserId = " & trim(UserId))
%>
<html>
<head>
<title>修改密码</title>
</head>
<Script Language="JavaScript">
function ChkFields() {
if (document.myform.OriPwd.value=='') {
alert("请输入原始密码！")
return false
}
if (document.myform.Pwd.value.length<6) {
alert("新密码长度大于等于6！")
return false
}
if (document.myform.Pwd.value!=document.myform.Pwd1.value) {
alert("两次输入的新密码必须相同！")
return false
}
return true
}
</Script>
<body background="images/Back.jpg">
<form method="POST" action="UserSave.asp" name="myform" onsubmit="return ChkFields()">
<p align="center">修改用户信息</p><input type="hidden" name="flag" value="Edit">
<table align="center" border="1" cellpadding="1" cellspacing="1" width="276" bordercolor="#008000" bordercolordark="#FFFFFF" height="145">
<tr>
<td align=left width="110" height="18" bgcolor="#E7F7FF">用户名</td>
<td width="150" height="18"><%=Session("UserName")%></td>
</tr>
<tr>
<td align=left width="110" height="23" bgcolor="#E7F7FF">用户姓名</td>
<td width="150" height="23"><input type="text" name="Ename" size="20" value="<%=rs("Ename")%>"></td>
</tr>
<tr>
<td align=left width="110" height="23" bgcolor="#E7F7FF">电子邮箱</td>
<td width="150" height="23"><input type="text" name="Email" size="20" value="<%=rs("Email")%>"></td>
</tr>
<tr>
<td align=left width="110" height="23" bgcolor="#E7F7FF">原始密码</td>
<td width="150" height="23">
<input type="password" name="OriPwd" size="20"></td>
</tr>
<tr>
<td align=left width="110" height="23" bgcolor="#E7F7FF">新密码</td>
<td width="150" height="23"><input type="password" name="Pwd" size="20"></td>
</tr>
<tr>
<td align=left width="110" height="24" bgcolor="#E7F7FF">密码确认</td>
<td width="150" height="24">
<input type="password" name="Pwd1" size="20"></td>
</tr>
<tr>
<td align=left width="110" height="33" bgcolor="#E7F7FF">请选择头像</td>
<td width="150" height="33"><select size="1" name="logo" onChange="showlogo()">
<% for i=1 to 15
Response.Write("<option ")
If trim(rs("Logo")) = trim(i)&".gif" Then
Response.Write("selected ")
End If
%>
value = "<%=i%>"><%=i%></option>
<% next %>
</select> <img src="images/<%=rs("Logo")%>" name="img">
<script>
function showlogo(){
document.images.img.src = "images/" + document.myform.logo.options[document.myform.logo.selectedIndex].value + ".gif";
}
</script>
</td>
</tr>
</table>
<p align="center">
<input type="submit" value=" 提 交 " name="B2"></p>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -