Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

87 lines
2.2 KiB

  1. <%@Language="VBSCRIPT"%>
  2. <HTML>
  3. <!--#include file = "text.asp"-->
  4. <title><%=L_Title_Text%></title>
  5. <FONT COLOR=FFFFFF>
  6. <STYLE>
  7. </STYLE>
  8. </FONT>
  9. <head>
  10. <META HTTP-EQUIV="Content-Type" Content="text/html; charset=Windows-1252">
  11. </head>
  12. <BODY BGCOLOR=#FFFFFF LINK=000000 VLINK=000000>
  13. <%On Error goto 0%>
  14. <%if Request.Form("cancel") <> "" then
  15. if Request.Form("denyifcancel") <> "" then
  16. Response.Status = "401 Unauthorized"
  17. Response.End
  18. else
  19. Response.Redirect(Request.QueryString)
  20. end if
  21. Response.End
  22. end if
  23. %>
  24. <!-- Windows NT Server with IIS -->
  25. <%if Instr(1,Request.ServerVariables("SERVER_SOFTWARE"), "IIS") > 0 then%>
  26. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>
  27. <TR VALIGN=CENTER>
  28. <TD></TD>
  29. <TD WIDTH=20> </TD>
  30. <TD><FONT SIZE=+3 COLOR=#000000><B><%=L_ISM_Text%><BR> <FONT SIZE=-1><%=L_IIS6_Text%><FONT></B></FONT></TD>
  31. </TR>
  32. </Table>
  33. <%end if%>
  34. <!-- Windows NT Workstation with PWS -->
  35. <%if Instr(1,Request.ServerVariables("SERVER_SOFTWARE"), "PWS") then%>
  36. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>
  37. <TR VALIGN=CENTER>
  38. <TD></TD>
  39. <TD WIDTH=20> </TD>
  40. <TD><FONT SIZE=+3 COLOR=#000000><B><%=L_ISM_Text%><BR> <FONT SIZE=-1><%=L_PWS_Text%><FONT></B></FONT></TD>
  41. </TR>
  42. </Table>
  43. <%end if%>
  44. <p>
  45. <form method="POST" action="https://<%=Server.HTMLEncode(Request.ServerVariables("SERVER_NAME"))%>/iisadmpwd/achg.asp?<%=Server.HTMLEncode(Request.QueryString)%>">
  46. <table>
  47. <tr>
  48. <td><%=L_Account_Text%></td><td><input type="text" name="acct" value="
  49. <%if Request.Form("acct") <> "" then%>
  50. <%=Server.HTMLEncode(Request.Form("acct"))%>
  51. <%else%>
  52. <%=Server.HTMLEncode(Request.ServerVariables("REMOTE_USER"))%>
  53. <%end if%>"></td>
  54. </tr>
  55. <tr>
  56. <td><%=L_OldPassword_Text%></td><td><input type="password" name="old" value=""></td>
  57. </tr>
  58. <tr>
  59. <td><%=L_NewPassword_Text%></td><td><input type="password" name="new" value=""></td>
  60. </tr>
  61. <tr>
  62. <td><%=L_Confirm_Text%></td><td><input type="password" name="new2" value=""></td>
  63. </tr>
  64. </table>
  65. <p>
  66. <input type="submit" value="<%=L_OK_Text%>">
  67. <input type="submit" name="cancel" value="<%=L_Cancel_Text%>">
  68. <input type="reset" value="<%=L_Reset_Text%>">
  69. </form>
  70. </body>
  71. </html>