<% if isEmpty(session("login")) then application.Lock application("count") = application("count") + 1 application.UnLock session("login")=True '將session("login")設為真值True , 表示該使用者已瀏覽 end if %>