Просмотр файла kniga/index.php

<?

                    //                                      //////             //                                                //                        //           //
                    //                                      //       //                          //            /////                     /////                 
                    /////    \\        //          //        //         //       //    //        //     //      //     //               //           //
                    //   //     \\     //           //          //       //    //         //      //      //     //      //////     //           // 
                    //   //       \\ //             //        //         //      //    //         //      //     //               //     //           //
                    /////         \//               //////            //         //               //      //     //     /////        //           //  
                                         //                                                                                                                                    /////
                                        //

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



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

////////////// Параметры книги /////////////////////////////////////////////////

$gl="ssilka_na_glavnyu";     /////////ссылка на главную
$admin="Admin";                   ////////админ
$parad="admin";                    ////////пароль админа
$zag="Guest book";
//////////////////////////////////////////////////////////////////////////////






$currHour=date("H",time());///////////формат даты и времени
$currDate=date("dS F, Y", time());
$curr=date("i:s", time());
$currTime=date("$currHour:i:s", time());

if($parad!=$pas) {$log="";}


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\"><p align=\"center\">";
							///////////// выводим вмл заголовок
print"<b>$currTime</b><br/><small>$currDate</small></p><p>

<anchor title=\"say\">&#x041D;&#x0430;&#x043F;&#x0438;&#x0441;&#x0430;&#x0442;&#x044C;
	<go href=\"say.php\" method=\"post\">
	<postfield name=\"log\" value=\"$log\"/>
	<postfield name=\"pas\" value=\"$pas\"/>
	</go>
	</anchor><br/>

	<anchor title=\"ref\">&#x041E;&#x0431;&#x043D;&#x043E;&#x0432;&#x0438;&#x0442;&#x044C;
	<go href=\"index.php\" method=\"post\">
	<postfield name=\"log\" value=\"$log\"/>
	<postfield name=\"pas\" value=\"$pas\"/>
	<postfield name=\"new\" value=\"$curr\"/>
	</go>
	</anchor><br/>=======<br/>";


$vsego = file("vsego.shet");
$vsego=$vsego[0];
if($nmes=="") {$nmes=$vsego;}
$kp=1;

while($kp <= 5)
	{$tex=@file("zapis/$nmes.mess");
	$utex=explode(":||:",$tex[0]);
	$obr=trim($utex[0]);	
	$vrem=trim($utex[1]);
	$text=trim($utex[2]);
	$mail=trim($utex[3]);	
	$site=trim($utex[4]);
	$brayz=trim($utex[5]);
	if($text!=""){
		if($log==$admin){print"<small><anchor title=\"del\">[&#x0423;&#x0434;&#x0430;&#x043B;&#x0438;&#x0442;&#x044C; &#x0441;&#x043E;&#x043E;&#x0431;&#x0449;&#x0435;&#x043D;&#x0438;&#x0435;]
		<go href=\"del.php\" method=\"post\">
		<postfield name=\"log\" value=\"$log\"/>
		<postfield name=\"pas\" value=\"$pas\"/>	
		<postfield name=\"nmes\" value=\"$nmes\"/>
		</go>
		</anchor></small><br/>";}
		print"<b><anchor title=\"say\">$obr
		<go href=\"say.php\" method=\"post\">
		<postfield name=\"log\" value=\"$log\"/>
		<postfield name=\"pas\" value=\"$pas\"/>	
		<postfield name=\"obr\" value=\"$obr\"/>
		</go>
		</anchor></b>
	<small>($vrem)</small>: $text";
	if($mail!=""){print"<br/>e-mail: <a href=\"mailto:$mail\">$mail</a>";}
	if($site!="") {print"<br/><a href=\"$site\">$site</a>";}
	print"<br/><small>[$brayz]</small><br/>=======<br/>";
	$kp=$kp+1;}
	$nmes=$nmes-1;
	if($nmes<0){$kp=20;}}


if($nmes>0){print"<br/><anchor title=\"next\">&#x0414;&#x0430;&#x043B;&#x0435;&#x0435;
	<go href=\"index.php?nmes=$nmes\" method=\"post\">
	<postfield name=\"log\" value=\"$log\"/>
	<postfield name=\"pas\" value=\"$pas\"/>
	</go>
	</anchor>";}


print"<br/><anchor title=\"say\">&#x041D;&#x0430;&#x043F;&#x0438;&#x0441;&#x0430;&#x0442;&#x044C;
	<go href=\"say.php\" method=\"post\">
	<postfield name=\"log\" value=\"$log\"/>
	<postfield name=\"pas\" value=\"$pas\"/>
	</go>
	</anchor><br/>";






print"<br/><a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>
</p></card></wml>";

?>