home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 9 / IOPROG_9.ISO / contrib / iis4 / ins.cab / nngrpls.asp < prev    next >
Encoding:
Text File  |  1997-08-16  |  1.5 KB  |  57 lines
  1. <% Response.Expires = 0 %>
  2.  
  3. <%
  4. REM LOCALIZATION
  5.  
  6. L_MENU_TITLETXT = "NS Administration"
  7.  
  8. REM END LOCALIZATION
  9. %>
  10.  
  11. <!--#include file="_cnst.asp" -->
  12.  
  13. <% if (cont = true) then %>
  14.  
  15. <HTML>
  16. <HEAD>
  17. <TITLE><% = L_MENU_TITLETXT %></TITLE>
  18. </HEAD>
  19. <BODY BGCOLOR="#CCCCCC" TOPMARGIN=10 TEXT="#000000" LINK="#B90000" VLINK="#B90000" ALINK="#B90000">
  20.  
  21. <table cellpadding=2 cellspacing=0 border=0 width="400">
  22. <% REM New List enumeration using document.write's and list data cached in javascript array in head frame %>
  23. <script language = "javascript">
  24.  
  25. i = parseInt(parent.head.uForm.startNum) - 1;
  26. numGroups = parseInt(parent.head.uForm.numGroups);
  27. startNum = parseInt(parent.head.uForm.startNum);
  28. GroupsPerPage = parseInt(parent.head.uForm.GroupsPerPage);
  29.  
  30. while(   (i < numGroups) && ( i < (startNum + GroupsPerPage - 1) )   )
  31. {
  32.     if( i == parent.head.uForm.selectedItem)
  33.     {
  34.         itemColor = '#F1F1F1';
  35.         itemLink = '<A HREF="javascript:parent.head.uForm.editItem(' + i + ')">';
  36.     }
  37.     else
  38.     {
  39.         itemColor = '#CCCCCC' ;
  40.         itemLink = '<A HREF="javascript:parent.head.uForm.selectItem(' + i + ')">';
  41.     }        
  42.     itemText = parent.head.uForm.itemList[i].newsgroup;
  43.     
  44.     listEntry = '<tr><td width="10"></td><td width="390" bgcolor=' + itemColor + '><FONT SIZE=2 FACE="Arial"><A NAME="' + i + '">' + itemLink + itemText + '</font></a><br></td></tr>';
  45.     
  46.     document.writeln( listEntry );
  47.     i++;
  48. }
  49. </script>
  50.     <tr>
  51.         <td colspan=2 width=400> </td>
  52.     </tr>
  53. </table>
  54. </BODY>
  55. </HTML>
  56.  
  57. <% end if %>