View file wapp_antifront.com/forum/inrega.php

File size: 3.1Kb
<?
include '../config.php';
Error_Reporting(E_ALL & ~E_NOTICE);
$brayz = "$REMOTE_ADDR ";
$u1=getenv('HTTP_USER_AGENT');
$ipad=strtok($u1,'/');

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

$currHour=date("H",time());
        $currDate=date("dS F, Y", time());
        $currTime=date("$currHour:i:s", time());


header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">
<wml>
<card id=\"tes\" title=\"$zag\" ontimer=\"$mest.php?razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;nmes=$id&amp;log=$log&amp;par=$par\" >
<timer value=\"100\"/>
<p>";

$log = htmlspecialchars(stripslashes($log));
$par = htmlspecialchars(stripslashes($par));
$otkel = htmlspecialchars(stripslashes($otkel));
$infa = htmlspecialchars(stripslashes($infa));
$meil = htmlspecialchars(stripslashes($meil));
$site = htmlspecialchars(stripslashes($site));

$text="$log:||:$par:||:$otkel:||:$infa:||:$meil:||:$site:||:$currDate";
$mes = @implode("",@file("profil/$log.prof"));

if ($mes!="") {print"&#x041F;&#x043E;&#x043B;&#x044C;&#x0437;&#x043E;&#x0432;&#x0430;&#x0442;&#x0435;&#x043B;&#x044C; &#x0441; &#x0442;&#x0430;&#x043A;&#x0438;&#x043C; &#x0438;&#x043C;&#x0435;&#x043D;&#x0435;&#x043C; &#x0443;&#x0436;&#x0435; &#x0437;&#x0430;&#x0440;&#x0435;&#x0433;&#x0435;&#x0441;&#x0442;&#x0440;&#x0438;&#x0440;&#x043E;&#x0432;&#x0430;&#x043D;!";}

else {
$fp=fopen("profil/$log.prof","w");                       ///////// записываем регистрацию
fputs($fp,"$text \r\n");
fclose($fp);
chmod ("profil/$log.prof", 0777);

$text="0";
$fp=fopen("profil/$log.st","w");                       ///////// записываем регистрацию
fputs($fp,"$text \r\n");
fclose($fp);
chmod ("profil/$log.st", 0777);

$fp=fopen("profil/$log.shp","w");                       ///////// записываем регистрацию
fputs($fp,"$text \r\n");
fclose($fp);
chmod ("profil/$log.shp", 0777);

$fp=fopen("profil/$log.vps","w");                       ///////// записываем регистрацию
fputs($fp,"$text \r\n");
fclose($fp);
chmod ("profil/$log.vps", 0777);

print"
&#x0412;&#x044B; &#x0443;&#x0434;&#x0430;&#x0447;&#x043D;&#x043E; &#x0437;&#x0430;&#x0440;&#x0435;&#x0433;&#x0435;&#x0441;&#x0442;&#x0440;&#x0438;&#x0440;&#x043E;&#x0432;&#x0430;&#x043D;&#x043D;&#x044B;!<br/> &#x0412;&#x0430;&#x0448; &#x043D;&#x0438;&#x043A;: $log <br/>&#x0412;&#x0430;&#x0448; &#x043F;&#x0430;&#x0440;&#x043E;&#x043B;&#x044C;:$par<br/>
<a href=\"$mest.php?razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;nmes=$id&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/>
";}


print"
</p>

</card>
</wml>";                          ///////////////// последняя ссылка - на главную

?>