home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / iis4_03.cab / iisecls.asp < prev    next >
Text File  |  1997-11-12  |  4KB  |  117 lines
  1. <%@ LANGUAGE=VBScript %>
  2. <% Option Explicit %>
  3. <% Response.Expires = 0 %>
  4.  
  5. <% 
  6. Const L_ENTERVALUE_TEXT="Please enter a value"
  7. Const L_BROWSE_TEXT="Browse..."
  8. Const L_DENIED_TEXT="Denied"
  9. Const L_GRANTED_TEXT="Granted"
  10. Const L_ACCESSDENIED_TEXT="Access Denied"
  11. %>
  12.  
  13. <HTML>
  14. <HEAD>
  15.     <TITLE></TITLE>
  16.  
  17.     <SCRIPT LANGUAGE="JavaScript">
  18.         function chgStatus(indexnum){
  19.             parent.head.document.hiddenform.index.value=indexnum
  20.             self.location.href="iisecls.asp";
  21.             
  22.         }
  23.  
  24.         function chkFull(thiscntrl,defval){
  25.             if (this.value==defval){
  26.                 alert("<%= L_ENTERVALUE_TEXT %>");
  27.             }
  28.         }
  29.  
  30.         function SetUpdated(){
  31.         i=parent.head.document.hiddenform.index.value
  32.         parent.head.cachedList[i].access=document.listform.editMe.value;
  33.         parent.head.cachedList[i].ip=document.listform.ip.value;
  34.         parent.head.cachedList[i].Subnet=document.listform.Subnet.value;
  35.         parent.head.cachedList[i].domain=document.listform.domain.value;
  36.         parent.head.cachedList[i].updated=true;
  37.     }
  38.         
  39.     </SCRIPT>
  40. </HEAD>
  41.  
  42. <BODY BGCOLOR="#FFFFFF" LEFTMARGIN=0 TOPMARGIN=0>
  43.  
  44. <FORM NAME="listform">
  45.  
  46. <TABLE WIDTH=380 BORDER=0 CELLSPACING=0 CELLPADDING=2>
  47.  
  48. <SCRIPT LANGUAGE="JavaScript">
  49.     sel=eval(parent.head.document.hiddenform.index.value);
  50.     for (var i=0; i < parent.head.cachedList.length; i++) {
  51.         if (!parent.head.cachedList[i].deleted){
  52.             if (parent.head.document.hiddenform.index.value !=i) {
  53.                 document.write("<TR><TD WIDTH=75><FONT SIZE=1 FACE='Helv'><A HREF='javascript:chgStatus("+i+");'>");
  54.                 if (parent.head.cachedList[i].access){
  55.                     document.write("<%= L_GRANTED_TEXT %>");
  56.                 }
  57.                 else{
  58.                     document.write("<%= L_DENIED_TEXT %>");
  59.                 }
  60.                 document.write("</A></TD>");
  61.                 document.write("<TD WIDTH=90><FONT SIZE=2 FACE='Helv'>"+parent.head.cachedList[i].ip +"</TD>");
  62.                 document.write("<TD WIDTH=90><FONT SIZE=2 FACE='Helv'>"+parent.head.cachedList[i].Subnet +"</TD>");
  63.                 document.write("<TD WIDTH=125>");
  64.                 j=i+1;
  65.                 while (j <=sel) {            
  66.                     if (parent.head.cachedList[j].deleted){
  67.                     }
  68.                     else{
  69.                         if  (j==sel){
  70.                                 document.write("<A NAME='editMe'>");
  71.                         }
  72.                         else{
  73.                             break
  74.                         }
  75.                     }
  76.                     j=j+1;
  77.                 }
  78.                 document.write("<FONT SIZE=2 FACE='Arial'>"+parent.head.cachedList[i].domain );
  79.                 document.write("</TD></TR>");
  80.             }
  81.             else{    
  82.                 document.write("<TR BGCOLOR=#000080 ><TD WIDTH=75><FONT SIZE=1 FACE='Helv'>");
  83.                 document.write("<SELECT NAME='editMe' onChange='SetUpdated();'>");
  84.                 if (parent.head.cachedList[i].access){
  85.                     document.write("<OPTION SELECTED><%= L_GRANTED_TEXT %>");
  86.                     document.write("<OPTION><%= L_DENIED_TEXT %>");
  87.                 }
  88.                 else{
  89.                     document.write("<OPTION><%= L_GRANTED_TEXT %>");
  90.                     document.write("<OPTION SELECTED><%= L_DENIED_TEXT %>");
  91.                 }
  92.                 document.write("</SELECT></TD>");
  93.                 document.write("<TD WIDTH=90><FONT SIZE=1 FACE='Helv'>")
  94.                 document.write("<INPUT NAME='ip' VALUE='"+parent.head.cachedList[i].ip +"' SIZE=15 onChange='SetUpdated();'>");
  95.             //    document.write("<IMG SRC='images/browse.gif' ALT='<%= L_BROWSE_TEXT %>'></TD>")
  96.                 document.write("<TD WIDTH=90><FONT SIZE=1 FACE='Helv'>")
  97.                 document.write("<INPUT NAME='Subnet' VALUE='"+parent.head.cachedList[i].Subnet+"' SIZE=15 onChange='SetUpdated();'></TD>")
  98.                 document.write("<TD WIDTH=125><FONT SIZE=1 FACE='Helv'><INPUT TYPE='text' NAME='domain' VALUE='"+parent.head.cachedList[i].domain + "' SIZE=20 onChange='SetUpdated();'>")
  99.                 document.write("</TD>")
  100.                 document.write("</TR>")
  101.             }
  102.         }
  103.     }
  104.     
  105. </SCRIPT>
  106. </TABLE>
  107.  
  108. </FORM>
  109. <SCRIPT LANGUAGE="JavaScript">
  110.     if (parent.head.document.hiddenform.index.value !=-1){
  111.     document.listform.editMe.focus();
  112.     }
  113. </SCRIPT>
  114.  
  115. </BODY>
  116. </HTML>
  117.