<%
Dim NumVisits
NumVisits=0
Application.Lock
Application("NumVisits") = Application("NumVisits") + 1
Application.Unlock
%>
欢迎光临本网页,你是本页的第 <%= Application("NumVisits") %> 位访客!
这个比较简单
网站文章浏览量统计代码如下:
如果是php的页面,直接在显示文章前面update一下文章浏览量就行。
特别注意一下刷新页面:
if(isrefrash==session(id)){
浏览量增加
0 isrefrash=session(id)
}else{
浏览量+1
isrefrash=session(id)
}
到51.la,注册帐号,得到代码。拷贝到你的文章中。