按照以下步驟,逐步操作,你很快就會(huì)擁有精美的圖形化計(jì)數(shù)器。
步驟1:在網(wǎng)站的某個(gè)目錄如count下建立文本文件,如counter.dat ,用于存放訪問(wèn)量。文件內(nèi)容僅有一行數(shù)字,表示網(wǎng)站初始訪問(wèn)量,一般為0。
步驟2:在相同目錄下建立計(jì)數(shù)器的ASP程序,可命名為mycount.asp,內(nèi)容如下:
%
'自編ASP圖形化計(jì)數(shù)器 V1.1
'用于網(wǎng)頁(yè)瀏覽統(tǒng)計(jì),免費(fèi)使用,自由拷貝!
dim vistors
'獲取計(jì)數(shù)文件counter.dat的地址
countfile=server.mappath("counter.dat")
'創(chuàng)建filesystemobject對(duì)象實(shí)例fs
set fs=server.createobject("scripting.filesystemobject")
'以讀方式打開(kāi)文件,其中1為讀方式
set thisfile=fs.opentextfile(countfile,1,FALSE,FALSE)
'讀取計(jì)數(shù)文件的內(nèi)容
visitors=thisfile.readline
'關(guān)閉文件
thisfile.close
set fs=server.createobject("scripting.filesystemobject")
'以覆蓋方式(TRUE)、以ASCII格式(FALSE)創(chuàng)建文件
set thisfile=fs.createtextfile(countfile,TRUE,FALSE)
'計(jì)數(shù)器的關(guān)鍵處:
'增加了變量connected,用于判斷訪問(wèn)者是否為新的連接者
'此舉可防止同一用戶在同一次瀏覽中,由于多次按瀏覽器的“刷新”按鈕,
'從而使計(jì)數(shù)器值不斷升高的現(xiàn)象發(fā)生
if IsEmpty(session("connected")) then
application.lock
'禁止其它用戶更改計(jì)數(shù)器的值
visitors=visitors+1
'計(jì)數(shù)器值加1
thisfile.writeline(visitors)
'將結(jié)果寫(xiě)入文件
application.unlock
'取消鎖定,允許用戶更改計(jì)數(shù)器的值
else
application.lock
visitors=visitors
thisfile.writeline(visitors)
application.unlock
end if
session("connected")=TRUE
'設(shè)定來(lái)訪者為已連接者(TRUE),此時(shí)再按“刷新”按鈕計(jì)數(shù)器值不會(huì)變化。
countlen=len(visitors)
'獲得計(jì)數(shù)器值的長(zhǎng)度(即數(shù)值的位數(shù))
'如果您不想使用圖形,可用如下內(nèi)容代替for/next循環(huán)
'文本計(jì)數(shù)器: response.write "document.write("visitors");"
'逐位顯示圖形化數(shù)字
for i=1 to countlen
response.write "document.write('img src=""images/""/"mid (visitors,i,1)".gif>/img>');"
next
'關(guān)閉文件
thisfile.close
set fs=nothing
%>
步驟3:將counter.dat、mycount.asp文件放在同一目錄下(也可分開(kāi)存放,但此時(shí)需指定文件路徑),并在該目錄下建立images目錄,存放圖形化的數(shù)字文件,要求數(shù)字0對(duì)應(yīng)0.gif,數(shù)字1對(duì)應(yīng)1.gif,以此類推(展現(xiàn)你個(gè)性的機(jī)會(huì)來(lái)了,你可以將數(shù)字做得非常Cool)。
步驟4:至此,大功即將告成。你只要在網(wǎng)頁(yè)中使用以下格式調(diào)用計(jì)數(shù)器即可:
script language="javascript" src="count/mycount.asp">
/script>
注意: (1)如果你采用不同的目錄名、文件名,請(qǐng)作相應(yīng)修改;
(2)計(jì)數(shù)器程序采用ASP編程,請(qǐng)?jiān)诰W(wǎng)站上試驗(yàn)或在個(gè)人服務(wù)器PWS調(diào)試;
只要以上四大步驟大家認(rèn)真仔細(xì)研究,相信大家一定會(huì)制作出一個(gè)具有自己風(fēng)格特點(diǎn)的asp網(wǎng)頁(yè)設(shè)計(jì)流量統(tǒng)計(jì)。
您可能感興趣的文章:- ASP制作在線人數(shù)統(tǒng)計(jì)實(shí)例
- 統(tǒng)計(jì)有多少行JS代碼和ASP代碼
- ASP程序代碼執(zhí)行時(shí)間統(tǒng)計(jì)類
- asp論壇在線人數(shù)統(tǒng)計(jì)研究
- 實(shí)現(xiàn)ASP程序執(zhí)行時(shí)間統(tǒng)計(jì)類的代碼
- asp實(shí)現(xiàn)一個(gè)統(tǒng)計(jì)當(dāng)前在線用戶的解決方案
- ASP訪問(wèn)數(shù)量統(tǒng)計(jì)代碼
- asp.net aspnetpager分頁(yè)統(tǒng)計(jì)時(shí)與實(shí)際不符的解決辦法
- asp.net中調(diào)用Office來(lái)制作3D統(tǒng)計(jì)圖的實(shí)例代碼
- ASP.net中網(wǎng)站訪問(wèn)量統(tǒng)計(jì)方法代碼
- php模仿asp Application對(duì)象在線人數(shù)統(tǒng)計(jì)實(shí)現(xiàn)方法