📄 ftp_cpw.asp

📁 九酷网络个人主页系统破解版
💻 ASP
字号:
<!--#include file="config.asp"-->
<!--#include file="chkuser.asp"-->
<!--#include file="inc/user.asp"-->
<!--#include file="inc/md5.asp"-->
<!--#include file="mytop.asp"-->
<link href="css/user.css" rel="stylesheet" type="text/css">
<script language=javascript>
function manage(url)
{
window.open('manage.asp','manage','fullscren=yes');
}
</script>
<%
if rshost("ftpreg")="False" then WriteErrMsg("您所属的帐户类型暂时未开放FTP权限！")
if request("action") = "update" then

	UserName		= Request.form("UserName")
	OldPassword		= Request.form("OldPassword")
	NewPassword		= Request.form("NewPassword")
	reNewPassword	= Request.form("reNewPassword")
	UserName		= Replace(UserName,"'","'")

	if len(UserName)<1 or len(OldPassword)<1 or len(NewPassword)<1 or len(reNewPassword)<1 then
	  call mb("表单没有填写完整！","",0)
	end if

	if trim(NewPassword)<>trim(reNewPassword) then
		  call mb("密码与确认密码不一样！","",0)
	end if

	Sql0 = "select top 1 user,[password] from [User accounts] where user = '"& UserName &"'"
	set rs0 = connftp.execute(Sql0)
	if rs0.eof and rs0.bof then
		  call mb("用户名不存在！","",0)
	else
		dbname = rs0("user")
		dbpassword = rs0("password")
	end if

	cdbpassword = left(dbpassword,2) & md5(left(dbpassword,2) & OldPassword,32)

	if trim(cdbpassword) <> trim(dbpassword) then
		  call mb("旧密码错误！","",0)
	else
		newdbpassword=SerUPassEnCode(NewPassword)
		sql2 = "update [User accounts] set password='"&newdbpassword&"' where user='"&UserName&"'"
		connftp.execute(sql2)
		  call mb("密码已经更改，可能要几钟后才能生效！","ftp_cpw.asp",1)
	end if
end if 
%>
<HTML><HEAD><TITLE>更改密码</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href="css/user.css" rel="stylesheet" type="text/css">
<SCRIPT language=javascript>
<!--
function check()
{
	if (form1.NewPassword.value ==0){
		alert ("请输入密码");
		form1.NewPassword.focus();
		return false;
	}
	if (form1.NewPassword.value.length < 6 || form1.NewPassword.value.length > 12){
		alert ("对不起，FTP密码应该为6-12位");
		form1.NewPassword.focus();
		return false;
	}
	if (form1.reNewPassword.value ==0){
		alert ("请再次确认您的密码");
		form1.reNewPassword.focus();
		return false;
	}
	if (document.form1.reNewPassword.value != document.form1.NewPassword.value){
		alert ("您的两次输入的密码不一致");
		document.form1.reNewPassword.focus();
		return false;
	}
	document.form1.submit.disabled=true;
	}
//-->
</SCRIPT>
</HEAD>
<BODY>
<table width="778" border="0" align="center" cellpadding="4" cellspacing="1" class="a2">
		  <form name="form1" method="post" action="?action=update" onSubmit="return check();">
            <tr align="center" class="a1">
              <td height="25" colspan="2">更改FTP密码</td>
            </tr>
            <tr class="a3"> 
              <td width="130">用户名：</td>
              <td width="251"><input name="username" type="text" value="<%=rsuser("username")%>" readonly>                </td>
            </tr>
            <tr class="a4">
              <td>旧密码：</td>
              <td><input name="OldPassword" type="password">
              *</td>
            </tr>
            <tr class="a4"> 
              <td>密　码：</td>
              <td><input name="NewPassword" type="password" id="userpass">
                * 至少6位 </td>
            </tr>
            <tr class="a3"> 
              <td>确认密码：</td>
              <td><input name="reNewPassword" type="password" id="reNewPassword">
              *</td>
            </tr>
            <tr class="a4"> 
              <td colspan="2" align="center"> <input name=submit type=submit value=递交></td>
            </tr>
  </form>
</table>
<!--#include file="links.asp"-->
<!--#include file="bottom.asp"-->
⌨️ 快捷键说明

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