幸运的鱼

Welcome To Lucky Fish Home

正文

访问统计代码—记录访问人数

鱼在这里给大家提供下统计访问人数的代码,一般博客里面都是呆这种统计总人数访问的,但是网站上面好多都没有,这就需要你去加上代码才能实现了,我给大家两样统计代码,一个是正确的,第二个知识可以单独记录一个IP的访问记录,比如你用一个访问,它有好几个记录了,但是你换一台电脑它又提示你是第一位了,呵呵,所以第二个代码可以逗逗人家玩的!好了,下面看下访问人数的统计代码吧!

下面是asp的源码!看下吧!这个是正确统计访问总人数的哦


1、在网站目录下新建一个文本:txtcounter.txt 然后在文本填写1就可以了!

2、新建一asp文件:count.asp,然后加入以下代码:

<%
CountFile=Server.MapPath("txtcounter.txt")
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set Out=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE)
counter=Out.ReadLine
Out.Close
SET FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE)
Application.lock
counter= counter + 1
Out.WriteLine(counter)
Application.unlock
Response.Write"document.write("&counter&")"
'为了在页面正确显示计数器的值,调用VBScript函数Document.write
Out.Close
%>

3、在需要统计的网页加入:总访问<script language="JavaScript" src="count.asp">次


 如过还有哪些地方没有明白可以留言给我!看下下面只记录一个IP统计的代码吧!呵呵!把代码复制到框子里面运行就可以了!

<SCRIPT language=JavaScript>
var caution = false
function setCookie(name, value, expires, path, domain, secure) {
        var curCookie = name + "=" + escape(value) +
                ((expires) ? "; expires=" + expires.toGMTString() : "") +
                ((path) ? "; path=" + path : "") +
                ((domain) ? "; domain=" + domain : "") +
                ((secure) ? "; secure" : "")
        if (!caution || (name + "=" + escape(value)).length <= 4000)
                document.cookie = curCookie
        else
                if (confirm("Cookie exceeds 4KB and will be cut!"))
                        document.cookie = curCookie
}
function getCookie(name) {
        var prefix = name + "="
        var cookieStartIndex = document.cookie.indexOf(prefix)
        if (cookieStartIndex == -1)
                return null
        var cookieEndIndex = document.cookie.indexOf(";", cookieStartIndex + prefix.length)
        if (cookieEndIndex == -1)
                cookieEndIndex = document.cookie.length
        return unescape(document.cookie.substring(cookieStartIndex + prefix.length, cookieEndIndex))
}
function deleteCookie(name, path, domain) {
        if (getCookie(name)) {
                document.cookie = name + "=" +
                ((path) ? "; path=" + path : "") +
                ((domain) ? "; domain=" + domain : "") +
                "; expires=Thu, 01-Jan-70 00:00:01 GMT"
        }
}
function fixDate(date) {
        var base = new Date(0)
        var skew = base.getTime()
        if (skew > 0)
                date.setTime(date.getTime() - skew)
}
var now = new Date()
fixDate(now)
now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000)
var visits = getCookie("counter")
if (!visits)
        visits = 1
else
        visits = parseInt(visits) + 1
setCookie("counter", visits, now)
document.write("幸运的鱼欢迎您,您是第" + visits + "位访问者!")
</SCRIPT>  



0分/0个投票

前一篇: Html网页字体颜色代码大全
后一篇: 禁止鼠标右键使用,屏蔽鼠标右键代码

评论

  • 1.排长 (2008-4-16 17:03:55)  引用
  • vb [EMAIL=@]

发表

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

博主

  • 姓名:幸运的鱼(Bboy鱼)
  • 年龄:1989年二月七日
  • 地址:河北省秦皇岛市
  • 爱好:计算机 街舞 CS
  • 鱼QQ:23965855  留言给我

赞助商广告

最近发表