File size: 2.63Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE); ///////////////
header("Content-type:text/vnd.wap.wml;charset=utf-8"); ////////
////////////// /////////////////////////////////////////////////
//$gl="ssilka_na_glavnyu"; /////////
$admin="real"; ////////
//$parad="10"; ////////
$zag="Guest book"; /////////
//////////////////////////////////////////////////////////////////////////////
$currHour=date("H",time());///////////
$currDate=date("dS F, Y", time());
$curr=date("i:s", time());
$currTime=date("$currHour:i:s", time());
if($log!=$admin){$log="";}
if($pas!=$parad) {$log="";}
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=\"real-gb\">
<onevent type=\"onenterforward\"><refresh><setvar name=\"ntext\" value=\"\"/></refresh>
</onevent><p>";
/////////////
if($log==""){print"Имя:<br/>
<input name=\"imja\" maxlength=\"20\" value=\"\"/><br/>";}
print"Текст
сообщения";
if($obr!=""){print" для $obr";}
print":<br/><input name=\"ntext\" maxlength=\"200\" value=\"\"/><br/>
Транслит:
<select name=\"trans\" title=\"trans\">
<option value=\"n\">нет</option>
<option value=\"y\">да</option>
</select><br/>
Е-мэил:<br/>
<input name=\"mail\" maxlength=\"60\" value=\"@\"/><br/>
Сайт:<br/>
<input name=\"site\" maxlength=\"60\" value=\"http://\"/><br/>
<anchor title=\"ok\">Отправить
<go href=\"add.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"imja\" value=\"$(imja)\"/>
<postfield name=\"ntext\" value=\"$(ntext)\"/>
<postfield name=\"trans\" value=\"$(trans)\"/>
<postfield name=\"mail\" value=\"$(mail)\"/>
<postfield name=\"site\" value=\"$(site)\"/>
<postfield name=\"obr\" value=\"$obr\"/>
</go>
</anchor><br/>
<anchor title=\"ok\">В гостевую
<go href=\"index.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
</go>
</anchor><br/>
";
print "
<br/>©<a href=\"http://globalwap.h2m.ru/gta\">SeT</a>
</p></card></wml>";
?>