精华区 [关闭][返回]

当前位置:月光软件>>讨论区精华>>〖软件开发〗>>● ASP>>★ASP的应用★>>[转载]如何用ASP编写网站统计系统(一)

主题:[转载]如何用ASP编写网站统计系统(一)
发信人: dongbao()
整理人: netyum(2002-07-23 19:01:35), 站内信件
在目前的网站统计系统决大部分都是CGI的,但编写起来特别复杂,而ASP学起来
简单,更有和数据库结合的优点,所以结合自己曾经做过的网站统计系统,和大
家探讨一下ASP编写网站统计系统。 

大家都看过网易的网站统计系统,它可以统计总访问量,每日平均访问量,当日
访问量,最高访问量,最高访问日期,日流量分析,月流量分析,周流量分析,
浏览器分析,等等。 

其实要做一个ASP的访问统计系统关键是系统表结构的设计。以及如何来采集用户
的CGI变量,如何来显示用户的信息。也就是说系统的关键是两个ASP程序,统计
程序和显示程序。 

首先我们先看看如何来采集用户的访问信息。 

我们编写访问统计需要知道用户的如下信息,访问者的IP(根据访问IP可以形成
访问者IP列表),访问者的浏览器与操作系统(统计访问者的浏览器与操作系统
及所有访问者浏览器与操作系统比例图),访问者的访问时间(进行日访问量分
析,月访问量分析,周访问量分析),下面我们来看看用ASP的获得以上信息的语
句: 
1。获得访问者IP 
Dim M_IP 
M_IP=Request.Servervariables("REMOTE_HOST") 
用上面的语句可以取得访问者的IP。 
2。获得浏览器信息 
Dim O_Browser,M_BrowserType 
Set O_Browser=Server.Createobject("MSWC.BrowserType") 
M_BrowserType=O_Browser.Browser+O_Browser.Version 
3。获得访问时间 
Dim M_DateTime 
M_DateTime=Year(Date())&"/"&Right("0"&Month(Date()),2)&"/"Right("0"&Da
y(Date()),2)&"/"&Right("0"&Hour(Time()),2)&":"&Right("0"&Minute(Time()
),2)&":"&Right("0"&Second(Time()),2) 

--
ICQ:43395237 OICQ:126132  
我自豪我用正版,我骄傲我用盗版!!! 

※ 来源:.月光程序代码网 http://www.moon-soft.com.[FROM: 202.108.0.5]

[关闭][返回]






转载请注明:转载自 月光程序代码网 [ http://www.moon-soft.com ]