Commit | Line | Data |
---|---|---|
393a4193 | 1 | <html><head> |
5badedb0 | 2 | <link rel="stylesheet" type="text/css" href="/hcoop.css" /> |
b6dd1aaf | 3 | <title>HCoop: Change virtual mailbox password</title> |
393a4193 AC |
4 | </head><body> |
5 | ||
b6dd1aaf AC |
6 | <div class="main"> |
7 | ||
8 | <div class="title"> | |
5badedb0 | 9 | <img class="globe" src="/globe.gif" /> |
b6dd1aaf AC |
10 | <h1>HCoop: Change virtual mailbox password</h1> |
11 | </div> | |
12 | ||
13 | <div class="break"></div> | |
393a4193 AC |
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 | ||
393a4193 AC |
31 | <form action="passwd" method="post"> |
32 | ||
b6dd1aaf AC |
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> | |
393a4193 AC |
38 | <tr> <td><input type="submit" value="Change"></td> </tr> |
39 | </table> | |
40 | ||
41 | </form> | |
b6dd1aaf | 42 | </div> |
393a4193 | 43 | |
b6dd1aaf | 44 | </body></html> |