談Access為后臺數據庫的網站統計系統_Access數據庫教程
教程Tag：暫無Tag,歡迎添加,賺取U幣!
推薦：解讀將文本文件轉換為ACCESS數據庫的方法本文向你介紹如何不用借助Access，直接在程序中創建一個數據庫，然后從標準的ASCII文本文件中讀取數據到數據庫中。原文是微軟知識庫中的一篇文章，但當時是針對VB3寫的，所以其中的代
一個能對訪問者進行編號、記錄訪問次數、IP、時間的統計制作實例
我以ACCESS庫為例子，其實用SQL SERVER庫也只要改一下鏈接庫的語句就得啦，庫結構如下
庫文件名： CONT.ASP 本來是CONT.MDB但在建好后把擴展名改為了ASP,以防庫被下載。
表名：tab
字段名 數據類型 說明
ID 自動編號 訪客的編號
IP 文本 用于記錄訪客的IP
dat1 日期時間 用于記錄訪客最后訪問的時間
dat 日期時間 用于記錄訪客第一次訪問的時間
CS 數字，整型 用于記錄訪客訪問次數
程序很簡單，只有兩個文件，dispcont.asp 用于顯示統計結果，contpage.asp用于統計信息，
先看看CONTPAGE.ASP 是乍么統計的，代碼如下：
| 以下為引用的內容： <% Set Conn=Server.CreateObject("ADODB.Connection") Connstr="DBQ=" server.mappath("cont.asp") ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" Conn.Open connstr ‘’*****以上語句用于連接庫，cont.asp是庫文件名。 keren=request.cookies("keren") ‘’讀取cookies,cookies的名為：“keren”,哈哈。。阿余的E文學的臭，只懂用拼音啦。 if keren="" then ‘’判斷cookees是不是空，如果是空，那么肯定是新朋友啦，否則是老朋友。 sql="SELECT * FROM tab where id=-1" set rs=server.createobject("ADODB.Recordset") rs.Open sql,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一樣。 response.cookies("keren").expires=date 365 ‘’設置cookies的有效日期從現在開始，365天， else ‘’以上是新朋友的處理辦法，對老朋友怎么辦呢？看下面的： sql="SELECT * FROM tab where id="&keren ‘’到庫中去找出我們老朋友的記錄 set rs=server.createobject("ADODB.Recordset") rs.Open sql,conn, 1, 3 rs("cs")=rs("cs") 1 ‘’好啦，找到啦，把訪問次數加上1 rs("ip")=request.servervariables("remote_addr") ‘’看看他的IP是多少了，記下來。 rs("dat")=now ‘’記下現在的時間，也就是最后一次訪問的時間， response.cookies("keren")=rs("id") ‘’再把cookies寫進去，我不知這句是否多余，沒有試。 response.cookies("keren").expires=date 365 ‘’設置cookies過期時間，免得一年到了我就不認得他了。 end if rs.update ‘’該記的都記下了，更新庫吧。 rs.close ‘’關閉recordset對象。 set conn=nothing ‘’釋放conn，我還是認為connection要隨開隨關才對，放到SESSION中我認為最不可取。4 %> |
分享：揭秘十萬條Access數據表分頁的解決方法后臺數據庫用是Access,客戶用了一年后說打開界面非常慢,查看了數據庫后發現數據表中的記錄已有五萬多條,自己試過將記錄復制到10 萬條,打開界面非常慢,翻頁也是同樣的問題,我采用的方
相關Access數據庫教程：
- 相關鏈接：
- 教程說明：
Access數據庫教程-談Access為后臺數據庫的網站統計系統
。