📄 monitor_bak.asp
字号:
<%
'************************************************************************************************
' 文件名: monitor.asp
' Copyright(c) 2001-2002 上海阿尔卡特网络支援系统有限公司
'
' 创建人 : 周秋舫
' 日 期 : 2002-05-13
' 修改历史 :
' ****年**月**日 ****** 修改内容:**************************************************
' 功能描述 : 监视器（在线人员和实时消息）
' 版 本 :
'************************************************************************************************
option explicit
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1
%>
<!-- #include file="../include/config.inc" -->
<!-- #include file="../include/common.inc" -->
<!-- #include file="../include/debug.inc" -->
<!-- #include file="../include/db.inc" -->
<!-- #include file="../include/date.inc" -->
<!-- #include file="../include/datahandle.inc" -->
<!-- #include file="../include/recordlist.inc" -->
<!-- #include file="../include/security.inc" -->
<!-- #include file="../include/emp.inc" -->
<!-- #include file="../include/message.inc" -->
<!-- #include file="msg.inc" -->
<!-- #include file="monitor.inc" -->
<%
if Not IsLogin then
response.clear
response.write "<script language=""javascript"">window.close();</script>"
end if
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'' 以下检查新消息
'' 获取 option 参数
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
dim pMsgOption : pMsgOption = GetParam("option")
dim pMenuOption : pMenuOption = GetParam("menu_option")
' 目前只有消息和留言两部分，因此menu_option应为1或2中的一个，因此这里认为如果参数不是2就是1
'if IsEmpty(pMenuOption) then pMenuOption = "1"
if CStr(pMenuOption) <> "2" and CStr(pMenuOption) <> "3" then pMenuOption = "1"
'response.write pMenuOption & "<br>"
' 根据pMsgOption的值显示不同的图标
dim sImg : if IsEmpty(pMsgOption) then sImg = "images/eye_still.gif" else sImg = "images/eye_move.gif"
'' 接着查询数据库中是否有未通知的新消息，并处理新消息
dim sMyEmpSerial : sMyEmpSerial = GetEmpSerial
dim iRows : iRows = 20
dim sMsgSerials, iRecords
sMsgSerials = SerialsOfNewMsgFromDB
call DealNewMsgs(sMsgSerials)
%>
<html>
<head>
<title>消息/留言监视器</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<!--meta http-equiv="refresh" content="3;URL=monitor.asp?option=<%=pMsgOption%>&menu_option=<%=pMenuOption%>" charset=gb2312 -->
<link rel="stylesheet" href="../common/common.css" type="text/css">
<style type=text/css>
.headtd1 { font-size:9pt; border-width:0px groove black;cursor: hand; }
.headtd2 { font-size:9pt; border-width:0px groove black;}
.bodytd {font-size:9pt;border-width:0pt;background: #99ccff; }
button {font-size:9pt;width:100%;height:22px;background-color:silver}
</style>
<script language="javascript" src="qqmenu.js"></script>
<script language="javascript">
// 定义变量
var headheight = 22;
var bodyheight = 354;
var objcount = 3;
var step = 1;
var moving = false;
function swapimg()
{
// 如果msg_option不为空，则设为空；如果为空，则设不空
var msg_option = document.all.msg_option.innerText;
if (msg_option != "")
msg_option = "";
else
msg_option = "1";
var menu_option = document.all.menu_option.innerText;
location.href = "monitor.asp?option=" + msg_option + "&menu_option=" + menu_option + "&";
}
function refreshMe()
{
var msg_option = document.all.msg_option.innerText;
var menu_option = document.all.menu_option.innerText;
location.href = "monitor.asp?option=" + msg_option + "&menu_option=" + menu_option + "&";
}
</script>
</head>
<!-- 324 -->
<body bgcolor="#99ccff" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" scroll=no>
<div id=mainboard style="z-index: 1; left: 0px; overflow: hidden; width: 100%; position: absolute; top: 0px; height: 100%;border:0px dotted #508CFF">
<div id=item1body style="z-index: 2; left: 0px; width:100%; position: absolute; top: 0px; height: 354px;overflow:hidden">
<!--div id=item1body style="z-index: 2; left: 0px; width:100%; position: absolute; overflow:hidden"-->
<table height="100%" cellspacing=0 cellpadding=0 width="100%" border=0 style="border-width:0px">
<tbody>
<tr>
<td class=headtd2 id=item1head onclick="menu_option.innerText='1';showme(item1body,this);" align=middle height=20>
<button>最新消息</button>
</td>
</tr>
<tr>
<td class=bodytd align=middle valign=top>
<!--
以下显示消息
-->
<table cellspacing=0 cellpadding=0 width="90%" border=0 style="table-layout:fixed;">
<tr style="display:none"><td width=15></td><td width="*">这一行主要用于控制表格的宽度</td></tr>
<!--tr height=25><td colspan=2 valign=middle><img onclick="swapimg()" border=0 style="cursor:hand" src="<%'=sImg%>"> 最新消息</td></tr-->
<%=MsgRecords%>
</table>
<!--
显示消息结束
-->
</td>
</tr>
</tbody>
</table>
</div>
<div id=item2body style="z-index: 3; left: 0px; width: 100%; position: absolute; top: 354px; height: 354px;overflow:hidden"-->
<!--div id=item2body style="z-index: 3; left: 0px; width: 100%; position: absolute; overflow:hidden"-->
<table height="100%" cellspacing=0 cellpadding=0 width="100%" border=0 style="border-width:0px">
<tbody>
<tr>
<td class=headtd1 id=item2head onclick="menu_option.innerText='2';showme(item2body,this);" align=middle height=22><button>留言信息</button>
</td>
</tr>
<tr>
<td class=bodytd align=middle valign=top>
<!--
以下显示留言
-->
<table cellspacing=1 cellpadding=0 width="90%" border=0 style="table-layout:fixed;">
<tr style="display:none"><td width=15></td><td width="*">这一行主要用于控制表格的宽度</td></tr>
<%=OnlineRecords%>
</table>
<!--
显示留言结束
-->
</td>
</tr>
</tbody>
</table>
</div><br>
<div id=item3body style="z-index: 4; left: 0px; width: 100%; position: absolute; top: 376px; height: 354px;overflow:hidden">
<!--div id=item3body style="z-index: 4; left: 0px; width: 100%; position: absolute; overflow:hidden"-->
<table height="100%" cellspacing=0 cellpadding=0 width="100%" border=0 style="border-width:0px">
<tbody>
<tr>
<td class=headtd1 id=item3head onclick="menu_option.innerText='3';showme(item3body,this);" align=middle height=22><button>快捷方式</button>
</td>
</tr>
<tr>
<td class=bodytd align=middle valign=top>
<br><a target=_blank style="cursor:hand" onclick="window.open('send.asp','','width=480,height=380');"><img border=0 src="images/fl_msg.gif"><br>发送消息</a><br>
<br><a target=_blank href="../message/online.asp"><img border=0 src="images/fl_online.gif"><br>在线信息</a><br>
<br><a href="javascript:window.close();" ><img border=0 src="images/fl_close.gif"><br>关闭窗口</a><br>
</td>
</tr>
</tbody>
</table>
</div>
</div>
<!-- 隐藏的参数，用于页面重新刷新时传递到新的页面 -->
<div id="msg_option" style="display:none"><%=pMsgOption%></div>
<div id="menu_option" style="display:none"><%=pMenuOption%></div>
<!-- 根据pMenuOption参数的值显示相应的内容 -->
<script language="javascript">
eval("var bodyToShow = item" + document.all.menu_option.innerText + "body");
eval("var itemToShow = item" + document.all.menu_option.innerText + "head");
showme(bodyToShow, itemToShow);
//bodyheight = mainboard.clientHeight - headheight * objcount;
//var currentItem;
//currentItem = parseInt(document.all.menu_option.innerText);
//for (var j=1; j<=objcount; j++)
//{
// eval("item" + j + "body.style.height = '" + bodyheight + "px'");
// if (j <= currentItem)
// eval("item" + j + "body.style.top = '" + headheight*(j-1) + "px'");
// else
// eval("item" + j + "body.style.top = '" + (headheight*(j-1)+bodyheight) + "px'");
//}
</script>
</body>
</html>
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''' 最后执行任务和例会提醒
Server.Execute("remind.asp")
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<script for=window event=onload>
// 每5秒刷新一次
setTimeout(refreshMe, 5000);
</script>
<script for=document event=onclick>
// var width = mainboard.clientWidth;
//alert(window.event.srcElement.width);
// var height = headheight * objcount + bodyheight;
// alert(mainboard.clientWidth);
// window.resizeTo(width,height);
</script>
<script for=window event=onresize>
// var width = mainboard.clientWidth;
//alert(window.event.srcElement.width);
// var height = headheight * objcount + bodyheight;
//alert(width + "," + height);
// window.resizeTo(width,height);
</script>
<script for=document event=onmousedown>
//alert("mousedown");
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -