<?php header("Content-type: text/vnd.wap.wml");
header("Cache-Control: no-store, no-cache, must-revalidate");
print"
<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\"" . " \"http://www.wapforum.org/DTD/wml_1.1.xml\"> <wml>
<card id=\"index\" title=\"E-mail man\">"; $linija = "=----------=<br/>"; $id = $_GET["id"]; if(empty($id)) { echo "<p align=\"center\">Tavo E-Mail:<br/><input name=\"mail\" value=\"@.\" maxlength=\"30\"/><br/>E-Mail Tema:<br/><input name=\"tema\" maxlength=\"30\"/><br/>Tavo Žinutė:<br/><input name=\"zinute\" maxlength=\"250\"/><br/><anchor>Siųsti E-Mail!<go href=\"$PHP_SELF?id=2\" method=\"post\"><postfield name=\"mail\" value=\"$(mail)\"/><postfield name=\"tema\" value=\"$(tema)\"/><postfield name=\"zinute\" value=\"$(zinute)\"/></go></anchor><br/>"; } if($id == "2") { $tikrina=explode("@",$mail); $a=true; if(!checkdnsrr($tikrina[1])) { $a=false; $bug[]="Neteisingas E-Mail!"; } if(empty($tema)) { $a=false; $bug[]="Nėra Temos!"; } if(empty($zinute)) { $a=false;$bug[]="Nėra Žinutės!"; } if(!$a) { echo "<p align=\"center\"><b>Klaidos:</b><br/>$linija</p>"; for($i=0; $i<count($bug); $i++) { print"<p><b>*</b> $bug[$i]</p>"; } echo "<p align=\"center\">"; } if($a) { mail("[email protected]","$tema","$zinute","From: $mail"); echo "</p><onevent type=\"ontimer\"><go href=\"index.php\"/></onevent><timer value=\"5\"/><p align=\"center\"><b>E-mail'as sėkmingai išsiųstas!</b><br/>"; } } echo "$linija<a href=\"index.php\">[-Atgal į saitą-]</a> </p></card></wml>"; ?>
---
[^] Atgal
[«] Skaitykla
© xneox.com