home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 9 / IOPROG_9.ISO / contrib / iis4 / ins.cab / nnlogls.asp < prev    next >
Encoding:
Text File  |  1997-08-16  |  1.1 KB  |  58 lines
  1. <%
  2. L_FORMATSINUSE_TEXT = "Formats in use"
  3. L_REMOVE_TEXT = "Remove"
  4.  
  5. blanks = "" 
  6. for i = 0 to 23
  7.     blanks = blanks + " "
  8. next
  9. %>
  10.  
  11. <HTML>
  12. <HEAD>
  13.     <TITLE></TITLE>
  14. </HEAD>
  15.  
  16. <BODY BGCOLOR="#CCCCCC" TOPMARGIN=5 TEXT="#000000" LINK="#FFFFFF">
  17.         <FORM NAME="userform">
  18. <BLOCKQUOTE>
  19.         <TABLE>
  20.  
  21.         <TR><TD  VALIGN="top"><FONT SIZE=1 FACE="Helv"><%=L_FORMATSINUSE_TEXT%><BR>
  22.  
  23.             <SELECT NAME="LogUsed" SIZE = 8 MULTIPLE>
  24.  
  25.             <SCRIPT LANGUAGE="JavaScript">
  26.             var cList = parent.head.testList;
  27.             var numEnabled = 0;
  28.             for (i=0;i<cList.length;i++){
  29.  
  30.                 if(cList[i].enabled){
  31.                     numEnabled = numEnabled + 1;
  32.                     document.write("<OPTION VALUE='"+i+"'>"+cList[i].format);
  33.                 }
  34.             }
  35.  
  36.  
  37.                 document.write("<OPTION><%=blanks%>");
  38.  
  39.             document.write("</SELECT>");
  40.  
  41.             document.userform.selLogUsed.options[0].selected = false;
  42.  
  43.             </SCRIPT>
  44.  
  45.             <P>
  46.             </TD>
  47.             <TD VALIGN = "top"><BR>
  48.                 <INPUT TYPE="button" VALUE="<%=L_REMOVE_TEXT%>" onClick="parent.head.listFunc.disableItem();"><P>
  49.  
  50.             </TD>
  51.         </TR>
  52.         </TABLE>
  53.     </FORM>
  54.  
  55. </BLOCKQUOTE>
  56. </BODY>
  57. </HTML>
  58.