vmailpasswd/passwd.mlt

   1 <html><head>
   2 <link rel="stylesheet" type="text/css" href="/hcoop.css" />
   3 <title>HCoop: Change virtual mailbox password</title>
   4 </head><body>
   5
   6 <div class="main">
   7
   8 <div class="title">
   9 <img class="globe" src="/globe.gif" />
  10 <h1>HCoop: Change virtual mailbox password</h1>
  11 </div>
  12
  13 <div class="break"></div>
  14 <% if $"email" <> "" then
  15         val email = $"email"
  16         val old = $"old"
  17         val new = $"new"
  18         val new2 = $"new2"
  19
  20         if not (Pass.validEmail email) then
  21                 %><h2><b>That is not a valid virtual mailbox address!</b></h2><%
  22         elseif new <> new2 then
  23                 %><h2><b>Your new passwords do not match.</b></h2><%
  24         elseif not (Pass.change (email, old, new)) then
  25                 %><h2><b>Error changing password.  Did you enter the right e-mail address and current password?</b></h2><%
  26         else
  27                 %><h2><b>Password changed!</b></h2><%
  28         end
  29 end %>
  30
  31 <form action="passwd" method="post">
  32
  33 <table class="blanks">
  34 <tr> <td>E-mail address:</td> <td><input name="email" value="<% Web.html ($"email") %>"></td> </tr>
  35 <tr> <td>Old password:</td> <td><input type="password" name="old"></td> </tr>
  36 <tr> <td>New password:</td> <td><input type="password" name="new"></td> </tr>
  37 <tr> <td>Confirm new password:</td> <td><input type="password" name="new2"></td> </tr>
  38 <tr> <td><input type="submit" value="Change"></td> </tr>
  39 </table>
  40
  41 </form>
  42 </div>
  43
  44 </body></html>