home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 April / Chip CMCD0400.iso / SOFTWARE / Demo / InfoPulse / GateKeeper / gk3full.exe / data1.cab / ConfigSite_Files / rules / managerules.agp < prev    next >
Encoding:
Text File  |  1999-06-17  |  3.4 KB  |  117 lines
  1. <html>
  2. <head>
  3. <script language="JavaScript">
  4. <!-- 
  5.  
  6. if (document.images) {
  7.  
  8.   // Preload rollover images
  9.   nav1a = new Image(78,18);
  10.   nav1a.src = "/images/newUserRules_b.jpg";
  11.   nav2a = new Image(78,18);
  12.   nav2a.src = "/images/newGroupRules_b.jpg";
  13.   nav3a = new Image(78,18);
  14.   nav3a.src = "/images/newUserRules_b.jpg";
  15.   nav4a = new Image(78,18);
  16.   nav4a.src = "/images/newGroupRules_b.jpg";
  17.  
  18.   // Preload rolloff images
  19.   nav1 = new Image(78,18);
  20.   nav1.src = "/images/newUserRules_g.jpg";
  21.   nav2 = new Image(78,18);
  22.   nav2.src = "/images/newGroupRules_g.jpg";
  23.   nav3 = new Image(78,18);
  24.   nav3.src = "/images/newUserRules_g.jpg";
  25.   nav4 = new Image(78,18);
  26.   nav4.src = "/images/newGroupRules_g.jpg";
  27.  
  28.  
  29. }
  30.  
  31. // function for rollover
  32. function msover(imgName) {
  33.   if (document.images[imgName]) {
  34.     document.images[imgName].src = eval(imgName + "a.src");
  35.   }
  36. }
  37.  
  38. // function for rollout
  39. function msout(imgName) {
  40.   if (document.images[imgName]) {
  41.     document.images [imgName].src = eval(imgName + ".src");
  42.   }
  43. }
  44.  
  45. // -->
  46. </script>
  47. <meta NAME="Author,Design" Content="GateKeeper Team; gatekeeper@infopulse.net">
  48. <meta NAME="Copyright" Content="Infopulse; www.infopulse.net">
  49. <title>Empty</title>
  50. </head>
  51.  
  52. <body bgcolor="#FFFFFF" text="#000000">
  53. <table border="0" cellpadding="0" cellspacing="1" width="100%">
  54.   <tr valign=top>
  55.     <td width="100%" valign=top align=right><a
  56.     href="rule.agp?type=user" onMouseOver="msover('nav1')" onMouseOut="msout('nav1')"><img
  57.     src="/images/newUserRules_g.jpg" width="220" height="24" alt="Add new user rules" name=nav1 border=0></a><a
  58.     href="rule.agp?type=group" onMouseOver="msover('nav2')" onMouseOut="msout('nav2')"><img
  59.     src="/images/newGroupRules_g.jpg" width="220" height="24" alt="Add new group rules" name=nav2 border=0></a>
  60.     </td>
  61.   </tr>
  62. </table>
  63. <p><big><strong><font face="Arial">Outgoing rules</font></strong></big></p>
  64.  
  65. <div>
  66. <table border="1" cellpadding="0" cellspacing="0" width="70%">
  67.    <tr>
  68.         <td width="50%" bgcolor="#183159"><strong><font face="Arial" color="#FFFFFF">
  69.             Name
  70.         </font></strong></td>
  71.         <td width="50%" bgcolor="#183159"><strong><font face="Arial" color="#FFFFFF">
  72.             Type
  73.         </font></strong></td>
  74.    </tr>
  75.    <%
  76.     Set Users = Accounts.Users
  77.     for i = 1 to Rules.count
  78.         Set rule = Rules.item(i)
  79.    %>
  80.    <tr>
  81.         <td width="50%"><font face="Arial">
  82.              
  83.             <a href="rule.agp?rule=<%Response.Write(rule.Name)%>"><%Response.Write(rule.Name)%></a>
  84.         </font></td>
  85.         <td width="50%"><font face="Arial">
  86.         <%
  87.             On Error Resume Next
  88.             Set user = Users.item( rule.Name )
  89.             If Not Err.Number = 0 Then 
  90.                 Response.Write("Group")
  91.             else
  92.                 Response.Write("User")
  93.             End If
  94.         %>
  95.         </font></td>
  96.    </tr>
  97. <%
  98.    next
  99. %>
  100. </table>
  101. </div>
  102. <p>
  103. <table border="0" cellpadding="0" cellspacing="1" width="100%">
  104.   <tr valign=top align=left>
  105.     <td width="100%" valign=top align=left><a
  106.     href="rule.agp?type=user" onMouseOver="msover('nav3')" onMouseOut="msout('nav3')"><img
  107.     src="/images/newUserRules_g.jpg" width="220" height="24" alt="Add new user rules" name=nav3 border=0></a><a
  108.     href="rule.agp?type=group" onMouseOver="msover('nav4')" onMouseOut="msout('nav4')"><img
  109.     src="/images/newGroupRules_g.jpg" width="220" height="24" alt="Add new group rules" name=nav4 border=0></a>
  110.     </td>
  111.   </tr>
  112. </table>
  113. <br>
  114. <font size="1" face="Arial"><%Response.Write(GateKeeper.Version)%></font>
  115. </body>
  116. </html>
  117.