$IPClient
$REMOTE_ADDR") ;
// Supprimer les vieux fichiers ip.txt
$handle1=opendir("$dossier");
while ($tmp1 = readdir($handle1))
{
if($tmp1!="." && $tmp1!=".." && $tmp1!="compteur.txt" && $tmp1!="record.txt" && (filemtime("$dossier/$tmp1")+$temporisation<$tempsactuel))
{ @unlink("$dossier/$tmp1"); }
}
closedir($handle1);
// Incrémenter le nombre total de visiteurs
$nbvisiteurs ="";
$fd2=@fopen("$dossier/compteur.txt","r+");
if(!$fd2)
{
//echo "document.write(\"Erreur fichier compteur.txt dans le dossier quiestla\");";
}
else
{
if (!file_exists($fichier))
{
$nbvisiteurs = fgets($fd2,1024);
$nbvisiteurs += 1;
rewind($fd2);
fputs($fd2,"$nbvisiteurs",1024);
}
fclose($fd2);
}
// Créer le fichier ip.txt du visiteur
$fd3=@fopen("$fichier","w");
if(!$fd3) {
//echo "document.write(\"Erreur fichier ip.txt dans le dossier quiestla\");";
}
else {fputs($fd3,""); fclose($fd3);}
// Compter le nombre de fichiers ip.txt valides
$nbfv=0;
$handle4=opendir("$dossier");
while ($tmp4 = readdir($handle4))
{
if($tmp4!="." && $tmp4!=".." && $tmp4!="compteur.txt" && $tmp4!="record.txt")
{ $nbfv++; }
}
closedir($handle4);
// Calculer le record de visiteurs simultanés
$fd5=@fopen("$dossier/record.txt","r+");
if(!$fd5) {
//echo "document.write(\"Erreur fichier record.txt dans le dossier quiestla\");";
}
else { list($nbretemp, $datetemp)=split('\|',fgets($fd5, 1024));
if($nbretemp<=$nbfv)
{ rewind($fd5);
fputs($fd5,"$nbfv|$tempsactuel",1024);
}
fclose ($fd5);
}
// Afficher les résultats
//echo "document.write(\"\");";
$nbv6 ="";
$fd6=@fopen("$dossier/compteur.txt","r");
if(!$fd6) {
//echo "document.write(\"Erreur fichier compteur.txt dans le dossier quiestla
\");";
}
else
{
$nbv6 = fgets($fd6, 1024);
$nbv6 = "00".$nbv6;
//echo "document.write(\"Nombre de visiteurs depuis le $depuis : $nbv6\");";
fclose($fd6);
}
//echo "document.write(\"
Il y a actuellement \");";
if ($nbfv<=1)
{
//echo "document.write(\"1 connecté\");";
}
else
{
//echo "document.write(\"$nbfv connectés\");";
}
//echo "document.write(\" sur $nomsite
\");";
$fd7=@fopen("$dossier/record.txt","r");
if(!$fd7) {
//echo "document.write(\"Erreur fichier record.txt dans le dossier quiestla\");";
}
else { list ($nbretemp7, $datetemp7)=split('\|',fgets($fd7, 4096));
$datefr=date("d/m/y à H:i",$datetemp7);
if ($nbretemp7<=1) {
//echo "document.write(\"Record : 1 seul visiteur le $datefr\");";
}
else {
//echo "document.write(\"Record : $nbretemp7 visiteurs simultanés le $datefr\");";
}
fclose ($fd7);
}
//echo "document.write(\"
\");";
//echo "document.write(\"
Copyright 2003 © www.unprof.com \");";
?>