📄 main.asp
字号:
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
''''版权:野马原创 ''''
''''联系:ctplr@163.com ''''
''''说明:需要新功能联系我 ''''
''''QQ:2643148 ''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<!--#include file="check.asp"-->
<!--#include file="qx.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="../webinfo.asp"-->
<link href=left.css rel=stylesheet>
<%''获取系统资料''
sql="select username from ct_sql"
rs.open sql,cn,1,1
menbershenhenum=rs.recordcount
rs.close
sql="select username from ct_sql where noshenhe=0"
rs.open sql,cn,1,1
menbernoshenhenum=rs.recordcount
rs.close
sql="select username from ct_sql where mustqdok=1"
rs.open sql,cn,1,1
todaylogin=rs.recordcount
rs.close
sql="select username from ct_sql where todayqd=1"
rs.open sql,cn,1,1
nologinout=rs.recordcount
rs.close
sql="select username from ct_sql where todaylatter=1"
rs.open sql,cn,1,1
latter=rs.recordcount
rs.close
sql="select username from ct_sql where sucnownum=1"
rs.open sql,cn,1,1
noshenhesuc=rs.recordcount
rs.close
sql="select id from artic "
rs.open sql,cn,1,1
wznum=rs.recordcount
rs.close
sql="select id from annouce "
rs.open sql,cn,1,1
ggnum=rs.recordcount
rs.close
isinit=initmonth
if isinit=0 then
initmonthcn="<font color=red title='每个月月初系统自动初始化'>尚未初始化</font>"
elseif isinit=1 then
initmonthcn="<font color=green >已经初始化</font>"
end if
%>
<body >
<center>
</center>
<p align=center></p>
<center>
<table border=1 width="75%">
<tr >
<td colspan=4 height=4 align=center background="../images/loginLine.gif" >
</td>
</tr>
<tr height=18 >
<td colspan=4 align=center class=tdwhtimg> <font color=black>系统资料快照</td>
</tr>
<tr height=18>
<td align=left class=td2> <a href=userindex.asp>已审核成员</a></td>
<td width="15%" class=td2> <font color=white><%=menbershenhenum%></font>个</td>
<td align=left class=td2><a href=shenhe.asp>未审核成员</a></td>
<td width="15%" class=td2> <font color=white><%=menbernoshenhenum%></font>个</td>
</tr>
<tr height=18>
<td align=left class=td1>今天已签到人员</td>
<td width="15%" class=td1> <font color=red><%=todaylogin%></font>个</td>
<td align=left class=td1>当前未注销人员</td>
<td width="15%" class=td1> <font color=red><%=nologinout%></font>个</td>
</tr>
<tr height=18>
<td align=left class=td2> <a href=latter.asp>今天迟到人员</a></td>
<td width="15%" class=td2> <font color=red><%=latter%></font>个</td>
<td align=left class=td2>本月系统初始化操作</td>
<td width="20%" class=td2> <%=initmonthcn%></td>
</tr>
<tr height=18>
<td align=left class=td1><a href=artadd.asp> 系统文章数量</a></td>
<td width="15%" class=td1> <font color=yellow><%=wznum%></font>篇</td>
<td align=left class=td1> <a href=annouce.asp>公告数量</a></td>
<td width="15%" class=td1> <font color=yellow><%=ggnum%></font>篇</td>
</tr>
</table>
</center>
<center>
<table border=1 width="75%">
<tr >
<td colspan=4 height=4 align=center background="../images/loginLine.gif" > </td>
</tr>
<tr height=18 >
<td width="10%" colspan=4 align=center class=tdwhtimg> <font color=black>服务器信息</font></td>
</tr>
<tr height=18>
<td align=left width="20%" class=td2> 服务器操作系统</td>
<td width="30%" class=td2> <font color=#ffff00><%=Request.ServerVariables("OS")%></font></td>
<td align=left width="20%" class=td2> 服务器IP</td>
<td width="30%" class=td2> <font color=#ffff00><%=Request.ServerVariables("REMOTE_ADDR")%></font></td>
</tr>
<tr height=18>
<td width="20%" align=left class=td1> 服务器端口</td>
<td width="30%" class=td1> <font color=#ffff00><%=Request.ServerVariables("SERVER_PORT")%></font></td>
<td width="20%" align=left class=td1> 服务器时间</td>
<td width="30%" class=td1> <font color=#ffff00><%=now%></font></td>
</tr>
<tr height=18>
<td align=left width="20%" class=td2> IIS版本</td>
<td width="30%" class=td2> <font color=#ffff00><%=Request.ServerVariables("SERVER_SOFTWARE")%></font></td>
<td align=left width="20%" class=td2> 脚本超时时间</td>
<td width="30%" class=td2> <font color=#ffff00><%=Server.ScriptTimeout%> 秒</font></td>
</tr>
<tr height=18>
<td width="20%" align=left class=td1> 服务器CPU数量</td>
<td width="30%" class=td1> <font color=#ffff00><%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
个</font></td>
<td width="20%" align=left class=td1> 服务器解译引擎</td>
<td width="30%" class=td1> <font color=#ffff00><%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %></font></td>
</tr>
</table>
</center>
<br>
<center>
<table border=1 width="75%" >
<tr >
<td colspan=4 height=4 align=center background="../images/loginLine.gif" > </td>
</tr>
<tr height=18 background="../images/nav_back.gif">
<td colspan=4 align=center class=tdwhtimg> <font color=black>系统授权信息</td>
</tr>
<tr class=td1 height=18>
<td colspan=4 align=center> 授权给 <font color=white><%=webname%></font>
使用</td>
</tr>
<tr height=18>
<td align=left class=td2> 系统版本</td>
<td width="30%" class=td2> <font color=yellow><%=webver%></font></td>
<td align=left class=td2>开 发 者</td>
<td class=td2> <font color=red><a href="mailto:ctplr@163.com" target="_blank" title="QQ号:214297587">野马</a></font></td>
</tr>
<tr height=18>
<td align=left class=td1>系统需求</td>
<td width="30%" class=td1> <font color=red>iis 5.0以上<br> NetBox V2.8<br> access2003</font></td>
<td align=left class=td1>本版发布时间</td>
<td width="25%" class=td1> <font color=red><%=publishtime%></font></td>
</tr>
<tr >
<td colspan=4 height=4 align=center background="../images/loginLine.gif" > </td>
</tr>
</table>
</center>
<p align=center></p>
<br><br>
<br>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -