利用文件属性结合Session实现在线人数统计
2018-09-07 12:15
<?php
ob_start();
session_start();
$num=0;
$dirpt=online;
$reftime=1;
if (is_dir($dirpt) && $dir = opendir($dirpt)) {
while (($file = readdir($dir)) !== false) {
if(strcmp($file,..)==0 strcmp($file,.)==0){
continue;
}
$D_[date(Y-m-d H:i:s,filemtime($dirpt./.$file))]=$file;
$num++;
unset($cum);
}
closedir($dir);
$filename=session_id();
$fp=fopen($dirpt./.$filename,w);
fputs($fp,);
fclose($fp);
$ntime=date(Y-m-d H:i:s,mktime(date(H),date(i)-1,0,date(m),date(d),date(Y)));
$D_[$ntime]=-;
krsort($D_);
$onlinenumber=0;
while(1){
$vkey=key($D_);
$onlinenumber++;
if(strcmp($ntime,$vkey)==0){
break;
}else{
array_shift($D_);
}
}
array_shift($D_);
reset($D_);
while(count($D_)>0){
$ckey=key($D_);
unlink($dirpt./.$D_[$ckey]);
if(!next($D_)){
break;
}
}
}else{
@chmod(..,0777);
@mkdir($dirpt,0777);
}
$online=$onlinenumber-1;
$retime=60*$reftime;
echo 当前在线<strong><font color=red>$online</font></strong>人<meta http-equiv=refresh content=\{$retime},url=\>;
ob_end_flush();
?>
<!--
《利用文件属性结合Session进行在线人数统计》
作者：sports98
编写日期: 2003-3-19
-->