home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 April / Chip CMCD0400.iso / SOFTWARE / Demo / InfoPulse / GateKeeper / gk3full.exe / data1.cab / ConfigSite_Files / accounts / users.agp < prev   
Encoding:
Text File  |  1999-06-17  |  4.2 KB  |  122 lines
  1. <% 
  2.     Set users = Accounts.users 
  3. %>
  4. <html>
  5. <head>
  6. <script language="JavaScript">
  7. <!-- 
  8.  
  9. if (document.images) {
  10.  
  11.   // Preload rollover images
  12.   nav1a = new Image(78,18);
  13.   nav1a.src = "/images/newUserAccount_b.jpg";
  14.   nav2a = new Image(78,18);
  15.   nav2a.src = "/images/help_b.jpg";
  16.  
  17.   nav3a = new Image(78,18);
  18.   nav3a.src = "/images/newUserAccount_b.jpg";
  19.   nav4a = new Image(78,18);
  20.   nav4a.src = "/images/help_b.jpg";
  21.  
  22.   // Preload rolloff images
  23.   nav1 = new Image(78,18);
  24.   nav1.src = "/images/newUserAccount_g.jpg";
  25.   nav2 = new Image(78,18);
  26.   nav2.src = "/images/help_g.jpg";
  27.   nav3 = new Image(78,18);
  28.   nav3.src = "/images/newUserAccount_g.jpg";
  29.   nav4 = new Image(78,18);
  30.   nav4.src = "/images/help_g.jpg";
  31.  
  32.  
  33. }
  34.  
  35. // function for rollover
  36. function msover(imgName) {
  37.   if (document.images[imgName]) {
  38.     document.images[imgName].src = eval(imgName + "a.src");
  39.   }
  40. }
  41.  
  42. // function for rollout
  43. function msout(imgName) {
  44.   if (document.images[imgName]) {
  45.     document.images [imgName].src = eval(imgName + ".src");
  46.   }
  47. }
  48.  
  49. // -->
  50. </script>
  51. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  52. <meta NAME="Author,Design" Content="GateKeeper Team; gatekeeper@infopulse.net">
  53. <meta NAME="Copyright" Content="Infopulse; www.infopulse.net">
  54. <title>Empty</title>
  55. </head>
  56.  
  57. <body>
  58. <table border="0" cellpadding="0" cellspacing="1" width="100%">
  59.   <tr valign=top>
  60.     <td width="100%" valign=top align=right><a
  61.     href="useredit.agp" onMouseOver="msover('nav1')" onMouseOut="msout('nav1')"><img
  62.     src="/images/newUserAccount_g.jpg" width="220" height="24" alt="Create new user account" name=nav1 border=0></a><a
  63.     href="hlpAccounts.htm" onMouseOver="msover('nav2')" onMouseOut="msout('nav2')"><img
  64.     src="/images/help_g.jpg" width="129" height="24" alt="Help" name=nav2 border=0></a>
  65.     </td>
  66.   </tr>
  67. </table>
  68. <p><big><strong><font face="Arial">User accounts</font></strong></big></p>
  69. <font face="Arial">In order to <b>edit the accounts</b> select from the first column of the table 
  70. the link representing the corresponding user. If you want to <b>create a new user account</b> 
  71. select the link located bellow the table and fill in the form that will be shown.</font><p>
  72. <div align="center"><center>
  73. <table border="1" cellpadding="0" cellspacing="0" width="100%">
  74. <tr>
  75.     <td bgcolor="#183159" NOWRAP><strong><font face="Arial" color="#FFFFFF"> Name </font></strong></td>
  76.     <td bgcolor="#183159"><strong><font face="Arial" color="#FFFFFF"> Enabled </font></strong></td>
  77.     <td bgcolor="#183159"><strong><font face="Arial" color="#FFFFFF"> On-Line </font></strong></td>
  78.     <td bgcolor="#183159" NOWRAP><strong><font face="Arial" color="#FFFFFF"> Real Name </font></strong></td>
  79.     <td bgcolor="#183159"><strong><font face="Arial" color="#FFFFFF"> Description </font></strong></td>
  80. </tr>
  81. <%
  82.     for count = 1 to users.count 
  83.         Set user = users.item(count)
  84.         link = "<a href=""useredit.agp?name=" & user.name & """>" & user.name & "</a>"
  85. %>
  86. <tr>
  87.     <td NOWRAP><font face="Arial"><%Response.Write(link)%></font></td>
  88.     <td align=center><font face="Arial">
  89.         <% If user.Enabled Then Response.Write("Yes") Else Response.Write("No") End If %>
  90.     </font></td>
  91.     <td align=center><font face="Arial">
  92.         <% If user.Online Then Response.Write("Yes") Else Response.Write("No") End If %>
  93.     </font></td>
  94.     <td NOWRAP><font face="Arial">
  95.          
  96.         <%Response.Write(user.realname)%>
  97.     </font></td>
  98.     <td NOWRAP><font face="Arial">
  99.          
  100.         <% Response.Write(user.description) %>
  101.     </font></td>
  102. </tr>
  103. <%
  104.     next
  105. %>
  106. </table>
  107. </center></div>
  108. <br>
  109. <table border="0" cellpadding="0" cellspacing="1" width="100%">
  110.   <tr valign=top align=left>
  111.     <td width="100%" valign=top align=left><a
  112.     href="useredit.agp" onMouseOver="msover('nav3')" onMouseOut="msout('nav3')"><img
  113.     src="/images/newUserAccount_g.jpg" width="220" height="24" alt="Create new user account" name=nav3 border=0></a><a
  114.     href="hlpAccounts.htm" onMouseOver="msover('nav4')" onMouseOut="msout('nav4')"><img
  115.     src="/images/help_g.jpg" width="129" height="24" alt="Help" name=nav4 border=0></a>
  116.     </td>
  117.   </tr>
  118. </table>
  119. <font size="1" face="Arial"><%Response.Write(GateKeeper.Version)%></font>
  120. </body>
  121. </html>
  122.