📄 showstakeout.asp
字号:
<!--#include file="passinc.asp" -->
<%
if isadmin() = false then
response.redirect "noadmin.asp"
end if
%>
<%
dim ei
set ei = server.createobject("easymail.stakeout")
'-----------------------------------------
ei.Load
dim eu
set eu = Application("em")
%>
<HTML>
<HEAD>
<title>Corp.Email</title>
<LINK href="images\hwem.css" rel=stylesheet>
</HEAD>
<script LANGUAGE=javascript>
<!--
function addnew()
{
var i = 0;
var al = "";
for (i; i < selectusers.length; i++)
{
al = al + selectusers[i].value + '\t';
}
form1.addlist.value = al;
form1.submit();
}
function isinlist(name)
{
var i = 0;
for (i; i < selectusers.length; i++)
{
if (selectusers[i].value == name)
{
return true;
}
}
return false;
}
function addinFromText()
{
if (addtext.value != "" && isinlist(addtext.value) == false)
{
var oOption = document.createElement("OPTION");
oOption.text = addtext.value;
oOption.value = addtext.value;
selectusers.add(oOption);
addtext.value = "";
}
}
function addin()
{
var i = 0;
for (i; i < selectalluser.length; i++)
{
if (selectalluser[i].selected == true)
{
if (isinlist(selectalluser[i].value) == false)
{
var oOption = document.createElement("OPTION");
oOption.text = selectalluser[i].value;
oOption.value = selectalluser[i].value;
selectusers.add(oOption);
}
}
}
}
function delout()
{
var i = 0;
for (i; i < selectusers.length; i++)
{
if (selectusers[i].selected == true)
{
selectusers.remove(i);
i--;
}
}
}
//-->
</script>
<BODY>
<br>
<div align="center"><br>
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#dbeaf5" style="border-bottom:1px #8CA5B5 solid; border-top:1px #8CA5B5 solid; border-left:1px #8CA5B5 solid; border-right:1px #8CA5B5 solid;">
<tr>
<td width="15%" height="28"> </td>
<td width="31%"><a href="showsysinfo.asp?<%=getGRSN() %>#showstakeout">Configure</a></td>
<td colspan="24"><a href="right.asp?<%=getGRSN() %>">Return</a></td>
<td width="30%"><font class="s" color="#104A7B"><b>Monitoring</b></font></td>
</tr>
</table>
</div>
<div align="center">
<table align="center" border="0" width="90%" cellspacing="0" bgcolor="#EFF7FF">
<tr>
<td height="20" colspan="3">
</td></tr>
<tr>
<td height="20" rowspan="2" width="45%">
<div align="center"><font class="s" color="#104A7B"><b>Available Users</b></font></div>
</td>
<td height="20" rowspan="2">
<div align="center"> </div>
<div align="center"> </div>
</td>
<td height="20" rowspan="2" width="45%">
<div align="center"><font class="s" color="#104A7B"><b>Monitored Users</b></font></div>
</td>
</tr>
<tr> </tr>
<tr>
<td height="94" rowspan="2" width="45%">
<div align="center">
<select name="selectalluser" size="14" class="drpdwn" style="width: 200;" multiple>
<%
i = 0
allnum = eu.GetUsersCount
do while i < allnum
eu.GetUserByIndex i, name, domain, comment
response.write "<option value='" & name & "'>" & name & "</option>"
name = NULL
domain = NULL
comment = NULL
i = i + 1
loop
%>
</select>
</div>
<br>
<div align="center">
<input type="text" name="addtext" class="textbox" maxlength="64"> <input type="button" value="==>>" class="sbttn" LANGUAGE=javascript onclick="addinFromText()">
</div>
</td>
<td height="47" width="10%">
<div align="center">
<input type="button" name="Button" value=" ==> " class="sbttn" LANGUAGE=javascript onclick="addin()">
</div>
</td>
<td height="94" rowspan="2" width="45%">
<div align="center">
<select name="selectusers" size="16" class="drpdwn" style="width: 200;" multiple>
<%
i = 0
allnum = ei.getcount
do while i < allnum
response.write "<option value='" & ei.GetNameByIndex(i) & "'>" & ei.GetNameByIndex(i) & "</option>"
i = i + 1
loop
%>
</select>
</div>
</td>
</tr>
<tr>
<td height="47" width="10%">
<div align="center">
<input type="button" name="Submit2" value=" <== " class="sbttn" LANGUAGE=javascript onclick="delout()">
</div>
</td>
</tr>
<tr>
<td height="20" colspan="3">
</td></tr>
<tr>
<tr>
<td height="20" colspan="3" align="right">
<input type="button" value=" Save " LANGUAGE=javascript onclick="addnew()" class="Bsbttn">
<input type="button" value="Cancel" LANGUAGE=javascript onclick="javascript:location.href='right.asp?<%=getGRSN() %>';" class="Bsbttn">
</td></tr>
<tr>
</table>
<br><br><br>
<div align="center">
<table width="90%" border="0" align="center" cellspacing="0" bgcolor="#EFF7FF" style='border-top:1px #8CA5B5 solid;'>
<tr>
<td colspan="2" height="10">
</td>
</tr>
<tr>
<td width="8%" valign="top"><font color="#FF3333"> *Note: </font></td>
<td width="92%">Mail monitoring function allows the administrator to monitor sent and received mails of the "monitored users".
</td>
</tr>
<tr>
<td colspan="2" height="10">
</td>
</tr>
</table>
</div>
<form action="savestakeout.asp" method=post id=form1 name=form1>
<input type="hidden" name="addlist">
</FORM>
</div>
<br>
</BODY>
</HTML>
<%
set ei = nothing
set eu = nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -