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.
 
 
 
 
 
 

157 lines
4.6 KiB

<%@ Language=VBScript %>
<%Option Explicit%>
<%
'-------------------------------------------------------------------------
' adminpw_changeConfirm.asp: Change administator password confirm page
'
' Copyright (c) Microsoft Corporation. All rights reserved.
'
' Date Description
' 01-Feb-2001 Created
'-------------------------------------------------------------------------
%>
<!--#include virtual="/admin/inc_framework.asp"-->
<!-- #include file="loc_adminpw.asp" -->
<%
'-------------------------------------------------------------------------
'Global Variables
'-------------------------------------------------------------------------
Dim page 'Variable that receives the output page object when
'creating a page
Dim rc 'Return value for CreatePage
Dim G_Flag
rc=SA_CreatePage(L_ADMIN_ACCOUNT_CONFIRM_TEXT,"",PT_PROPERTY,page)
G_Flag=Trim(Request.QueryString("flag"))
'Serve the page
If (rc=0) Then
SA_ShowPage(page)
End If
'-------------------------------------------------------------------------
'Function: OnInitPage()
'Description: Called to signal first time processing for this page.
' Use this method to do first time initialization tasks
'Input Variables: PageIn,EventArg
'Output Variables: PageIn,EventArg
'Returns: True/False
'Global Variables: None
'-------------------------------------------------------------------------
Public Function OnInitPage(ByRef PageIn,ByRef EventArg)
'getting Scheduled task type
G_Flag=Trim(Request.QueryString("flag"))
OnInitPage=TRUE
End Function
'-------------------------------------------------------------------------
'Function: OnServePropertyPage()
'Description: Called when the page needs to be served.Use this
' method to serve content
'Input Variables: PageIn,EventArg
'Output Variables: PageIn,EventArg
'Returns: True/False
'Global Variables: L_(*)-Localization Strings
'-------------------------------------------------------------------------
Public Function OnServePropertyPage(ByRef PageIn,ByRef EventArg)
Call ServeCommonJavaScript()
%>
<TABLE WIDTH=518 VALIGN=middle ALIGN=left BORDER=0 CLASS="TasksBody">
<%If G_Flag=1 Then %>
<TR>
<TD class="TasksBody" nowrap>
<%=L_PASSWORD_CHANGED_TEXT%>.
</TD>
</TR>
<% Elseif G_Flag=2 Then %>
<TR>
<TD class="TasksBody" nowrap>
<%=L_USERACCOUNT_CHANGED_TEXT%>.
</TD>
</TR>
<% Elseif G_Flag=3 Then %>
<TR>
<TD class="TasksBody" nowrap>
<%=L_USERANDACCOUNTNAME_CHANGED_TEXT%>.
</TD>
</TR>
<% End If %>
</TABLE>
<%
OnServePropertyPage=TRUE
End Function
'-------------------------------------------------------------------------
'Function: OnPostBackPage()
'Description: Called to signal that the page has been posted-back.
'Input Variables: PageIn,EventArg
'Output Variables: PageIn,EventArg
'Returns: True/False
'Global Variables: None
'-------------------------------------------------------------------------
Public Function OnPostBackPage(ByRef PageIn,ByRef EventArg)
OnPostBackPage=TRUE
End Function
'-------------------------------------------------------------------------
'Function: OnSubmitPage()
'Description: Called when the page has been submitted for processing.
' Use this method to process the submit request.
'Input Variables: PageIn,EventArg
'Output Variables: PageIn,EventArg
'Returns: True/False
'Global Variables: None
'-------------------------------------------------------------------------
Public Function OnSubmitPage(ByRef PageIn,ByRef EventArg)
'deleting the scheduled task
OnSubmitPage=True
End Function
'-------------------------------------------------------------------------
'Function: OnClosePage()
'Description: Called when the page is about to be closed.Use this method
' to perform clean-up processing
'Input Variables: PageIn,EventArg
'Output Variables: PageIn,EventArg
'Returns: True/False
'Global Variables: None
'-------------------------------------------------------------------------
Public Function OnClosePage(ByRef PageIn,ByRef EventArg)
OnClosePage=TRUE
End Function
Function ServeCommonJavaScript()
%>
<script language="JavaScript" src="<%=m_VirtualRoot%>inc_global.js">
</script>
<script language="JavaScript">
function Init()
{
DisableCancel()
}
function ValidatePage()
{
return true;
}
function SetData()
{
}
</script>
<%End Function
%>