View file wapp_antifront.com/chat/gfoto.php

<?

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

include 'dan.php';

include 'kto.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=\"&#x0413;&#x0430;&#x043B;&#x0435;&#x0440;&#x0435;&#x044F;\"><p align=\"left\">";
                                                        ///////////// выводим вмл заголовок

if($npo==""){$npo=0;}
$kp=0;
$ntf=0;
 $dir = opendir ("$foto");
  while ( $file = readdir ($dir) )
  {
    if (( $file != ".") && ($file != ".."))
    {
$pv=strrpos($file, ".");
$uzers=  substr($file, 0, $pv);
$ntf=$ntf+1;

if($uzers!="" &  $kp<10 & $npo<$ntf){
      print "
<anchor title=\"open\">$uzers
<go href=\"sgfoto.php\" method=\"post\">
<postfield name=\"file\" value=\"$file\"/>
</go></anchor><br/>";
$kp=$kp+1;}

}  }
  closedir ($dir);
$npo=$npo+10;

if($kp>=10){print"<br/><anchor title=\"spisok\">&#x0414;&#x0430;&#x043B;&#x0435;&#x0435;
<go href=\"gfoto.php\" method=\"post\">
<postfield name=\"npo\" value=\"$npo\"/>
</go></anchor><br/>";}


print "<br/><a href=\"index.php\">&#x0412;&#x0445;&#x043E;&#x0434; &#x0432; &#x0447;&#x0430;&#x0442;</a>

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

?>