Просмотр файла catalog/catalog/dob.php

Автопокупка рекламы
Размер файла: 7.46Kb 
<?
                    //                                      //////             //                                                //                        //           //
                    //                                      //       //                          //            /////                     /////                 
                    /////    \\        //          //        //         //       //    //        //     //      //     //               //           //
                    //   //     \\     //           //          //       //    //         //      //      //     //      //////     //           // 
                    //   //       \\ //             //        //         //      //    //         //      //     //               //     //           //
                    /////         \//               //////            //         //               //      //     //     /////        //           //  
                                         //                                                                                                                                    /////
                                        //

                  ///////////////////////////      [email protected]      ///////////////////////////////                         

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

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

$gl="../";        /////////// ссылка на главную
$zag="Wapilkin Katalog";                                               /////////// Загаловок

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







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=\"$zag\">";
						///////////// выводим вмл заголовок





if ($kateg=="next"){
if($url=="") {$url="http://";}
print"<p>
&#x0410;&#x0434;&#x0440;&#x0435;&#x0441; URL <br/>
<input title=\"urls\" name=\"url\" value=\"$url\"/><br/>
&#x041D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435;<br/>
<input title=\"nazv\" name=\"naz\"  value=\"$naz\"  maxlength=\"20\"/><br/>
&#x41E;&#x43F;&#x438;&#x441;&#x430;&#x43D;&#x438;&#x435; &#x441;&#x430;&#x439;&#x442;&#x430;(max 100)<br/>
<input title=\"opis\" name=\"opis\"  value=\"$opis\" maxlength=\"100\"/><br/>
&#x41A;&#x430;&#x442;&#x435;&#x433;&#x43E;&#x440;&#x438;&#x44F; &#x441;&#x430;&#x439;&#x442;&#x430;<br/>
<select name=\"kateg\" title=\"kateg\">";

if($kat=="") {$kat = @implode("",@file("rekord/kat.dat"));}      ////////// открываем счетчик количества дерикторий, и считываем из него их количества  (если номер деректории не передан)

$n=0; 
while($n <= 15)
   {
	$text = @implode("",@file("rekord/$kat.txt"));       /////////// выводим ссылки на деректории (15 ссылок на странице)
	$text=trim($text);
	if ($text != "")  { print "<option value=\"$kat\">$text</option>"; $n=$n+1; };
	$kat=$kat-1;
	if ($kat<=0) {$n=16;};
};
if ($kat>0) {print"<option value=\"next\">&#x0414;&#x0430;&#x043B;&#x0435;&#x0435;</option>";}
print"
</select>
<br/><br/>  
<anchor title=\"Ok\">Ok
<go href=\"dob.php?dob=yes\" method=\"post\">
<postfield name=\"url\" value=\"$(url)\"/>
<postfield name=\"naz\" value=\"$(naz)\"/>
<postfield name=\"opis\" value=\"$(opis)\"/>
<postfield name=\"kateg\" value=\"$(kateg)\"/>
<postfield name=\"kat\" value=\"$(kat)\"/>
</go>
</anchor>";}

if($dob=="yes"){ if($kateg!="next"){                   //////////////////// добавляем сайт в список каталга
print"<p>";
if($url!="")  {            /////////////проверяем заполнены ли все поля
if($naz!=""){
if($opis!=""){
if($kateg!=""){

$url=trim($url);   //////////удаляем из адреса пробелы (откуда они там берутся!?)
$kateg=trim($kateg); 

$vsego = @implode("",@file("rekord/vsego.dat"));   ////////////// открываем и считываем значения общего счетчика
   $i = 0;
   while($i <= $vsego)
   {
$text = @implode("",@file("rekord/$i.af"));                                           
$text=trim($text);
if ($text==$url) {$url="reg";}
$i=$i+1;
};                             //////////////// проверяем отсутствие ригестрации сайта

if($url!="reg"){ 
////////////если заполнены все поля, и такой сайт еще не зарегестрирован, то начинаем регистрацию:


$reg="<a href=\"$url\">$naz</a><br/><small>$opis</small><br/>========<br/>"; /////////формат записи

$counterarray = file("rekord/$kateg.dat");
$id = $counterarray[0]+1;
$fp = @fopen("rekord/$kateg.dat","wb");        /////////////увеличеваем на 1 счетчик регистараций в данной категории
@fputs($fp,$id);
@fclose($fp);

$fp=fopen("rekord/$id=$kateg.dion","w");          ///////////  создаем файл с информацией о сайте                                                       
fputs($fp,"$reg \r\n");
fclose($fp);  
chmod ("rekord/$id=$kateg.dion", 0777);           
$fl=$id;

$counterarray = file("rekord/vsego.dat");
$id = $counterarray[0]+1;
$fp = @fopen("rekord/vsego.dat","wb");        /////////////увеличеваем на 1 общий счетчик регистараций 
@fputs($fp,$id);
@fclose($fp);

$fp=fopen("rekord/$id.af","w");          /////////// заносим сайт в список зарегестрированных                                                       
fputs($fp,"$url \r\n");
fclose($fp);  
chmod ("rekord/$id.af", 0777);

$fp=fopen("rekord/$fl=$kateg.daf","w");          ///////////                                                       
fputs($fp,"$id \r\n");
fclose($fp);  
chmod ("rekord/$fl=$kateg.daf", 0777);

///////////////////////////Выводим сообщение об удачной регисрации (в случае таковой):
print"&#x0421;&#x0430;&#x0439;&#x0442; $url &#x0443;&#x0434;&#x0430;&#x0447;&#x043D;&#x043E; &#x0437;&#x0430;&#x0440;&#x0435;&#x0433;&#x0438;&#x0441;&#x0442;&#x0440;&#x0438;&#x0440;&#x043E;&#x0432;&#x0430;&#x043D;";


//////// выводим сообщение об ошибках:
}else {print"&#x0421;&#x0430;&#x0439;&#x0442; &#x0441; &#x0442;&#x0430;&#x043A;&#x0438;&#x043C; &#x0430;&#x0434;&#x0440;&#x0435;&#x0441;&#x043E;&#x043C; &#x0443;&#x0436;&#x0435; &#x0437;&#x0430;&#x0440;&#x0435;&#x0433;&#x0435;&#x0441;&#x0442;&#x0440;&#x0438;&#x0440;&#x043E;&#x0432;&#x0430;&#x043D;!";}
}else {print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0432;&#x044B;&#x0431;&#x0440;&#x0430;&#x043B;&#x0438; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x044E;!";}
}else {print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0437;&#x0430;&#x043F;&#x043E;&#x043B;&#x043D;&#x0438;&#x043B;&#x0438; &#x043F;&#x043E;&#x043B;&#x0435; \"&#x041E;&#x043F;&#x0438;&#x0441;&#x0430;&#x043D;&#x0438;&#x0435; &#x0441;&#x0430;&#x0439;&#x0442;&#x0430;\"!";}
}else {print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0437;&#x0430;&#x043F;&#x043E;&#x043B;&#x043D;&#x0438;&#x043B;&#x0438; &#x043F;&#x043E;&#x043B;&#x0435; \"&#x041D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435; &#x0441;&#x0430;&#x0439;&#x0442;&#x0430;\"!";}
}else {print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0437;&#x0430;&#x043F;&#x043E;&#x043B;&#x043D;&#x0438;&#x043B;&#x0438; &#x043F;&#x043E;&#x043B;&#x0435; &#x0441; &#x0430;&#x0434;&#x0440;&#x0435;&#x0441;&#x043E;&#x043C;!";}
}}
print"<br/>
----------
<br/>
<a href=\"index.php\">&#x041A;&#x0430;&#x0442;&#x0430;&#x043B;&#x043E;&#x0433;</a><br/>
<a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>
<br/>

<br/>

<br/>
</p>";











print "</card></wml>";

?>