asp訪問統計

㈠ 利用asp中的application對象編寫一段代碼，實現頁面的訪問量的統計

<睜高script language="VBScript" type="text/VBScript" runat="server">
sub Application_OnStart
Application.Lock
Application("APP_OnLine")=0
Application.Unlock
end sub
sub Session_OnStart
Application.Lock
Application("APP_OnLine")=Application("APP_OnLine")+1
Application.Unlock
end sub
sub Session_OnEnd
Application.Lock
Application("APP_OnLine")=Application("APP_OnLine")-1
Application.Unlock
end sub
</script>
上面的命名為 Global.asa 放在站點根目錄可以實現統計在線人數,如果你是要實現頁面的訪問量的統計那麼用下面的代碼放在需要統計的ASP頁面里
<%
Application.Lock
if Application("APP_OnLine")="" then Application("APP_OnLine"悉塵尺)=0
Application("APP_OnLine")=Application("APP_OnLine")+1
Application.Unlock
Response.Write("已經有"兄老 & Application("APP_OnLine") & "人次訪問過此頁面")
%>
這是計算總訪問量的這個數只會增加不會減少,當伺服器重啟時這個數會被清空

㈡ asp網站或普通html網站如何實現統計瀏覽次數

這是由伺服器端腳本加資料庫實現的。
簡單的訪問量統計可以這樣做：
1、當伺服器響應訪問請求時，訪問統計代碼會讀取響應統計表裡的數值
2、[響應成功]該數值加1
3、訪問統計代碼將新值更新到響應統計表（替換原來的值）
4、將新值發送給客戶端

javascript是客戶端腳本，不能操作伺服器端的表，所以這個單用javascript無法實現，必須用到彎歷伺服器端腳本（程序），比如PHP、JSP、ASP.net等掘如。

如果網站是asp的，就用asp實現吧。
純html頁面是不能實現訪問統計的。埋散搜

㈢ ASP.net怎麼實現網站訪問量統計數據得保存到資料庫裡面

在網頁載入時，連接資料庫的某張表的某個記錄（如Page：1.aspx，Count：25），使用更新SQL，更新訪問量Update 25++

㈣ asp統計用戶訪問次數

添加一個數字欄位 chaxun
加上一下代碼：
if session("flag")="" then
rs("chaxun")=rs("chaxun")+1
rs.update
session("flag")=true
end if

效果：每當查詢成功一次，資料庫chaxun欄位自動增加1，這就達到了你所要的結果。

㈤ ASP統計在線人數和訪問次數代碼

///////////////Global.asa文件：///////////////////////
<script language="VBScript" runat="Server">
Sub Application_onStart
Application("Count")=0
Application("Online")=0
end sub
Sub session_onStart
session.Timeout=5 //這里是設定會話結束時間（5分鍾）
Application.Lock
Application("Count") = Cint(Application("Count")) + 1 //訪問次數加1
Application("Online") = Cint(Application("Online")) + 1 //在線人數加1
Application.UnLock
end sub
Sub session_OnEnd
Application.Lock
Application("Online") = Cint(Application("Online")) - 1 //會話結束時在線人數減1
Application.UnLock
end sub
</script>
//////////////////index.asp文件部分代碼///////////////////
總訪問人數:<%response.Write(application("Count"))%>人
當前在線:<%response.Write(application("Online"))%>人

㈥ ASP 訪問次數統計

<% if Request.Cookies(homeurl)("jz1024")="" then ipcheck=true Response.Cookies(homeurl)("jz1024")=now() elseif DateDiff("s",Request.Cookies(homeurl)("jz1024"),now())<stime then ipcheck=false else Response.Cookies(homeurl)("feiyueip")=now() ipcheck=true end if '--------寫進cookies-------- if request.Cookies(homeurl)("jz1024")="" then response.Cookies(homeurl)("jz1024")=1 response.Cookies(homeurl).Expires=date()+cookies_time else response.Cookies(homeurl)("feiyue")=cint(request.Cookies(homeurl)("jz1024"))+1 end if '--------結束寫進cookies-------- if request.Cookies(homeurl)("jz1024")<>"" then if request.Cookies(homeurl)("jz1024")=1 then response.write "歡迎光臨！" elseif request.Cookies(homeurl)("凱洞jz1024")=2 then response.write "歡姿枝迎再次光臨盯冊枯！" elseif request.Cookies(homeurl)("jz1024")=3 then response.write "歡迎您再次光臨！" ...... end if end if %>

麻煩採納，謝謝!