Tryag File Manager

//usr/local/frontpage/version5.0/admin/1033/adduser.htm

<TITLE>Configure Web User</TITLE>
<link rel="stylesheet" type="text/css" href="/_vti_bin/_vti_adm/1033/webadmin.css">

<SCRIPT Language="Javascript">
var L_passwordEmpty_Text = "The password cannot be blank.\nPlease enter a password.";
var L_passwordNotMatch_Text = "Your passwords do not match.\nPlease, re-enter and confirm password.";
var L_noRolesSelected_Text = "No roles are selected. Please select at least one role for the user.";
var L_noGroupName_Text= "'Add an existing user or group'";
var L_noUsernameAlert_Text= "You must supply a User name to create a new user account.";

var L_NoEmptyRole_TEXT = "Please enter a role name";function CheckEmptyRole(string,field_name){ if (string.length == 0)	{	alert(L_NoEmptyRole_TEXT);	return (false);	} return (true);}

function    Visascii(ch)
{
    return (!(ch.charCodeAt(0) & 0x80)); 
}

function Visspace(ch) 
{
    return (ch.charCodeAt(0) == 32) || ((9 <= ch.charCodeAt(0)) && (ch.charCodeAt(0) <= 13)); 
}

function stripWS(str)
{
    var b = 0;
    var e = str.length;
    while (str.charAt(b) && (Visascii(str.charAt(b)) && Visspace(str.charAt(b))))
        b++;
    while ((b < e) && (Visascii(str.charAt(e-1)) && Visspace(str.charAt(e-1))))
        e--;
    return ((b>=e)?"":str.substring(b, e ));
}

var L_NoFieldEmpty_TEXT = " field can't be empty.";
function CheckForEmptyField(text_orig,field_name)
{
    var text = stripWS(text_orig);
    if (text.length == 0)
    {
        alert(field_name + L_NoFieldEmpty_TEXT);
        return false;
    }
    return (true);
}

function CheckForEmptyFieldNoAlert(text_orig)
{
    var text = stripWS(text_orig);
    if (text.length == 0)
    {
        return false;
    }
    return (true);
}

var L_WrongEmailName1_TEXT = "The e-mail address specified in the ";
var L_WrongEmailName2_TEXT = " box is not complete. Please type a complete e-mail address, in the format name@domain.";
var L_TextWithoutSpaces1_TEXT="You must enter text without spaces in field ";

function CheckForAtSighInEmailName(text_orig,field_name)
{
    var text = stripWS(text_orig);
    if (!CheckForEmptyField(text_orig,field_name)) return false;
    var indexAt = 0;
    var countAt = 0;
    var countSpace = 0;
    var len = text.length;
    while(len--)
    {
        if (text.charAt(len) == '@') 
        {
            indexAt = len;
            countAt++;
        }  
        if (text.charAt(len) == ' ')
            countSpace ++;

}    
    if ((countAt == 0) ||
        (indexAt == 0) ||
        (indexAt == (text.length-1))
        )
    {
        alert(L_WrongEmailName1_TEXT + field_name + L_WrongEmailName2_TEXT);
        return false;
    }

if (countSpace !=0 )
    {
        alert(L_TextWithoutSpaces1_TEXT + field_name);
        return false;

}
    return (true);
}

function tryToSend()
{

if (!CheckForEmptyFieldNoAlert(document.forms.frm.uname.value))
        {

alert(L_noUsernameAlert_Text);
            return;
        }

document.forms.frm.username.value=document.forms.frm.uname.value;

var pwd = stripWS(document.forms.frm.newpassword.value);
        if (pwd.length == 0)
        {
            alert(L_passwordEmpty_Text);
            return;
        }
        if (document.forms.frm.newpassword.value != document.forms.frm.password.value)
        {
            alert(L_passwordNotMatch_Text);
            document.forms.frm.newpassword.value = "";
            document.forms.frm.password.value = "";
            return;
        }
        document.forms.frm.operation.value = "addremusers";

}

function prefill()
{

<ows:if type=web name=InheritPermissions condition=equal result=false>

document.forms.frm.uname.focus();

</ows:if>
}

</script>
</HEAD>

<table border="0" width="100%" height="100%" cellpadding=0 cellspacing=0 class=main>
<script Language="javascript">
var L_helplink_text="1033";

function HelpWindow(strHelpUrl)
{
	var url = "help/" + L_helplink_text+strHelpUrl;
    var wndHelp = window.open(url, "MSOWSHELP", "width=187,height=500,menubar,scrollbars,toolbar,resizable");
}
</script>
 <tr>
  <td width=100% valign=top colspan=6>
   <table width=100% border="0" class="ms-bannerframe" cellpadding=3 cellspacing=0>
    <tr>
	 <td nowrap valign="middle" align="left"><img alt="Logo" src="/_vti_bin/offlogo.gif" width="28" height="28" id=Image1></td>
     <td nowrap class="ms-banner" align=left height=34>
      <a ACCESSKEY=O href="../../" id=Home><ID ID=Home2>Home</ID></a>
      <font size="2" color="#FFFFFF">|</font>
      <ID><a ACCESSKEY=M href="fpadmcgi.exe?page=webadmin.htm" ID=Administration><ID ID=Administration2>Administration</ID></a></ID>
      <font size="2" color="#FFFFFF">|</font>
