View file wapp_antifront.com/forum/otpr.php

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

//////////////////////////////////////////////////////////////////////////
$gl="$homepage";                                               /////////// ссылка на главную
$zag="&#x0424;&#x043E;&#x0440;&#x0443;&#x043C;";               /////////// Загаловок
//////////////////////////////////////////////////////////////////////////


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

$text = @file("profil/$log.prof");
if ($text!=""){
$udata = explode(":||:",$text[0]);
$provpar=trim($udata[1]);}

if($par!=$provpar) {$log="";}


if($log=="") {print"&#x0412;&#x0430;&#x0448;&#x0435; &#x0438;&#x043C;&#x044F;:<br/><input name=\"name\" value=\"$k\"/><br/>";}
print"&#x0421;&#x043E;&#x043E;&#x0431;&#x0449;&#x0435;&#x043D;&#x0438;&#x0435; &#x0434;&#x043B;&#x044F; $uz:<br/><input name=\"mess\" value=\"$k\"/><br/>
&#x0422;&#x0440;&#x0430;&#x043D;&#x0441;&#x043B;&#x0438;&#x0442;:<select name=\"tr\" title=\"tr\">
<option value=\"1\">&#x041D;&#x0435;&#x0442;</option>
<option value=\"5\">&#x0414;&#x0430;</option>
</select><br/>

<anchor title=\"ok\">&#x041E;&#x0442;&#x043F;&#x0440;&#x0430;&#x0432;&#x0438;&#x0442;&#x044C;
<go href=\"addpr.php?razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;log=$log&amp;par=$par&amp;uz=$uz&amp;mest=$mest&amp;nmes=$nmes\" method=\"post\">
<postfield name=\"name\" value=\"$(name)\"/>
<postfield name=\"mess\" value=\"$(mess)\"/>
<postfield name=\"tr\" value=\"$(tr)\"/>
</go>
</anchor>";



print "<br/>__________<br/>";
if($log!="") {print"<a href=\"profil.php?mest=mes&amp;razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;nmes=$nmes&amp;log=$log&amp;par=$par\">[$log]</a>";} else {print"<a href=\"vxod.php?mest=otvet&amp;razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;nmes=$nmes\">[&#x0412;&#x043E;&#x0439;&#x0442;&#x0438;]</a>";}
print"<br/>__________<br/><a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>";



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

?>