View file forum2/forum/profil.php

File size: 3.93Kb
<?

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

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





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

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

$gl="http://da1.hoha.ru/index.wml";        /////////// ссылка на главную
$zag="Dionisij";                                               /////////// Загаловок

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




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


$text = @file("profil/$log.prof"); 
if ($text!=""){
$udata = explode(":||:",$text[0]);
$provpar=trim($udata[1]);
$otkel=trim($udata[2]);
$osebe=trim($udata[3]);
$mail=trim($udata[4]);
$site=trim($udata[5]);
$kmes = @implode("",@file("profil/$log.st"));  
if ($par==$provpar){print"
&#x041F;&#x0430;&#x0440;&#x043E;&#x043B;&#x044C;:<br/><input name=\"npar\" value=\"$par\"/><br/>
&#x041E;&#x0442;&#x043A;&#x0443;&#x0434;&#x0430;:<br/><input name=\"otkel\" value=\"$otkel\"/><br/>
&#x041E; &#x0441;&#x0435;&#x0431;&#x0435;:<br/><input name=\"infa\" value=\"$osebe\"/><br/>
&#x0415;-&#x043C;&#x044D;&#x0438;&#x043B;:<br/><input name=\"meil\" value=\"$mail\"/><br/>
&#x0421;&#x0430;&#x0439;&#x0442;:<br/><input name=\"site\" value=\"$site\"/><br/>
<anchor title=\"ok\">&#x041F;&#x0440;&#x0438;&#x043C;&#x0435;&#x043D;&#x0438;&#x0442;&#x044C;
<go href=\"inprof.php?razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;mest=$mest&amp;log=$log&amp;par=$par\" method=\"post\">
<postfield name=\"npar\" value=\"$(npar)\"/>
<postfield name=\"otkel\" value=\"$(otkel)\"/>
<postfield name=\"infa\" value=\"$(infa)\"/>
<postfield name=\"meil\" value=\"$(meil)\"/>
<postfield name=\"site\" value=\"$(site)\"/>
</go>
</anchor><br/>";

} 
else {print"&#x041D;&#x0435;&#x043F;&#x0440;&#x0430;&#x0432;&#x0438;&#x043B;&#x044C;&#x043D;&#x044B;&#x0439; &#x043F;&#x0430;&#x0440;&#x043B;&#x044C;!<br/>";}}

else {print"&#x041F;&#x043E;&#x043B;&#x044C;&#x0437;&#x043E;&#x0432;&#x0430;&#x0442;&#x0435;&#x043B;&#x044C; $uz &#x043D;&#x0435; &#x0437;&#x0430;&#x0440;&#x0435;&#x0433;&#x0435;&#x0441;&#x0442;&#x0440;&#x0438;&#x0440;&#x043E;&#x0432;&#x0430;&#x043D;<br/>";}


print "________<br/><a href=\"$mest.php?razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;nmes=$nmes&amp;log=$log&amp;par=$par\">&#x0424;&#x043E;&#x0440;&#x0443;&#x043C;</a><br/>
<a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>
 </p></card></wml>";

?>