网站总的访问统计

[Flash+ASP] 1.在第1帧中插入动态文本，并命名变量名为：count

2.新建一fla文件，在第2帧中插入关键帧，添加以下代码：

this.loadVariables("count.txt?num="+random(999));

这行代码是将count.txt文件load进flash里，待flash调用count.txt里的数据（就是访问的人数） 3.在第40帧中插入关键帧，添加以下代码：

gotoAndPlay(2);

回放到第2帧
4.在第1帧中插入关键帧，添加以下代码：

this.loadVariables("counter.asp?num="+random(99));

读取asp文件counter.asp,实现访问人数加1

5.asp文件代码如下：

<%
Option Explicit
dim path
’----读写文本文件内容函数
function counter(path)
dim fs,file_names,index_s,out
Set fs = CreateObject("Scripting.FileSystemObject")
Set file_names = fs.OpenTextFile(path)
index_s=file_names.readline
index_s=index_s+1
file_names.close

Set out=fs.CreateTextFile(path)
out.WriteLine(index_s)
out.close
set fs=nothing
end function
path=server.mappath("count.txt")
call counter(path)
%>附源文件：
点击浏览该文件 [flash+PHP] 1.在第1帧中插入动态文本，并命名变量名为：count

2.新建一fla文件，在第2帧中插入关键帧，添加以下代码：

this.loadVariables("count.txt?num="+random(999));

这行代码是将count.txt文件load进flash里，待flash调用count.txt里的数据（就是访问的人数） 3.在第40帧中插入关键帧，添加以下代码：

gotoAndPlay(2);

回放到第2帧
4.在第1帧中插入关键帧，添加以下代码：

this.loadVariables("counter.php?num="+random(99));

读取php文件counter.php,实现访问人数加1

5.php文件代码如下：

$count = file_get_contents("count.txt");
$count = explode("=", $count);
$count[1] = $count[1]+1;
$file = fopen("count.txt", "w+");
fwrite($file, "count=".$count[1]);
fclose($file);
print "count=".$count[1];
?>

附源文件： 点击浏览该文件 关键词：统计 网站

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!