File size: 571B
<?
if($statys=="admin" || $forst=="moder"){
$h=0;
while($h<=$kme){
$text=@file("$rek/$nr.rum");
$tndm[$h]=$text[$h];
$pruz=explode(":||:",$text[$h]);
$prduz=trim($pruz[1]);
if($prduz==$obr){$tndm[$h]="";}
$h=$h+1;
}
$fp=@fopen("$rek/$nr.rum","w");
@fputs($fp,"");
@fclose($fp);
@chmod ("$rek/$nr.rum", 0777);
$h=0;
while($h<=$kme){
if($tndm[$h]!=""){
$fp=@fopen("$rek/$nr.rum","a");
@fputs($fp,"$tndm[$h]");
@fclose($fp);}
$h=$h+1;}
print"<b>!Выполнено!</b><br/>";
}
?>