編寫“公平”的ASP圖形計數器

來源:互聯網
上載者:User
“技術天地”中的《編寫ASP圖形計數器》一文,詳細的說明了如何利用流行的ASP來編寫計數器。但是,美中不足的是,如果某個使用者反覆點擊[重新整理] 按鈕,那麼計數器還是要不斷的增加的,這對網網站擊率評比來說是不公平的,也失去了計數器做為正常統計功能的作用。如何在技術上避免這種情況的發生呢?
我認為要防止上網使用者連續按下“重新整理”計數器也連續增加的問題,最好的辦法就是利用ASP的Session對象,我們可以藉助Session對象首先判斷該使用者是否為新串連者,如果是,那麼

IsEmpty(Session("hasbeenConnected"))=True,也就是說,Session("hasbeenConnected")是空的。那麼,運行程式,使計數器加1,然後將該使用者的Session("hasbeenConnected")設定為True,也就是說,這個使用者已經不是新的串連者,無論他怎麼連續按下[重新整理] 按鈕,計數器也不會再增加。

結合《編寫ASP圖形計數器》一文,最後的網站計數器的來源程式應該是:

<html>
<head>
……
</head>
<body>
<%dim tms,counter,countlen
dim images(20)
h1="<p><font color='#8000ff'>這是一個ASP計數器</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>


聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.