alexei
ibhacker | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору MVY Значит разблокировали, он был забанен неизвестно за что Теперь, как и обещал, хак по сабжу. Открой ikonboard.cgi и найди вот этот код Код: $cleanlastregistered = $lastregisteredmember; $cleanlastregistered =~ y/ /_/; $lastregisteredmember = substr($lastregisteredmember,0,20) if length $lastregisteredmember > 19; $cleanlastregistered = qq~<a href="$profileprog?action=show&member=$cleanlastregistered">$lastregisteredmember</a>~; | После него добавь вот этот код Код: ######Chat stats addon begin $chatdatadir = 'D:/Server437/Web/Sites/ib219ru/mycgi/data'; $chaturl = 'http://ib2ru/chat'; $filetoopen = "$chatdatadir/files/online.txt"; $filetoopen = &stripMETA($filetoopen); open(FILE, "$filetoopen") or die "$ibtxt{'5012'}"; flock FILE,1; @chatusers = <FILE>; close(FILE); $totalchatusers = @chatusers; foreach $user (@chatusers) { ($trash, $ip, $username, $trash) = split(/\|/,$user); $userslist .= "$username, " } $chatinfo = qq~<font face="$font" color=$fontcolormisc size=$dfontsize2>Сейчас в <a href=$chaturl>чате</a>: $userslist<br> всего $totalchatusers пользователя(ей)~; ######Chat stats addon end | $chatdatadir - это путь к папке data чата, только не ставь / на конце $chaturl - url чата, думаю понятно Теперь статистика чата в переменной $chatinfo, запихни ее куда нибудь, я всунул ее сюда(выделена): Код: $boardname $ibtxt{'0001'} $cleanlastregistered<br> $boardname $ibtxt{'0002'} <b>$totalmembers</b> $ibtxt{'0003'} <b>$totalposts</b> $ibtxt{'0004'} <b>$totalthreads</b> $ibtxt{'0024'} <br>$chatinfo</td> | Вот и все. | Всего записей: 647 | Зарегистр. 06-07-2001 | Отправлено: 17:03 03-04-2002 | Исправлено: alexei, 17:22 03-04-2002 |
|