Silakan mengulang lagi.';
} elseif (($HTTP_POST_VARS['action'] == 'submitted') && ($HTTP_POST_VARS['email'] == '') || ($HTTP_POST_VARS['email'] == 'email@domain.com')) {
echo "Anda belum memasukkan email Anda.";
print '
Silakan mengulang lagi.';
} elseif (($HTTP_POST_VARS['action'] == 'submitted') && ($HTTP_POST_VARS['pesan'] == '')) {
print 'Anda belum memasukkan pesan. Silakan mengulang lagi.';
} elseif (($HTTP_POST_VARS['action'] == 'submitted') && ($_SESSION['tembung1'] != $HTTP_POST_VARS['tembung2'])) {
echo "kode yang anda tuliskan tak tepat.";
print '
Silakan mengulang lagi.';
} elseif ($HTTP_POST_VARS['action'] == 'submitted'){
$waktu =" pada ".date('r')."
";
$nama = $_POST['nama'];
$email = $_POST['email'];
$pesan = $_POST['pesan'];
$dari = "ang@desa.in";
$subjek1 = "DESA.IN - $nama ($email)";
$subjek2 = "Konfirmasi pesan dari desa.in";
$pesen1 = "perihal $select dari $nama ($email)
"."isi pesan:
"."$pesan"."
dikirim "."$waktu mengakses dari ".$_SERVER["HTTP_USER_AGENT"].$_SERVER["REMOTE_ADDR"].$_SERVER["HOMEDRIVE"]."
";
$pesen2 = "Anda atau seseorang yang mengaku bernama $nama telah menggunakan alamat e-mail ini untuk mengirim pesan di desa.in dengan isi:
$pesan".$pesan."
Kami akan mencoba menjawab secepatnya pesan Anda. Bila Anda BUKAN ".$nama.", silakan mengirim e-mail bantahan atau abaikan saja.
Terima kasih.
desa.in
(email ini dikirim secara otomatis)";
$headers = "MIME-Version: 1.0\r\n";
$headers .= "Content-type: text/html; charset=iso-8859-1\r\n";
$header2 = $headers."From: ang@desa.in \r\n";
$header1 .= $header2."Cc: ninaputi@yahoo.com\r\nCc: nina@desa.in\r\n Bcc: ang@desa.in\r\n";
mail($email, $subjek2, $pesen2, $header2);
mail("ang@desa.in", $subjek1, $pesen1, $header1);
print "Terima kasih, pesan Anda akan segera kami balas. Anda akan mendapatkan salinan pesan ini di e-mail yang Anda sertakan (".$email.") sebagai konfirmasi.";
print '
Bila ada data yang salah yang Anda masukkan, silakan mengulang lagi';
echo $header1."=".$subjek1."=".$pesen1;
} else {
$lines = file ('tembung.txt');
srand ((float)microtime()*1000000);
shuffle ($lines);
$teks = rtrim ($lines[0]);
$_SESSION['tembung1'] = $teks;
?>