📄 my_psw.asp
字号:
<!--#include file="include/dbopenbd.asp" -->
<!--#include file="md5.asp"-->
<%
call checklogin()
if request("edit")="ok" then call edit()
%>
<HTML>
<HEAD>
<TITLE>修改密码-<%=sitename%>-<%=siteurl%></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="description" content="<%=sitename%>">
<meta name="keywords" content="<%=sitename%>">
<link rel="stylesheet" href="include/css.css" type="text/css">
</HEAD>
<CENTER>
<!--#include file="a_top.asp"-->
<table width=760 border=0 align=center cellpadding=0 cellspacing=0 bgcolor="#FFFFFF" class="grayline" >
<tr>
<td align="center" valign="top" width="185">
<!--#include file="user_center_menu.asp"-->
</td>
<td bgcolor="#CCCCCC" width="1"></td>
<td valign="top" bgcolor="#FfFfFf" width="570">
<TABLE border=0 width="100%" cellspacing="2" cellpadding="2" align=center>
<td height=30>目前位置：<a href=main.asp>首页</a> > <a href=user_center.asp>用户中心</a> > 密码设置</td></tr>
<tr><td width="570" align="center" height="1" background="images/small/bgline.gif"></td></tr></table>
<br>
<%
set rs=conn.execute("select * from s_buser where UserId='"&request.cookies("buyok")("userid")&"'")
%>
<form name="myinfo" action="my_psw.asp" method="post">
<table width="80%" border="1" cellpadding="4" cellspacing="0" bordercolor="#C0C0C0" align=center bordercolordark="#FFFFFF">
<tr>
<td width="28%" align="right">登陆帐号</td>
<td width="72%"><%=rs("UserID")%><input type=hidden name="userid" value="<%=rs("UserID")%>"></td>
</tr>
<tr>
<td width="28%" align="right">原 密 码</td>
<td width="72%"><input type="password" name="oldpassword" maxlength=16 style="height=20; BORDER: darkgray 1px solid; FONT-SIZE: 8pt; COLOR: #666666; FONT-FAMILY: verdana ; overflow:auto;"> <a style="color:BLUE;" href=my_psw_set.asp>设置取回密码问答</a> </td>
</tr>
<tr>
<td width="28%" align="right">新 密 码</td>
<td width="72%"><input type="password" name="pw1" maxlength=16 style="height=20; BORDER: darkgray 1px solid; FONT-SIZE: 8pt; COLOR: #666666; FONT-FAMILY: verdana ; overflow:auto;"></td>
</tr>
<tr>
<td width="28%" align="right">密码确认</td>
<td width="72%"><input type="password" name="pw2" maxlength=16 style="height=20; BORDER: darkgray 1px solid; FONT-SIZE: 8pt; COLOR: #666666; FONT-FAMILY: verdana ; overflow:auto;"></td>
</tr>
<tr><td colspan=2 align=center>
<input type="submit" name="Submit" value="确认修改">
<input name="Submit2" type="reset" value="不做修改"><input type=hidden name=edit value="ok">
</td></tr>
</form>
</table>
<%
rs.close
set rs=nothing
%>
</td>
</TR>
</TABLE>
<!--#include file="a_bottom.asp"-->
</BODY>
</HTML>
<%
sub edit()
call check_path() '保证此页的调用是合法的
oldpassword=trim(request("oldpassword"))
Pw1=trim(request("pw1"))
Pw2=trim(request("pw2"))
if oldpassword="" or Pw1="" or pw2="" then mGoBack "出错了，填写不完整，请输入原密码及新密码。"
if Pw1<>pw2 then mGoBack "出错了，两次输入的新密码不符。"
if llen(pw1)<6 then mGoBack "出错了，您输入的新密码的长度不够，要求最低6位。"
set rs=conn.execute("select * from s_buser where UserId='"&request.cookies("buyok")("userid")&"'")
if rs("userpassword")<>md5(oldpassword) then mGoBack "出错了，您输入的原密码不正确。"
if ucase(request.cookies("buyok")("userid"))<>ucase(request.form("userid")) then mGoBack "出错了，您无权进行此操作。"
sql = "select * from s_buser where UserId='"&request.cookies("buyok")("userid")&"'"
set rs=Server.Createobject("ADODB.RecordSet")
rs.Open sql,conn,1,3
rs("userpassword")=md5(pw1)
rs.update
rs.close
set rs=nothing
response.write "<script language='javascript'>"
response.write "alert('操作成功，您已经成功修改登陆密码。\n\n请牢记新的密码！');"
response.write "location.href='my_psw.asp';"
response.write "</script>"
response.end
end sub
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -