📄 statistical.asp
字号:
<%
'###########################################################################################
'* 程序名称: Top-CMS
'*---------------------------------------------------------------------------------------
'* 系统版本: 1.0 0215
'* 版权所有: www.Net-Develop.com
'* 程序设计: 江南行客
'* 联系方式:
'* OICQ:2503086
'* EMAIL:net-oa@sohu.com
'* 网站地址:
'* http://www.net-develop.com
'* http://www.top-cms.com
'*---------------------------------------------------------------------------------------
'* Copyright 2004 www.net-develop.com - All Rights Reserved.
'###########################################################################################
%>
<!--#include file="../common/common.asp" -->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/style.css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
Set objCMS = Server.CreateObject("TopCMS.Statistical")
if objCMS.ChkAdminPower then
objCMS.dbType=dbType
objCMS.dbName =dbName
objCMS.SqlName=SqlName
objCMS.SqlUID=SqlUID
objCMS.SqlPWD=SqlPWD
objCMS.OpenDB
%>
<table width="100%" border="1" bordercolor="#999999" cellspacing="0" cellpadding="2" align="center">
<tr>
<td colspan="2" background="../Images/default_nav.gif"><font color="#FFFFFF">数据统计</font></td>
</tr>
<tr bgcolor="#EEEEEE">
<td width="50%">栏目总计:[<%=objCMS.countCat%>]</td>
<td width="50%">类别总计:[<%=objCMS.countSub%>]</td>
</tr>
<tr bgcolor="#FFFFFF">
<td>专题总计:[<%=objCMS.countClass%>]</td>
<td>评论总计:[<%=objCMS.countComment%>]</td>
</tr>
<tr bgcolor="#EEEEEE">
<td>信息总计:[<%=objCMS.countInfo%>]</td>
<td>用户总计:[<%=objCMS.countUser%>]</td>
</tr>
</table>
<%
objCMS.CloseDB
else
objCMS.OutInfo "对不起,您还没有登录,请先登录","Login"
end if
set objCMS=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -