ASP Access實(shí)現(xiàn)網(wǎng)站計(jì)數(shù)器（訪問(wèn)量）
更新時(shí)間：2008年11月12日 00:30:30 作者：
學(xué)習(xí)asp的朋友需要了解下
<%
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("cou.mdb") //cou是數(shù)據(jù)庫(kù)名
conn.open connstr
if session("visited")<>"yes" then
application.Lock()
conn.execute("update counter set hits=hits+1 where kid=1") //counter是數(shù)據(jù)庫(kù)里面用于存儲(chǔ)數(shù)據(jù)的表名
application.UnLock()
session("visited")="yes"
end if
set rs=conn.execute("select * from kuo where kid=1")
if rs.eof and rs.bof then
counters=0
else
counters=rs("hits")
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("cou.mdb") //cou是數(shù)據(jù)庫(kù)名
conn.open connstr
if session("visited")<>"yes" then
application.Lock()
conn.execute("update counter set hits=hits+1 where kid=1") //counter是數(shù)據(jù)庫(kù)里面用于存儲(chǔ)數(shù)據(jù)的表名
application.UnLock()
session("visited")="yes"
end if
set rs=conn.execute("select * from kuo where kid=1")
if rs.eof and rs.bof then
counters=0
else
counters=rs("hits")
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
您可能感興趣的文章:
- 詳解Java多線程編程中CountDownLatch阻塞線程的方法
- Java多線程編程之CountDownLatch同步工具使用實(shí)例
- java線程并發(fā)countdownlatch類使用示例
- Java數(shù)據(jù)結(jié)構(gòu)及算法實(shí)例：快速計(jì)算二進(jìn)制數(shù)中1的個(gè)數(shù)(Fast Bit Counting)
- js計(jì)數(shù)器代碼
- Redis的使用模式之計(jì)數(shù)器模式實(shí)例
- PHP計(jì)數(shù)器的實(shí)現(xiàn)代碼
- php計(jì)數(shù)器的設(shè)計(jì)與實(shí)現(xiàn)
- MySQL中實(shí)現(xiàn)高性能高并發(fā)計(jì)數(shù)器方案（例如文章點(diǎn)擊數(shù)）
- Java中CountDownLatch用法解析
相關(guān)文章
本文再和大家分享一些ASP程序設(shè)計(jì)中經(jīng)常用到的源代碼。適合初學(xué)者閱讀。希望對(duì)你有幫助，一起來(lái)看吧！2015-10-10
ip138之a(chǎn)sp小偷程序代碼...2007-08-08
很多朋友對(duì)于asp的換行的實(shí)現(xiàn)，不是很懂，不懂什么情況下該使用什么樣的代碼，這里腳本之家簡(jiǎn)單的為大家說(shuō)下，希望對(duì)大家能有所幫助。2011-01-01
ASP多條件查詢功能實(shí)現(xiàn)代碼(多關(guān)鍵詞查詢)
今天在用asp增加一個(gè)多條件查詢，標(biāo)題可以包括多個(gè)關(guān)鍵詞，這樣提高匹配，防止內(nèi)容重復(fù)等2014-05-05
64位win7的IIS7下asp與access的連接問(wèn)題
運(yùn)行asp是提示Microsoft OLE DB Provider for ODBC Drivers (0x80004005)[Microsoft][ODBC Microsoft Access Driver] 找不到文件 '(未知的)'。2009-12-12
asp分頁(yè)生成html的程序腳本代碼...2007-09-09
比較不錯(cuò)的asp模板引終極講解(WEB開(kāi)發(fā)之ASP模式)
比較不錯(cuò)的asp模板引終極講解(WEB開(kāi)發(fā)之ASP模式)...2007-08-08
ASP中怎么實(shí)現(xiàn)SQL數(shù)據(jù)庫(kù)備份、恢復(fù)！
ASP中怎么實(shí)現(xiàn)SQL數(shù)據(jù)庫(kù)備份、恢復(fù)！...2007-03-03
完成asp語(yǔ)言對(duì)XML文檔中指定節(jié)點(diǎn)文本的增加、刪除、修改、查看，需要的朋友可以參考下。2011-02-02
ASP備份SQL Server數(shù)據(jù)庫(kù)改進(jìn)版
改進(jìn)的ASP備份SQL Server數(shù)據(jù)庫(kù)，網(wǎng)上原理的不是很好，需要的朋友可以參考下。2011-02-02