Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2005.10.23;
Скачать: [xml.tar.bz2];

Вниз

Вопрос по PHP   Найти похожие ветки 

 
geidarka   (2005-09-30 20:53) [0]

Господа, помогите советом.

Есть две формы (маленькая и большая). Пользователь заполняет маленькую и переадресовывается на большую. Как сделать так, что если клиент не заполняет вторую форму в течении Х (например, 10) минут, ему автоматически высылается письмо с просьбой заполнить

Заранее спасибо


 
easy ©   (2005-10-01 00:01) [1]

<?php
Error_Reporting(E_ALL & ~E_NOTICE);

$frm_1=<<<FRM1
<form name="form1" method="post" action="">
 <strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Введите
 e-mail -></font></strong>
 <input name="mail" type="text" id="mail">
 <input name="ok" type="submit" id="ok" value="OK">
</form>
FRM1;

function is_email($mail){
return preg_match("/([\w_-]+(\.[\w_-]+)*@[\w_-]+(\.[\w_-]+)+)/",$mail);
}

function browser_back($err_str){
echo "<script language=\"JavaScript\">
alert("$err_str");
history.back();
</script>";
}

function timeout($mail){
echo "<script language=\"JavaScript\">
 setTimeout(\"t_out()\", 3000);
 function t_out(){
  location.href="?input_mail=$mail";
 }
</script>";
echo "<center><h2><font color=\"#32586D\">Место для формы 2</h2><br><small>У вас 3 секунды, чтоб заполнить её..</small></font></center>";
}
if (isset($mail)){
if(!is_email($mail)){  
  browser_back("Это не e-mail.");
  exit;
 }
timeout($mail);
exit;
}

if (isset($input_mail)){
$from="my_site_bot<admin@site.ru>";
$headers="Content-Type: text/html; charset=windows-1251\n";
$headers.="From: $from\nX-Mailer: Carline Server www.site.ru";
mail($input_mail, "From Site Bot", "<center><h2><font color=\"#32586D\">Форма не заполнена</font></center>", $headers);
echo "<center><h2><font color=\"#32586D\">Вы не успели..</h2></font></center>";
exit;
}

echo $frm_1;

?>



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2005.10.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.035 c
14-1128001591
Fl@sh
2005-09-29 17:46
2005.10.23
Streem+delphi


2-1127844684
Pasha L
2005-09-27 22:11
2005.10.23
Запуск одного ехе из другого


14-1127995312
Jeer
2005-09-29 16:01
2005.10.23
Зачем мы - им и что - они о нас:)


4-1124353939
HardTouch
2005-08-18 12:32
2005.10.23
Идентификация окон


14-1128424715
Layner
2005-10-04 15:18
2005.10.23
Как включить в трее Ru/En.. (XP/Sp2)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский