Просмотр файла dportal_0.2/dforum/ban.php

<?
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&amp;pas=$pas&amp;login=$login&amp;step=2&amp;ip=$value\">(del)</a> ";
if(@file("$banlist/$value")){
print"<a href=\"ban.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;step=3&amp;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&amp;pas=$pas&amp;login=$login&amp;step=4&amp;ip=$ip&amp;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\">";}
 
 print"<a href=\"index.php?ver=$ver&amp;pas=$pas&amp;login=$login\">Вернутся на форум</a><br/>";
 
 
 if($ver=="wml"){print"<a href=\"ban.php?ver=html&amp;pas=$pas&amp;login=$login\">wap 2.0</a><br/>";}
 else{print"<a href=\"ban.php?ver=wml&amp;pas=$pas&amp;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>";}



?>