鐵之狂傲

標題: 【原創】燒喔~計數器語法 [列印本頁]

作者: 墮夜    時間: 04-11-25 00:21
標題: 【原創】燒喔~計數器語法
簡易計數器

一、基本式

<%
application("count")瀏覽人數加1
application("count") = application("count") + 1
%>

<HTML>
<BODY>
………
………
………
瀏覽人數:<% =application("count")%> 顯示瀏覽人數
</HTML>
</BODY>

二、加入"防止重複"

<%
application("count")瀏覽人數加1前先鎖定
application.Lock
application("count") = application("count") + 1
application.UnLock 鎖定解除
%>

三、加入"防止重新整理加1" <%
color="#999999">
如果session("login")是空白表示未瀏覽 , application("count")瀏覽人數加1
</FONT>if isEmpty(session("login")) then
application.Lock
application("count") = application("count") + 1
application.UnLock
session("login")=True 將session("login")設為真值True , 表示該使用者已瀏覽
end if
%>


----------------------------------------------------

這樣的計數器不會像Frontpage一樣可以自行設定初始值

也就是所謂的"灌水計數"

還有...黃色字樣是註解

複製的時候不要也打進去啊XD
作者: 墮夜    時間: 04-11-25 00:26
標題: 回覆: 【原創】燒喔~計數器語法
插入/製作方法:

先開個新檔案取名為: global.asa

然後請確定你們用的是"VB架站"

然後把樓上的語法自行組合後貼進去

存檔後放置在和你"網頁存檔資料夾同一個目錄下"

不然網頁會讀不到global

插入時在HTML模式輸入<%application("count")%>

(記得在你要的位置點一下後再進去HTML)
作者: Arima    時間: 04-11-26 02:04
標題: 回覆: 【原創】燒喔~計數器語法
(舉起左手...)那...數字會不會因為破表然後亂掉...!?
以前好像看到某個網站的計數記顯示的數字都歪七扭八的...
大概是人數太多的樣子...剛好想起來。
作者: 墮夜    時間: 04-11-26 23:45
標題: 回覆: 【原創】燒喔~計數器語法
[QUOTE=Arima](舉起左手...)那...數字會不會因為破表然後亂掉...!?
以前好像看到某個網站的計數記顯示的數字都歪七扭八的...
大概是人數太多的樣子...剛好想起來。[/QUOTE]
不會!

因為這不是圖形化的計數器

它使用的是長整數(Long)

所以不會有整數(Integer)那樣只有32767




歡迎光臨 鐵之狂傲 (https://gamez.com.tw/)