Просмотр архива GOWAP Каталог


<?



                   

Error_Reporting(E_ALL & ~E_NOTICE);          /////////////// игнорируем ошибки

header("Content-type:text/vnd.wap.wml;charset=utf-8");      //////// тип и кодировка документа

print "<?xml version="1.0" encoding="utf-8"?>

    <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml12.dtd">

    <wml><card id="mas" title="GOWAP"><p>";

                            ///////////// выводим вмл заголовок

//////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////

                            //

$parol="1234gowapcatalog";              ///////// измените parol на свой пароль!!!//

                            //

//////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////



if($par!=$parol){print"&#x0412;&#x0435;&#x0434;&#x0438;&#x0442;&#x0435; &#x043F;&#x0430;&#x0440;&#x043E;&#x043B;&#x044C;:<br/>



<input title="par" name="par" value=""/><br/>

<anchor title="Ok">&#x0415;&#x0441;&#x0442;&#x044C;

<go href="admin.php" method="post">

<postfield name="par" value="$(par)"/>

</go>

</anchor>

";}

if($par==$parol){

if ($dob!="da"){

print"&#x0412;&#x0432;&#x0435;&#x0434;&#x0438;&#x0442;&#x0435; &#x043D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435; &#x043D;&#x043E;&#x0432;&#x043E;&#x0439; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438;:

<br/>

<input title="kategor" name="kategor" value=""/><br/>

<anchor title="Ok">&#x0415;&#x0441;&#x0442;&#x044C;

<go href="dobkat.php?par=$par&amp;dob=da" method="post">

<postfield name="kategor" value="$(kategor)"/>

</go>

</anchor>

";}



if($dob=="da"){

if($kategor!=""){

$kategor=trim($kategor);

$kat = @implode("",@file("rekord/kat.dat"));



 $i = 0;

   while($i <= $kat)

   {

$text = @implode("",@file("rekord/$i.txt"));                                           

$text=trim($text);

if ($text==$kategor) {$kategor="reg";}

$i=$i+1;

};                             //////////////// проверяем отсутствие такой категории

if($kategor!="reg"){

$counterarray = file("rekord/kat.dat");

$id = $counterarray[0]+1;

$fp = @fopen("rekord/kat.dat","wb");        /////////////увеличеваем на 1 счетчик категорий

@fputs($fp,$id);

@fclose($fp);



$fp=fopen("rekord/$id.txt","w");          ///////////  создаем файл с именем деректории о категории                                                       

fputs($fp,"$kategor rn");

fclose($fp);  

chmod ("rekord/$id.txt", 0777);          

$nol=0;

$fp=fopen("rekord/$id.dat","w");          ///////////  создаем счетчик категории                                                      

fputs($fp,"$nol rn");

fclose($fp);  

chmod ("rekord/$id.dat", 0777);          





print"&#x041A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x044F; $kategor &#x0443;&#x0441;&#x043F;&#x0435;&#x0448;&#x043D;&#x043E; &#x0434;&#x043E;&#x0431;&#x0430;&#x0432;&#x043B;&#x0435;&#x043D;&#x043D;&#x0430;";



}



////// сообщения об ошибках:

else{print"&#x0422;&#x0430;&#x043A;&#x0430;&#x044F; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x044F; &#x0443;&#x0436;&#x0435; &#x0441;&#x0443;&#x0449;&#x0435;&#x0441;&#x0442;&#x0432;&#x0443;&#x0435;&#x0442;!";}

}else{print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0432;&#x0432;&#x0435;&#x043B;&#x0438; &#x043D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438;";}

}









}print "<br/><a href="admin.php?par=$par">&#x0410;&#x0434;&#x043C;&#x0438;&#x043D;-&#x043F;&#x0430;&#x043D;&#x0435;&#x043B;&#x044C;</a><br/></p></card></wml>";



?>