📄 statics.asp
字号:
<!--#include file="../../System/Const.asp"-->
<!--#include file="../../System/misc.asp"-->
<%
school_id = Request("school_id")
set cn=server.CreateObject("ADODB.connection")
cn.Open DSN_ACLASS
set rs=server.CreateObject("ADODB.recordset")
rs.Open "select * from SCHOOL where ID="+school_id,cn
set rsUser=server.CreateObject("ADODB.recordset")
rsUser.Open "select * from "&TBL_USER&" where TYPE="&UTP_SCHOOLADMIN&"",cn
set rsTemp=server.CreateObject("ADODB.recordset")
rsTemp.Open "select ID from "&TBL_USER&" where SCHOOLID="&request("school_id")&"", cn,adOpenStatic
count_su=rsTemp.RecordCount
rsTemp.Close
rsTemp.Open "select ID,BANDWIDTH,MULTICAST_IP,MULTICAST_PORT from CLASS where SCHOOLID="&request("school_id")&"", cn,adOpenStatic
count_sc=rsTemp.RecordCount
total_bandwidth=0
ip_info=""
count=0
while not rsTemp.eof
if not isnull(rsTemp("BANDWIDTH")) then total_bandwidth=total_bandwidth+rsTemp("BANDWIDTH")
ip_info=ip_info + "("
if not isnull(rsTemp("MULTICAST_IP")) and not isnull(rsTemp("MULTICAST_PORT")) then
ip_info=ip_info + rsTemp("MULTICAST_IP") + ":" + cstr(rsTemp("MULTICAST_PORT")) + ","
end if
if not isnull(rsTemp("BANDWIDTH")) then ip_info=ip_info + cstr(rsTemp("BANDWIDTH")) + "Kbps"
ip_info=ip_info + ") "
count=count+1
if count>2 then ip_info=ip_info + "<br> "
rsTemp.movenext
wend
rsTemp.Close
rsTemp.Open "select ID from TBL_SRUSER where SCHOOLID="&request("school_id")&"", cn,adOpenStatic
count_ssu=rsTemp.RecordCount
rsTemp.Close
%>
<HTML>
<BODY bgcolor="#CFC9CD" leftmargin="0" topmargin="10" >
<!--#include file="Header.asp"-->
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" height="70%">
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" bgcolor="#EFEFEF" height="20" valign="bottom"> 你现在的位置:公司管理-统计信息</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="14"></td>
<td width="764" height="14"> </td>
<td bgcolor="#8C9A8C" width="3" height="14"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3"></td>
<td width="764" valign="top">
<form name="form1" method="post" action="edit2.asp">
<table width="95%" border="1" align="center" bgcolor="#E3E3E3">
<tr bgcolor="EFEFEF">
<td width="30%">公司名</td>
<td width="70%" bgcolor="EFEFEF"> <%=rs("NAME")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">公司管理员</td>
<td width="70%"> <%=NameFromID(cn, TBL_USER, "ID", "USERNAME", rs("SAID"))%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">会议室数</td>
<td width="70%"> <%=count_sc%>/<%=rs("MAX_CLASS")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">用户数</td>
<td width="70%"> <%=count_su%>/<%=rs("MAX_USER")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">单收用户数</td>
<td width="70%"> <%=count_ssu%>/<%=rs("MAX_SRUSER")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">公共信息广播地址</td>
<td width="70%"> <%=rs("PUBLIC_IP")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">公共信息广播端口</td>
<td width="70%"> <%=rs("PUBLIC_PORT")%></td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">占用总带宽</td>
<td width="70%"> <%=total_bandwidth%>Kbps</td>
</tr>
<tr bgcolor="EFEFEF">
<td width="30%">地址信息</td>
<td width="70%"> <%=ip_info%></td>
</tr>
<tr bgcolor="EFEFEF">
<td colspan="2">
<div align="center">
<input type="button" value="返回" onClick="jscript:OnReturn()" name="button">
</div>
</td>
</tr>
</table>
</form>
</td>
<td bgcolor="#8C9A8C" width="3"></td>
</tr>
<tr>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
<td width="764" bgcolor="EFEFEF" height="21">
<div align="center"><%=COMPANY%></div>
</td>
<td bgcolor="#8C9A8C" width="3" height="21"></td>
</tr>
</table>
<table width="770" border="0" cellspacing="0" cellpadding="0" bgcolor="#8C9A8C" align="center">
<tr>
<td height="4"></td>
</tr>
</table>
<!--#include file="../../System/miscJScript.asp"-->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -