File size: 1.67Kb
<?
include "settings.inc";
header ("Content-type: text/vnd.wap.wml; charset=utf-8");
$from = $otkogo;
$from=trim($from);
$from=str_replace("|","I",$from);
if (!eregi("^([0-9a-z]([-_.]?[0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\\.[a-wyz][a-z](fo|g|l|m|mes|o|op|pa|ro|seum|t|u|v|z)?)$", $from) and $from!=="") {
print'<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card id="c1" title="'.$titleis.'" ontimer="index.php?error"><timer value="3"/>';
echo '</card></wml>';
exit;
}
$email = $komu;
$email=trim($email);
$email=str_replace("|","I",$email);
if (!eregi("^([0-9a-z]([-_.]?[0-9a-z])*@[0-9a-z]([-.]?[0-9a-z])*\\.[a-wyz][a-z](fo|g|l|m|mes|o|op|pa|ro|seum|t|u|v|z)?)$", $email) and $email!=="") {
print'<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card id="c1" title="'.$titleis.'" ontimer="index.php?error"><timer value="3"/>';
echo '</card></wml>';
exit;
}
$topic = $tema;
$topic=str_replace("|","I",$topic);
$topic=str_replace(";",",",$topic);
$message = $mesg;
$message=str_replace("|","I",$message);
$message=str_replace(";",",",$message);
$headers = "From:".$from."\r\nReply-To:".$from."\r\n";
$headers .= "MIME-Version:1.0\r\n";
$headers .= "Content-Type: text/html;";
$body .= $message."\r\n\r\n";
mail ($email, $topic, $body, $headers);
$date_today = date("m.d.y");
$today = date("H:i:s");
$ip = $_SERVER['REMOTE_ADDR'];
$sended = true;
print'<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card id="c1" title="'.$titleis.'" ontimer="index.php?sended"><timer value="3"/>';
echo '</card></wml>';
?>