📄 listnewmsg.asp
字号:
<!-- #include file = "../../include/asphead.asp" -->
<!-- #include file = "../../include/function.asp" -->
<%CheckUser()%>
<link href="../../include/main.css" rel="stylesheet" type="text/css">
<script src="../../include/function.js" type="text/javascript"></script>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
function View(MsgID) {
window.showModalDialog ("frame.asp?Target=view.asp?MsgID=" + MsgID+JoinChar+MsgIDs.value,"","dialogwidth:550px;dialogheight:360px;Status:0;center:1;resizable=1;");
}
function Cancel()
{
parent.window.close();
}
function CheckNewMsg()
{
if (NewMsgCount.value<=0)
{
parent.window.close();
}
}
//-->
</script>
<%
dim WExcel
set WExcel=server.CreateObject("WExcel.Sheet")
dim MsgCount,MsgData,MsgIDs
WExcel.GetNewMsgList cint(UserID),MsgCount,MsgData,MsgIDs
CheckErr
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" LANGUAGE=javascript onload="CheckNewMsg()">
<%if MsgCount>0 then%>
<table width=100% cellPadding=0 cellSpacing=0>
<tr bgcolor='white' height=30>
<td align='center'>
<b>新到 <%=MsgCount%> 条短信</b>
</td>
</tr>
<tr height=100 valign='top'>
<td>
<table width=95% cellspacing=1 bgcolor=999999>
<tr bgcolor='white'>
<td width='20%' align='center'>发信人</td>
<td width='65%' align='center'>标题</td>
<td width='15%' align='center'>详细</td>
</tr>
<%
for i=1 to MsgCount
Response.Write MsgData(i-1)
next
%>
</table>
</td>
</tr>
<tr height=30 valign=bottom bgcolor='white'>
<td align='center'>
<input id="btnCancel" type="button" value="关闭" name="btnCancel" style="cursor:hand; WIDTH: 50px; HEIGHT: 24px" LANGUAGE="javascript" onclick="return Cancel()">
</td>
</tr>
</table>
<%end if%>
<input TYPE="hidden" NAME="NewMsgCount" value="<%=MsgCount%>">
<input TYPE="hidden" NAME="MsgIDs" value="<%=MsgIDs%>">
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -