Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.23;
Скачать: CL | DM;

Вниз

Вопрос по 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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
2-1127549052
oSa
2005-09-24 12:04
2005.10.23
Ошибка при создании конструктора


5-1104132825
prosoft
2004-12-27 10:33
2005.10.23
IDE Wizard


3-1126528462
Monk
2005-09-12 16:34
2005.10.23
Передача результатов SQL-запроса в программу


14-1128106554
Pazitron_Brain
2005-09-30 22:55
2005.10.23
Спутник+LAN+Интернет=Всем интернет.


4-1124286067
Anatoly
2005-08-17 17:41
2005.10.23
Функции BitBtl, StretchBLT дают пустую страницу на принтере