Размер файла: 955B
<?php
############################################
### Этот скрипт написан для Wap-Motor 18 ###
###Автор скрипта Dred#######################
###ICQ: 757041##############################
###Сайт: http://nmn.webhop.net##############
###Желающие могут подкинуть деньжат#########
###Z840880492902############################
###R852036927651############################
############################################
$dir = opendir(BASEDIR."local/profil/");while ($file = readdir ($dir)) {if (( $file != ".") && ($file != "..") && ($file != ".htaccess") && ($file != "index.php")){$a[]=$file;}}closedir ($dir);$total = count($a);for ($i = 0; $i < $total; $i++){$sopli = count($a[$i]);$texv = @file(BASEDIR."local/profil/$a[$i]");$datav = explode(":||:",$texv[0]);if (!$datav[38]=="" || !$datav[38]=="0"){$dk[]=$datav[37];}}$slv = count($dk);echo'(<b><font color="red">'.$slv.'</font></b>)<br>';?>