开源CMS如何在首页调用网站统计
系统本身就已经在 网站的底部 上加有 全站的统计
默认的代码是：
打开跟目录的文件；Count。Asp 就可以明白了，显示的是什么意思。
注意上面的蓝色部分是可以自己修改，或者是定义的。
附Count。Asp 供方便查看：
" & Count。Web_Online(0) & " 人 用户：" & Count。Web_Online(1) & " 人 游客：" & Count。 Web_Online(2) & " 人"
case "simple"
ShowInfo="总访问量：" & Count。CountInfo(5,0) & "人次"
ShowInfo=ShowInfo&"当前在...全部
系统本身就已经在 网站的底部 上加有 全站的统计
默认的代码是：
打开跟目录的文件；Count。Asp 就可以明白了，显示的是什么意思。
注意上面的蓝色部分是可以自己修改，或者是定义的。
附Count。Asp 供方便查看：
" & Count。Web_Online(0) & " 人 用户：" & Count。Web_Online(1) & " 人 游客：" & Count。
Web_Online(2) & " 人"
case "simple"
ShowInfo="总访问量：" & Count。CountInfo(5,0) & "人次"
ShowInfo=ShowInfo&"当前在线：" & Count。
Web_Online(0) & " 人"
case "all"
ShowInfo="总访问量：" & Count。CountInfo(5,0) & "人次"
ShowInfo=ShowInfo&"总浏览量：" & Count。
CountInfo(6,0) & "人次"
ShowInfo=ShowInfo&"今日访问：" & Count。CountInfo(1,0) & "人次"
ShowInfo=ShowInfo&"昨日访问：" & Count。
CountInfo(3,0) & "人次"
ShowInfo=ShowInfo&"当前在线：" & Count。Web_Online(0) & " 人"
ShowInfo=ShowInfo&"在线用户：" & Count。
Web_Online(1) & " 人"
ShowInfo=ShowInfo&"在线游客：" & Count。Web_Online(2) & " 人"
case else
Exit Sub
end select
Response。
Write "document。write(" & chr(34) & ShowInfo & chr(34) & ")"
End Sub
%>
。收起
