一個能對訪問者進行編號、記錄訪問次數、IP、時間的統計製作實例
我做了一個網站,www.zydn.net當然啦,跟大家一樣,也擺了個計數器在上面,每天看計數器都在不斷的翻,心裡很高興,不過後來我又想,到底是誰看了我的網站啊?是新朋友還是老朋友啊?也不知他們來了多少次,我還想給他們都編上號,於是我申請了免費統計,不過一連換了N個都不滿意,唉,看來,只有自己動手才能豐衣足食了,說乾就乾,水平臭臭,還望高手笑話之於,不訪指教。
我以ACCESS庫為例子,其實用SQLSERVER庫也只要改一下鏈接庫的語句就得啦,
庫結構如下
庫文件名:CONT.ASP本來是CONT.MDB但在建好後把擴展名改為了ASP,以防庫被下載。
表名:tab
字段名數據類型說明
ID自動編號訪客的編號
IP文本用於記錄訪客的IP
dat1日期時間用於記錄訪客最後訪問的時間
dat日期時間用於記錄訪客第一次訪問的時間
CS數字,整型用於記錄訪客訪問次數
程序很簡單,只有兩個文件,dispcont.asp用於顯示統計結果,contpage.asp用於統計信息,
先看看CONTPAGE.ASP是乍麼統計的,代碼如下:
<%
SetConn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("cont.asp")+";DefaultDir=;DRIVER={MicrosoftAccessDriver(*.mdb)};"
Conn.Openconnstr'*****以上語句用於連接庫,cont.asp是庫文件名。
keren=request.cookies("keren")'讀取cookies,cookies的名為:“keren”,哈哈。 。阿餘的E文學的臭,只懂用拼音啦。
ifkeren=""then'判斷cookees是不是空,如果是空,那麼肯定是新朋友啦,否則是老朋友。
sql="SELECT*FROMtabwhereid=-1"
setrs=server.createobject("ADODB.Recordset")
rs.Opensql,conn,1,3
rs.addnew'如果是新訪客的話,在庫中新增一條記錄。
rs("cs")=1'記下訪問次數為1
rs("ip")=request.servervariables("remote_addr")'記下IP,
rs("dat")=now'記下當前的日期時間,
rs("dat1")=date'記下當前的日期,以後用來做第一次訪問的日期,
response.cookies("keren")=rs("id")'寫入一個cookies,內容就和ID一樣。