fs_selfservice/FS-SelfService/cgi/change_password.html

   1 <HTML><HEAD><TITLE>MyAccount</TITLE></HEAD>
   2 <BODY BGCOLOR="#eeeeee"><FONT SIZE=5>MyAccount</FONT><BR><BR>
   3 <%= $url = "$selfurl?session=$session_id;action="; ''; %>
   4 <%= include('myaccount_menu') %>
   5 <TD VALIGN="top">
   6
   7 <FONT SIZE=4>Change password</FONT><BR><BR>
   8
   9 <%= if ( $error ) {
  10   $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
  11 } ''; %>
  12
  13 <FORM ACTION="<%= $selfurl %>" METHOD="POST">
  14 <INPUT TYPE="hidden" NAME="session" VALUE="<%= $session_id %>">
  15 <INPUT TYPE="hidden" NAME="action" VALUE="process_change_password">
  16
  17 <TABLE BGCOLOR="#cccccc">
  18
  19   <TR>
  20     <TH ALIGN="right">Change password for account: </TH>
  21     <TD>
  22       <SELECT NAME="svcnum">
  23         <%= foreach my $svc ( @svcs ) {
  24               $OUT .= '<OPTION VALUE="'. $svc->{'svcnum'}. '"'.
  25                         ( $svc->{'svcnum'} eq $svcnum ? ' SELECTED' : '' ). '>'.
  26                       $svc->{'label'}. ': '. $svc->{'value'}. "\n";
  27             }
  28         %>
  29       </SELECT>
  30     </TD>
  31   </TR>
  32
  33   <TR>
  34     <TH ALIGN="right">New password: </TH>
  35     <TD><INPUT TYPE="password" NAME="new_password" SIZE="18"></TD>
  36   </TR>
  37
  38   <TR>
  39     <TH ALIGN="right">Re-enter new password: </TH>
  40     <TD><INPUT TYPE="password" NAME="new_password2" SIZE="18"></TD>
  41   </TR>
  42
  43 </TABLE>
  44 <BR>
  45
  46 <INPUT TYPE="submit" VALUE="Change password">
  47
  48 </FORM>
  49
  50 </TD></TR></TABLE>
  51 <HR>
  52 <FONT SIZE="-2">powered by <a href="http://www.sisd.com/freeside">freeside</a></FONT>
  53 </BODY></HTML>