明輝手游網(wǎng)中心：是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺！

編寫“公平”的ASP圖形計數(shù)器

發(fā)表時間：2024-02-23 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：

[摘要]“技術(shù)天地”中的《編寫ASP圖形計數(shù)器》一文，詳細的說明了如何利用流行的ASP來編寫計數(shù)器。但是，美中不足的是，如果某個用戶反復(fù)點擊“刷新”按鈕，那么計數(shù)器還是要不斷的增加的，這對網(wǎng)站點擊率評比來說是不公平的，也失去了計數(shù)器做為正常統(tǒng)計功能的作用。如何在技術(shù)上避免這種情況的發(fā)生呢？ 我認為要防止上...
“技術(shù)天地”中的《編寫ASP圖形計數(shù)器》一文，詳細的說明了如何利用流行的ASP來編寫計數(shù)器。但是，美中不足的是，如果某個用戶反復(fù)點擊“刷新”按鈕，那么計數(shù)器還是要不斷的增加的，這對網(wǎng)站點擊率評比來說是不公平的，也失去了計數(shù)器做為正常統(tǒng)計功能的作用。如何在技術(shù)上避免這種情況的發(fā)生呢？
我認為要防止上網(wǎng)用戶連續(xù)按下“刷新”計數(shù)器也連續(xù)增加的問題，最好的辦法就是利用ASP的Session對象，我們可以借助Session對象首先判斷該用戶是否為新連接者，如果是，那么

IsEmpty(Session("hasbeenConnected"))=True，也就是說，Session("hasbeenConnected")是空的。那么，運行程序，使計數(shù)器加1，然后將該用戶的Session("hasbeenConnected")設(shè)置為True，也就是說，這個用戶已經(jīng)不是新的連接者，無論他怎么連續(xù)按下“刷新”按鈕，計數(shù)器也不會再增加。

結(jié)合《編寫ASP圖形計數(shù)器》一文，最后的站點計數(shù)器的源程序應(yīng)該是：

<html>
<head>
……
</head>
<body>
<%dim tms,counter,countlen
dim images(20)
h1="<p><font color='#8000ff'>這是一個ASP計數(shù)器</font></p>"
If IsEmpty(Session("hasbeenConnected")) then
set rs=server.createobject("adodb.recordset")
application.lock
rs.open "update aspcount set countss=countss+1","dsn=userdbs",3,3
application.unlock
Session("hasbeenConnected")=True
End If
set rs=server.createobject("adodb.recordset")
rs.open "select * from aspcount","dsn=userdbs",3,3
rs.movefirst
counter=rs(0)
countlen=len(counter)
tms="<h1><font color='#8000ff'>您是第</font>"&&counter&&"<font color='#8000ff'>位訪問者!</font></h1>"
response.write(tms)
for i=1 to countlen
images(i)="<img src=" && mid(counter,i,1) && ".gif></img>"
next
response.write images(1)&&images(2)&&images(3)&&images(4)&&images(5)&&images(6)&&images(7)
rs.Close
%>
</body>
</html>