<ows:if type=vserver name=hascollabsupport condition=equal result=true>
      <ID><a ACCESSKEY=P href="javascript:HelpWindow('/collab/wsahome.htm');" ID=Help ><ID ID=Help2Collab>Help</ID></a></ID>
</ows:if>
<ows:if type=vserver name=hascollabsupport condition=notequal result=true>
      <ID><a ACCESSKEY=P href="javascript:HelpWindow('/publish/fpaHome.htm');" ID=Help ><ID ID=Help2Publish>Help</ID></a></ID>
</ows:if>

</td>
     <td width=99%>&nbsp;</td>
    </tr>
   </table>
  </td>
 </tr>

<ows:if type=web name=InheritPermissions condition=equal result=true>

<tr> 
  <td class="leftbar">&nbsp;</td>
  <td valign=top height="100%">
   <table width=100%   border="0" class="TitleArea" cellpadding=3> 
    <tr> 
     <td  style="padding-bottom: 0px" valign=top> 
        <LocID ID=ErrorMSGWebIherit>This page is available only for a web with unique permissions.</LocID> 
     </td>
    </tr>
   </table>  
  </td>
</tr>

</ows:if>

<ows:if type=web name=InheritPermissions condition=equal result=false>

<tr> <td valign=top class="leftbar" colspan=4> <table width=100% border="0" class="TitleArea" cellpadding=3> <tr> <td style="padding-bottom: 0px"> <table width=100% cellpadding=0 cellspacing=0 border=0> <tr> <td align=center valign=top nowrap width="105" height="40"> <img alt="Icon" src= /_vti_bin/settings.gif  width="43" height="43" id=icon_alt> </td> <td width=27>&nbsp; </td> <td nowrap> <table cellpadding=0 cellspacing=0 border=0> <tr> <td nowrap class="TitleArea"> <ows:if type=vserver name=hasCollabSupport condition=equal result=true>FrontPage Server Extensions 2002 - </ows:if><ows:if type=vserver name=hasCollabSupport condition=notequal result=true>FrontPage Server Extensions 2002 - </ows:if> <ows:if type=web name=IsRoot condition=equal result=true> <ID ID=Web_description_2>Site Administration for</ID> </ows:if> <ows:if type=web name=IsRoot condition=equal result=false> <ID ID=Web_description_3>Web site Administration for</ID> </ows:if> "<ows:var type=web name=fullwebname></ows:var>" </td> </tr> <tr> <td ID=AdminPageTitle nowrap class="PageTitle">Add a User</td> </tr> </table> </td> </tr> </table> <table cellpadding=0 cellspacing=0 border=0 width=100%> <tr> <td height=5 colspan=5><img src="/_vti_bin/blank.gif" width="1" height="1"></td> </tr> <tr> <td class="SectionLine" height=2 colspan=5><img src="/_vti_bin/blank.gif" width="1" height="1"></td> </tr> </table> </td> <td width=1px></td> </tr> </table> </td> </tr>

<tr valign=top>
  <TD height=100% class=ms-nav> <TABLE height=100% class=ms-navframe CELLPADDING=0 CELLSPACING=4 border="0" width=133px> <tr valign=top> <td width=100%>&nbsp;</td> <td class=ms-verticaldots>&nbsp;</td> </tr> </TABLE> </TD> 
  <td valign=top height="100%" width="100%">
   <table class=propertysheet border="0" width="100%" cellspacing="4" cellpadding="0">
 
    <TR>
     <TD ID=DescriptionText colspan=4>
     Use this page to add a user

to your site.
     </TD>
     <td width=1px></td> 
    </TR>

<TD ID=AddUserDesc1 class="descriptiontext">Add a new user account.

</TD>
          <td width=1px></td> 
         </TR>
        </TABLE>
       </TD>
      </TR>
      <TR>
       <TD height=3 colspan=2 class="AuthoringControls"><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
      </TR>
      <TR>
       <TD class="Authoringcontrols" colspan=2 height=6><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
      </TR>
      <TR>

<TD class="AuthoringControls">
        <TABLE border="0" width="100%" cellspacing="0" cellpadding="0">
         <TR>
          <TD ID=NewUserRadioButton class="AuthoringControls">Add a new user with the following information:<FONT size=3>&nbsp;</FONT></TD>
         </TR>
        </TABLE>
       </TD>
      </TR>
      <TR>
       <TD class="AuthoringControls" width=10>&nbsp;</TD>
       <TD class="AuthoringControls">
        <TABLE border="0" cellspacing=1 width=100%>
         <TR>
          <TD ID=UserName class="AuthoringControls" colspan=2>User name:</TD>
         </TR>
         <TR>
          <TD>&nbsp;</TD>
          <TD><INPUT type="text" id=uname0 name="uname" size=30

