renpassword.asp
来自「适用于网络/信息企业」· ASP 代码 · 共 127 行
ASP
127 行
<!--#include file="../INC/Conn.asp"-->
<!--#include file="inc/Check.asp"-->
<!--#include file="../INC/Md5.asp"-->
<!--#include file="inc/public.asp"-->
<%
dim Makking
Makking = Trim(Request.QueryString("Makking"))
'---------------------------------
select case Makking
case "save"
if Trim(Request.Form("oldEmployee_password"))= "" then
Save_title="·对不起，旧密码不能为空"
call Save_err()
end if
if Trim(Request.Form("Employee_password"))= "" then
Save_title="·对不起，新密码不能为空"
call Save_err()
end if
if len(Trim(Request.Form("Employee_password")))<6 then
Save_title="·对不起，密码至少为6位"
call Save_err()
end if
if Trim(Request.Form("Employee_password"))<> Trim(Request.Form("Employee_password1")) then
Save_title="·对不起，两次输入的新密码不一样，请重新输入"
call Save_err()
end if
sql="select * from Employee where Employee_ID='"& Session("Eboer_CRM_Employee_ID") &"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
Save_title="·对不起，调用会员数据出错"
call Save_err()
else
if Md5(Trim(Request.Form("oldEmployee_password")))<> trim(rs("Employee_password")) then
Save_title="·对不起，您输入的旧密码不正确"
call Save_err()
end if
rs("Employee_password") = Md5(Trim(Request.Form("Employee_password")))
end if
rs.update
rs.close
set rs=nothing
Save_title="·更改成功"
call Save_ok()
case ""
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>亿博尔</title>
</head>
<link href="Images/Admin.css" rel="stylesheet" type="text/css">
<body>
<table width="98%" height="40" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#D8D8D8">
<tr>
<td height="30" align="left" bgcolor="ffffff"><table width="100%" height="100%" border="0" cellpadding="3" cellspacing="0">
<tr bgcolor="eeeeee">
<td width="5%" align="center"><img src="Images/1.gif" width="13" height="12"></td>
<td width="85%"><span class="style2">管理中心 >>> 更改密码</span></td>
<td width="10%" align="right"> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="98%" height="90%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#D8D8D8">
<tr>
<td valign="top" bgcolor="ffffff"><table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top" bgcolor="ffffff">
<form method='POST' name="form" action="RenPassword.asp?Makking=save">
<input type="hidden" name="city">
<br>
<table width=100% border=0 align='center' cellpadding=1
cellspacing=1 bordercolordark=#ffffff bgcolor="#EBEBEB" class='size09'>
<tr>
<td width='25%' height="25" align="right" bgcolor="ffffff">用
户 ID：</td>
<td height="25" bgcolor="ffffff"> <input name="" type="text" class="box1" id="" value="<%=session("Eboer_CRM_Employee_ID")%>" size="30" readonly="true"></td>
</tr>
<tr>
<td width="25%" height="25" align="right" bgcolor="ffffff">旧
密 码：</td>
<td height="25" bgcolor="ffffff"> <input name="oldEmployee_password" type="password" class="box1" id="oldEmployee_password" value="" size="30"></td>
</tr>
<tr>
<td width='25%' height="25" align="right" bgcolor="ffffff">新
密 码：</td>
<td height="25" bgcolor="ffffff"> <input name="Employee_password" type="password" class="box1" id="Employee_password" size="30"></td>
</tr>
<tr>
<td width='25%' height="25" align="right" bgcolor="ffffff">重复密码：</td>
<td height="25" bgcolor="ffffff"> <input name="Employee_password1" type="password" class="box1" id="Employee_password1" size="30"></td>
</tr>
</table>
<p>
<input name="B1" type="image" src="Images/edit.gif" width="36" height="21" border="0">
<a href="javascript:history.go(-1)"><img src="Images/back.gif" width="36" height="21" border="0"></a></p>
</form></td>
</tr>
</table> </td>
</tr>
</table>
<%end select
Conn.Close
Set Conn = Nothing
%>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="6"></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?