好而思远:我想在我自己的博客中写入一段代码,怎么写?

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/27 23:56:07
我神情的是“中国博客”我现在想在我的“博客”里面加入能够统计同时在线人数的代码。

请问代码是什么?

<script language="vbscript" runat="server">

Sub Application_OnStart() '应用程序初始化
Application("Visitors")=0 '在线人数
Application("TotalVisitors")=0 '总访问次数
End Sub

Sub Application_OnEnd() '应用程序结束
'将Application("TotalVisitors")的值记录在一个文本文件中或保存在数据库中
End Sub

Sub Session_OnStart() '用户初始化(会话开始)
Session.TimeOut=1
Application.Lock
Application("Visitors")=Application("Visitors")+1
Application("TotalVisitors") = Application("TotalVisitors")+1
Application.UnLock
End Sub

Sub Session_OnEnd() '用户退出(会话结束)
Application.Lock
Application("Visitors")=Application("Visitors")-1
Application.UnLock
End Sub

</script>

上面这段代码名称为Global.asa

<%Response.Expires = 0%>
<HTML>
<BODY>
<p>现在有 <%=Application("visitors")%> 个在线用户!</p>
<p>现在共有 <%=Application("TotalVisitors")%> 个用户浏览过我的网站!</p>
</BODY>
</HTML>

这段代码为user.asp

上面这两段就可以实现再线人数统计
都是我自己写的 可以实现

推荐个http://count.51yes.com/index.aspx?id=272376820
申请好将代码放入模板就可以了
还有一个是专为中国博客设计的http://www.nov30th.com/vr/
同样按照步骤做就可以了
我的http://swallowtt.blogcn.com 不懂可以来问哈
希望能够帮到你