View file wapp_antifront.com/chat/sfoto.php

<?


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

include 'dan.php';
include 'uzdan.php';




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=\"&#x0424;&#x043E;&#x0442;&#x043E;\"><p align=\"center\">";
                                                        ///////////// выводим вмл заголовок
if($login != ""){


$ss = @file("$foto/$obr.foto");
$strok = sizeof($ss);
$strok=$strok-1;
if($ts==""){$ts=0;}
$arra=@file("$foto/$obr.foto");

while($ts<=$strok & $kp<4){
$arme=@explode(":||:",$arra[$ts]);
$nara=trim($arme[1]);
$nora=trim($arme[0]);
if($nora!=""){
print"

<img src=\"pfoto.php?f=$nara\" alt=\"&#x0444;&#x043E;&#x0442;&#x043E; $nora\"/><br/>
<a href=\"$nara\">&#x0421;&#x043C;&#x043E;&#x0442;&#x0440;&#x0435;&#x0442;&#x044C;</a><br/><br/>

";
$kp=$kp+1;}
$ts=$ts+1;
}

if($ts<$strok){print"<br/><anchor title=\"next\">&#x0421;&#x043C;&#x043E;&#x0442;&#x0440;&#x0435;&#x0442;&#x044C; &#x0434;&#x0430;&#x043B;&#x0435;&#x0435;
<go href=\"sfoto.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"ts\" value=\"$ts\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";}

}

print "<anchor title=\"ok\">&#x0412; &#x0447;&#x0430;&#x0442;
<go href=\"chat.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor>
<br/><br/><a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>
</p></card></wml>";

?>