home *** CD-ROM | disk | FTP | other *** search
- <%
- path = SysInfo.SkinPath
- dim szPath
- szPath = "Table"
- SkinTable = SysInfo.GetSkinParameter(szPath)
- szPath = "Font"
- SkinFont = SysInfo.GetSkinParameter(szPath)
- szPath = "Link"
- SkinLink = SysInfo.GetSkinParameter(szPath)
- szPath = "VLink"
- SkinVLink= SysInfo.GetSkinParameter(szPath)
-
- Set users = Accounts.users
- %>
- <script language="JavaScript">
- <!--
- function MM_preloadImages() { //v3.0
- var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
- var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
- if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
- }
-
- function MM_swapImgRestore() { //v3.0
- var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
- }
-
- function MM_findObj(n, d) { //v4.0
- var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
- d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
- if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
- for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
- if(!x && document.getElementById) x=document.getElementById(n); return x;
- }
-
- function MM_swapImage() { //v3.0
- var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
- if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
- }
- //-->
- </script>
- <html>
- <head>
- <title>Professional GateKeeper - Infopulse</title>
-
-
- </head>
-
- <body bgcolor="#FFFFFF" text="#000000" topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" background="../images/backgr_x.gif">
- <table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="344"><img src="images/1_r1_c2.jpg" width="344" height="70"></td>
- <td width="135"><img src="images/1_r1_c3.jpg" width="135" height="70"></td>
- <td width="100"><a href="hlpAccounts.agp"><img src="images/1_r1_c4.jpg" width="100" height="70"border=0></a></td>
- <td width="1000"> </td>
- </tr>
- </table>
- <map name="n1_r4_c3Map">
- <area shape="rect" coords="492,45,567,76" href="#">
- </map>
-
-
-
- <p><big><strong><font face="Arial">User accounts</font></strong></big></p>
- <font face="Arial">In order to <b>edit the accounts</b> select from the first column of the table
- the link representing the corresponding user. If you want to <b>create a new user account</b>
- select the link located bellow the table and fill in the form that will be shown.</font><p>
- <table border="0" cellpadding="0" cellspacing="1" width="100%">
- <tr valign=top>
- <td width="100%" valign=top align=right><a
- href="useredit.agp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('new_user_accnt.gif','','../images/new_user_accnt01.gif',1)" >
- <img src="../images/new_user_accnt.gif" name='new_user_accnt.gif' alt="Create new user account" border=0></a>
- </td>
- </tr>
- </table>
- <br>
- <div align="center"><center>
- <table border="1" cellpadding="0" cellspacing="0" width="100%">
- <tr>
- <td bgcolor="<%Response.Write(SkinTable)%>" NOWRAP><strong><font face="Arial" color="<%Response.Write(SkinFont)%>"> Name </font></strong></td>
- <td bgcolor="<%Response.Write(SkinTable)%>"><strong><font face="Arial" color="<%Response.Write(SkinFont)%>"> Enabled </font></strong></td>
- <td bgcolor="<%Response.Write(SkinTable)%>"><strong><font face="Arial" color="<%Response.Write(SkinFont)%>"> On-Line </font></strong></td>
- <td bgcolor="<%Response.Write(SkinTable)%>" NOWRAP><strong><font face="Arial" color="<%Response.Write(SkinFont)%>"> Real Name </font></strong></td>
- <td bgcolor="<%Response.Write(SkinTable)%>"><strong><font face="Arial" color="<%Response.Write(SkinFont)%>"> Description </font></strong></td>
- </tr>
- <%
- for count = 1 to users.count
- Set user = users.item(count)
- link = "<a href=""useredit.agp?name=" & user.name & """>" & user.name & "</a>"
- %>
- <tr>
- <td NOWRAP><font face="Arial"><%Response.Write(link)%></font></td>
- <td align=center><font face="Arial">
- <% If user.Enabled Then Response.Write("Yes") Else Response.Write("No") End If %>
- </font></td>
- <td align=center><font face="Arial">
- <% If user.Online Then Response.Write("Yes") Else Response.Write("No") End If %>
- </font></td>
- <td NOWRAP><font face="Arial">
-  
- <%Response.Write(user.realname)%>
- </font></td>
- <td NOWRAP><font face="Arial">
-  
- <% Response.Write(user.description) %>
- </font></td>
- </tr>
- <%
- next
- %>
- </table>
- </center></div>
- <br>
- <table border="0" cellpadding="0" cellspacing="1" width="100%">
- <tr valign=top align=left>
- <td width="100%" valign=top align=left><a
- href="useredit.agp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('new_user_accnt2.gif','','../images/new_user_accnt01.gif',1)"><img
- src="../images/new_user_accnt.gif" border=0 alt="Create new user account" name="new_user_accnt2.gif">
- </td>
- </tr>
- </table>
- <font size="1" face="Arial"><%Response.Write(GateKeeper.Version)%></font>
- </body>
- </html>