Размер файла: 2.52Kb
<?
include 'dan.php';
/*
by Dionisij (c) 2006
[email protected]
Скрипт не предназначен для продажи!
При распространении необходимо обговорить условия распространения с автором скрипта.
Нарушение авторских прав преследуется по закону и по понятиям!
*/
include 'ver.php';
$zag="Опции";
if($ver=="wml"){include 'wapzag.php';} else{include 'webzag.php';}
include'avt.php';
if($login!="" & $status=="moder"){
if ($step==""){
$dir = @opendir ("$banlist");
while ( $file = @readdir ($dir)){
if ( $file != "."& $file != ".."){
$argroup[]=$file;
}}
if($argroup){
foreach( $argroup as $key => $value){
print"<a href=\"ban.php?ver=$ver&pas=$pas&login=$login&step=2&ip=$value\">(del)</a> ";
if(@file("$banlist/$value")){
print"<a href=\"ban.php?ver=$ver&pas=$pas&login=$login&step=3&ip=$value\">$value</a><br/> ";}
else{print"$value<br/>";}
}
} else {print"Банлист пуст";}
}
if($step==2){
if($ip!=""){
@unlink ("$banlist/$ip");
print"Выполнено";
} else {print"Ненайдено";}
}
if($step==3){
print"Кликните для снятия бана:<br/>";
$arbanlist=@file("$banlist/$ip");
if($arbanlist){foreach($arbanlist as $key => $value){
$value=trim($value);
if($value!=""){
print"<a href=\"ban.php?ver=$ver&pas=$pas&login=$login&step=4&ip=$ip&soft=$key\">$value</a><br/>";
}
}
}
}
if($step==4){
$arbanlist=@file("$banlist/$ip");
$arbanlist[$soft]="";
$fp=@fopen("$banlist/$ip","w");
foreach($arbanlist as $key => $value){
if ($value!=""){@fputs($fp,$value);}
}
@fclose($fp);
@chmod("$banlist/$ip",0777);
print"Удален";
}
} else {print"Для просмотра этого раздела необходима авторизация и права модератора!";}
print"</p><p align=\"center\">";
if($ver=="html"){print"<table style=\"text-align: center; width: 98%;\"
border=\"1\" cellpadding=\"2\" cellspacing=\"2\">
<tbody>
<tr>
<td
style=\"background-color: rgb($color2);\" align=\"center\"
valign=\"top\">";}
if($ver=="wml"){print"<a href=\"ban.php?ver=html&pas=$pas&login=$login\">wap 2.0</a><br/>";}
else{print"<a href=\"ban.php?ver=wml&pas=$pas&login=$login\">wap 1.2</a><br/>";}
print"<a href=\"$gen_link\">На главную</a>";
if($ver=="html"){print"</td>
</tr>
</tbody>
</table>
</body>
</html>
";}
else{print"</p></card></wml>";}
?>