1 <%= include('header', 'Change password') %>
4 $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
7 <FORM ACTION="<%= $selfurl %>" METHOD="POST">
8 <INPUT TYPE="hidden" NAME="action" VALUE="process_change_password">
10 <TABLE BGCOLOR="#cccccc">
13 <TH ALIGN="right">Change password for account: </TH>
15 <SELECT NAME="svcnum">
16 <%= foreach my $svc ( @svcs ) {
17 $OUT .= '<OPTION VALUE="'. $svc->{'svcnum'}. '"'.
18 ( $svc->{'svcnum'} eq $svcnum ? ' SELECTED' : '' ). '>'.
19 $svc->{'label'}. ': '. $svc->{'value'}. "\n";
27 <TH ALIGN="right">New password: </TH>
28 <TD><INPUT TYPE="password" NAME="new_password" SIZE="18"></TD>
32 <TH ALIGN="right">Re-enter new password: </TH>
33 <TD><INPUT TYPE="password" NAME="new_password2" SIZE="18"></TD>
39 <INPUT TYPE="submit" VALUE="Change password">
44 <%= include('footer') %>