edpass.cgi

非常优秀的一套办公系统

$pagetitle="修改登录密码";
sub edpass {
$errorinfo="";
if ($fields{'opass'} && (!$fields{'npass'} || !$fields{'rpass'})) {$errorinfo="*请两次输入新密码，新密码不能为空！";}
elsif ($uid eq $MasterID) {$errorinfo="*测试版本，管理员密码不可修改！";}
elsif ($fields{'opass'} && $fields{'npass'} ne $fields{'rpass'}) {$errorinfo="*两次输入新密码不相同！";}
elsif ($fields{'opass'} && length($fields{'npass'})<4) {$errorinfo="*输入新密码太短！";}
elsif ($fields{'opass'}) {
   &uinfo($uid);
   $old_password=crypt($fields{'opass'},$cword);
   $old_password=substr($old_password,2,length($old_password));
   if ($old_password ne $upass) {
	$errorinfo="*输入旧密码错误！";
   } else {
   $new_password=crypt($fields{'npass'},$cword);
   $new_password=substr($new_password,2,length($new_password));
   $newdes=&randompass("2");
   $ustats="login_".$statsno."_".$userip."_$newdes";
&writeuserfile($uid,"$uid‖$new_password‖$uname‖$usex‖$ucontact‖$uclass‖$ulevel‖$ustats‖$uxx22‖$uxx23‖$uxx24‖$uxx25‖$uxx26‖$uxx27‖$ut1‖$ut2‖$ut3‖$ut4‖end\n");
   ($ustatus,$ultime,$ulip,$uleword)=split(/_/,$ustats);
   $check_password=crypt($new_password,$uleword);
   $check_password=substr($check_password,2,length($check_password));
   $chkpid=crypt($ultime,$uleword);
   $chkpid=substr($chkpid,2,length($chkpid));
   &redirect("$indexurl?&uid=$uid&pid=$check_password$chkpid","修改密码完成，稍候重新登录！");
   }
}
print qq~
<table border='0' width='100%' cellspacing='1' bgcolor='#000000' cellpadding='0'>
  <tr>
    <td width='100%' bgcolor='#800000' height='19' align='center'><font color='#FFFFFF'><strong>::: 
    [密码管理]修改登录密码 :::</strong></font></td>
  </tr>
  <tr>
    <td width='100%' bgcolor='#FFFFFF' align='center'><form method='POST' action='$indexurl?job=edpass$userinfo'>
<table border='0' width='99%'>
<tr><td align=right height=21></td><td></td></tr>
<tr><td colspan=2><font color=ff4400>$errorinfo</font></td></tr>
<tr><td align=right height=21>旧密码：</td><td><input type=password name=opass class=input></td></tr>
<tr><td align=right height=21>新密码：</td><td><input type=password name=npass class=input></td></tr>
<tr><td align=right height=21>确认新密码：</td><td><input type=password name=rpass class=input></td></tr>
<tr><td align=right height=21></td><td><input type=image src='images/button_edit.gif' border=0 alt='确认修改密码'></td></tr>
<tr><td align=right height=21></td><td></td></tr>
</form></table>
    </td>
  </tr>
  <tr>
    <td width='100%' bgcolor='#FFFFFF' align=center height=21><font color='adadad'>密码修改完成系统将自动重新登录！</font></td>
  </tr>
</table>
~;
}
1;