Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.25;
Скачать: CL | DM;

Вниз

Вопрос по HTML?   Найти похожие ветки 

 
Calibr ©   (2007-01-30 14:23) [0]

Как можно узнать кто присутствует на сайте и вывести список присутствующих?


 
IMHO ©   (2007-01-30 14:25) [1]

это вопрос не по HTML


 
Плохиш ©   (2007-01-30 16:04) [2]


> Calibr ©   (30.01.07 14:23)  
> Как можно узнать кто присутствует на сайте и вывести список
> присутствующих?

Ответ известен - Никого.


 
санёк   (2007-01-30 16:19) [3]

<?
$ip = $REMOTE_ADDR;
$data_file = "online.txt";
$minut=3;
$new = true;
$data_ar=Array();
$temp_ar=Array();
$new_ar=Array();

$data_ar = file($data_file);

for($i=0;$i<count($data_ar);$i++){
$temp_ar = explode("|",$data_ar[$i]);
if(trim($temp_ar[1])>time()-60*$minut){
 $new_ar[count($new_ar)]=$data_ar[$i];
}
}

for($i=0;$i<count($new_ar);$i++){
$temp_ar = explode("|",$new_ar[$i]);
if($ip==$temp_ar[0]){
 $temp_ar[1] = time()."\n";
 $new_ar[$i] = implode("|",$temp_ar);
 $new = false;
}
}

if($new){
$temp_ar[0] = $ip;
$temp_ar[1] = time()."\n";
$new_ar[count($new_ar)]=implode("|",$temp_ar);
}

$online = count($new_ar);

$fp=fopen($data_file,"w+");
if(flock($fp,LOCK_EX)){
for ($i=0;$i<count($new_ar);$i++){
 fputs($fp,$new_ar[$i]);
}
}
flock($fp,LOCK_UN);
fclose($fp);

$im=ImageCreateFromPNG("online.png");
$w=ImagecolorAllocate($im,255,255,255);
$px=(imagesx($im)-5*strlen($online));
Imagestring($im,1,$px-3,3,$online,$w);
Header("Content-type: image/png");
ImagePng($im);
ImageDestroy($im);
?>


 
Megabyte ©   (2007-01-30 17:30) [4]

Сдается мне, что это PHP, а не HTML :)


 
санёк   (2007-01-30 23:53) [5]


> Сдается мне, что это PHP, а не HTML :)

Ну да. А просто на HTML не получиться!



Страницы: 1 вся ветка

Текущий архив: 2007.02.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
15-1170498917
beginner90
2007-02-03 13:35
2007.02.25
установка ZEOSDBO-6.6.0-beta


2-1170530626
Лебедев
2007-02-03 22:23
2007.02.25
memo


6-1158311999
KyRo
2006-09-15 13:19
2007.02.25
Проблема с инди фтп


15-1170369350
SerJaNT
2007-02-02 01:35
2007.02.25
Зацените!


15-1170545984
SergantSA
2007-02-04 02:39
2007.02.25
Помогите найти книгу