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.

156 lines
4.6 KiB

  1. <%@ Language=VBScript %>
  2. <%Option Explicit%>
  3. <%
  4. '-------------------------------------------------------------------------
  5. ' adminpw_changeConfirm.asp: Change administator password confirm page
  6. '
  7. ' Copyright (c) Microsoft Corporation. All rights reserved.
  8. '
  9. ' Date Description
  10. ' 01-Feb-2001 Created
  11. '-------------------------------------------------------------------------
  12. %>
  13. <!--#include virtual="/admin/inc_framework.asp"-->
  14. <!-- #include file="loc_adminpw.asp" -->
  15. <%
  16. '-------------------------------------------------------------------------
  17. 'Global Variables
  18. '-------------------------------------------------------------------------
  19. Dim page 'Variable that receives the output page object when
  20. 'creating a page
  21. Dim rc 'Return value for CreatePage
  22. Dim G_Flag
  23. rc=SA_CreatePage(L_ADMIN_ACCOUNT_CONFIRM_TEXT,"",PT_PROPERTY,page)
  24. G_Flag=Trim(Request.QueryString("flag"))
  25. 'Serve the page
  26. If (rc=0) Then
  27. SA_ShowPage(page)
  28. End If
  29. '-------------------------------------------------------------------------
  30. 'Function: OnInitPage()
  31. 'Description: Called to signal first time processing for this page.
  32. ' Use this method to do first time initialization tasks
  33. 'Input Variables: PageIn,EventArg
  34. 'Output Variables: PageIn,EventArg
  35. 'Returns: True/False
  36. 'Global Variables: None
  37. '-------------------------------------------------------------------------
  38. Public Function OnInitPage(ByRef PageIn,ByRef EventArg)
  39. 'getting Scheduled task type
  40. G_Flag=Trim(Request.QueryString("flag"))
  41. OnInitPage=TRUE
  42. End Function
  43. '-------------------------------------------------------------------------
  44. 'Function: OnServePropertyPage()
  45. 'Description: Called when the page needs to be served.Use this
  46. ' method to serve content
  47. 'Input Variables: PageIn,EventArg
  48. 'Output Variables: PageIn,EventArg
  49. 'Returns: True/False
  50. 'Global Variables: L_(*)-Localization Strings
  51. '-------------------------------------------------------------------------
  52. Public Function OnServePropertyPage(ByRef PageIn,ByRef EventArg)
  53. Call ServeCommonJavaScript()
  54. %>
  55. <TABLE WIDTH=518 VALIGN=middle ALIGN=left BORDER=0 CLASS="TasksBody">
  56. <%If G_Flag=1 Then %>
  57. <TR>
  58. <TD class="TasksBody" nowrap>
  59. <%=L_PASSWORD_CHANGED_TEXT%>.
  60. </TD>
  61. </TR>
  62. <% Elseif G_Flag=2 Then %>
  63. <TR>
  64. <TD class="TasksBody" nowrap>
  65. <%=L_USERACCOUNT_CHANGED_TEXT%>.
  66. </TD>
  67. </TR>
  68. <% Elseif G_Flag=3 Then %>
  69. <TR>
  70. <TD class="TasksBody" nowrap>
  71. <%=L_USERANDACCOUNTNAME_CHANGED_TEXT%>.
  72. </TD>
  73. </TR>
  74. <% End If %>
  75. </TABLE>
  76. <%
  77. OnServePropertyPage=TRUE
  78. End Function
  79. '-------------------------------------------------------------------------
  80. 'Function: OnPostBackPage()
  81. 'Description: Called to signal that the page has been posted-back.
  82. 'Input Variables: PageIn,EventArg
  83. 'Output Variables: PageIn,EventArg
  84. 'Returns: True/False
  85. 'Global Variables: None
  86. '-------------------------------------------------------------------------
  87. Public Function OnPostBackPage(ByRef PageIn,ByRef EventArg)
  88. OnPostBackPage=TRUE
  89. End Function
  90. '-------------------------------------------------------------------------
  91. 'Function: OnSubmitPage()
  92. 'Description: Called when the page has been submitted for processing.
  93. ' Use this method to process the submit request.
  94. 'Input Variables: PageIn,EventArg
  95. 'Output Variables: PageIn,EventArg
  96. 'Returns: True/False
  97. 'Global Variables: None
  98. '-------------------------------------------------------------------------
  99. Public Function OnSubmitPage(ByRef PageIn,ByRef EventArg)
  100. 'deleting the scheduled task
  101. OnSubmitPage=True
  102. End Function
  103. '-------------------------------------------------------------------------
  104. 'Function: OnClosePage()
  105. 'Description: Called when the page is about to be closed.Use this method
  106. ' to perform clean-up processing
  107. 'Input Variables: PageIn,EventArg
  108. 'Output Variables: PageIn,EventArg
  109. 'Returns: True/False
  110. 'Global Variables: None
  111. '-------------------------------------------------------------------------
  112. Public Function OnClosePage(ByRef PageIn,ByRef EventArg)
  113. OnClosePage=TRUE
  114. End Function
  115. Function ServeCommonJavaScript()
  116. %>
  117. <script language="JavaScript" src="<%=m_VirtualRoot%>inc_global.js">
  118. </script>
  119. <script language="JavaScript">
  120. function Init()
  121. {
  122. DisableCancel()
  123. }
  124. function ValidatePage()
  125. {
  126. return true;
  127. }
  128. function SetData()
  129. {
  130. }
  131. </script>
  132. <%End Function
  133. %>