maxlength="256"

<ows:if type=parameter name=operation condition=notequal result=userroles>
              value="<ows:var type=parameter name=username></ows:var>"
           </ows:if> 
          ></TD>
         </TR>
         <TR>
          <TD ID=Password class="AuthoringControls" colspan=2>Password:</TD>
         </TR>
         <TR>
          <TD>&nbsp;</TD>
          <TD><INPUT type="password" name="newpassword" size=30

maxlength="256"

</TD>
         </TR>
         <TR>
          <TD ID=PasswordConf class="AuthoringControls" colspan=2>Confirm password:</TD>
         </TR>
         <TR>
          <TD>&nbsp;</TD>
          <TD><INPUT type="password" name="password" size=30

maxlength="256"

</TD>
         </TR>
        </TABLE>
       </TD>
      </TR>

<TR>
      <TD class=Authoringcontrols height=1 colspan=2><IMG src="/_vti_bin/blank.gif" height=10 width=1></TD>
     </TR>
     <TR>
      <TD class=ThinSectionLine height=1 colspan=4><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
     </TR>
     <TR>
      <TD nowrap rowspan="7"></TD>
      <TD class="descriptiontext" rowspan="7" valign="top" align="left" width=50%>
       <TABLE border=0 cellpadding=1 cellspacing=0 width=100%>
        <TR>
         <TD ID=AddRole class=SectionHeader height=28 valign=top>User Role</TD>
        </TR>
        <TR>
         <TD ID=AddRoleHelpTxt class="descriptiontext">Choose a role or roles for this user.</TD>
		 <td width=1px></td> 
        </TR>
       </TABLE>
      </TD>
     </TR>
     <TR>
      <TD height=3 colspan=2 class="AuthoringControls"><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
     </TR>
     <TR>
      <TD class="Authoringcontrols" colspan=2 height=6><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
     </TR>
     <TR>
	  <td colspan=2 class="AuthoringControls">
	   <table border="0" width=100%>
	    <tr>
         <TD id=diidSelectRole colspan="2" class="AuthoringControls">&nbsp;Select a role for this user</TD>
	    </tr>
	   </table>
	  </td>
     </TR>
	 <TR>
      <TD  class="AuthoringControls"><IMG src="/_vti_bin/blank.gif" height=1 width=1>
      </TD>
      <TD height=3 colspan=2 class="AuthoringControls"><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
	 </tr>
     <TR><td colspan=2><table cellpadding=0 cellspacing=0 border="0" width=100%>
	 <tr>
      <TD class="AuthoringControls" width=10>&nbsp;</TD>
      <TD class="AuthoringControls">
       <TABLE border="0" width="100%" cellpadding=0 cellspacing=0>

<ows:for-each collection=roles >
       <ows:if type=in_loop_var name=length condition=greater result=0>
        <TR>
         <TD valign="top" align="left" class="AuthoringControls">
            <INPUT type="checkbox" name=role value=
            "<ows:var type=in_loop_var name=internal></ows:var>"
            >
         </TD>
         <TD valign="top">
         <TABLE class=PropertySheet border="0" width="100%" cellspacing="0" cellpadding="0">
          <TR>
           <TD height=3><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
          </TR>
          <TR>
		   <TD>
           <ows:var type=in_loop_var name=local></ows:var>
		   <ows:if type=in_loop_var name=description condition=notequal result=>-</ows:if>
           <ows:var type=in_loop_var name=description></ows:var>
           </TD>
		   <TD>&nbsp;</TD>
		  </TR>
		 </TABLE>
         </TD>
        </TR>
        <TR>
         <TD class="Authoringcontrols" width=10><IMG src="/_vti_bin/blank.gif" height=5 width=1></TD>
        </TR>       
        </ows:if>  
       </ows:for-each>

</TABLE>	 
      </TD></tr></table>
	  </td>
     </TR>
     <TR>
      <TD class="Authoringcontrols" width=10>&nbsp;</TD>
      <TD class="Authoringcontrols">&nbsp;</TD>      
     </TR>
     <TR>
      <TD class=ThinSectionLine height=2 colspan=4><IMG src="/_vti_bin/blank.gif" height=1 width=1></TD>
     </TR>
     <TR>
      <TD>&nbsp;</TD>
     </TR>
     <TR>
     <TD align=right colspan=4 ID=diidSubmitsection>
      <INPUT ID=AddUserBtn name="add" Type="button" Value="      Add User    " onClick="tryToSend();">
      <INPUT ID=CancelBtn  name="cancel" Type="button" Value="   Cancel   " onClick="document.location='fpadmcgi.exe?page=user.htm';">
     </TD>  
     </TR>    
    </TABLE>
   </TD>
  </TR> 
 </TABLE> 
 </TD>
</TR>

</ows:if>

</table>

</form>
</body>
</html>