<%
' Role Administrator
' modifyowner.asp
' Copyright (c) Microsoft Corporation 1993-1998. All rights reserved.
' ******************************************************************************
' This file requests the name of the new owner for the selected role performer.
' The name must be at least 3 characters long.
' ******************************************************************************
On Error Resume Next
Response.Expires = 0
Dim strServer ' name of Exchange server
Dim strPerformer ' LDAP path to the performer object
Dim strRole ' LDAP path to the role object
strServer = Session("Server")
strPerformer = Request.Querystring("PERFORMER")
strRole = Request.Querystring("ROLE")
%>
<HTML>
<HEAD>
<TITLE>Role Administrator</TITLE>
</HEAD>
<SCRIPT LANGUAGE="JavaScript">
function validate(theform) {
if (theform.UserName.value.length < 3) {
alert("The 'Role Performer' field must contain at 3 characters");
theform.UserName.focus();
}
else {
theform.submit();
};
};
</SCRIPT>
<BODY BACKGROUND="back.jpg" BGCOLOR="#FFFF99" TEXT="#000000" LINK="#000000" VLINK="#000000">
<FORM NAME="ModifyOwner" METHOD=POST ACTION="modifyowner2.asp" OnSubmit="return(false)">
<FONT FACE="Arial, Helvetica" SIZE=5><B>Modify Role Performer</B></FONT><BR><BR>
<FONT FACE="Arial, Helvetica" SIZE=2>To find the role performer, please enter the first three or more characters of their display name.<BR><BR>
<FONT FACE="Arial, Helvetica" SIZE=2>Role Performer:</FONT>
<INPUT NAME="UserName" TYPE="text" SIZE=20><BR><BR>
<INPUT TYPE="button" VALUE="Find Role Performer" OnClick="validate(this.form)"><BR>
<INPUT TYPE="hidden" NAME="PERFORMER" VALUE="<%=strPerformer%>">
<INPUT TYPE="hidden" NAME="ROLE" VALUE="<%=strRole%>">
<SCRIPT LANGUAGE="JavaScript">
document.ModifyOwner.UserName.focus()
</SCRIPT>
</FORM>
</BODY>
</HTML>
