📄 statistical.asp

📁 top-cms内容管理系统

💻 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 + -