Главная страница
    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.039 c
8-1117483278
Nicolaev Oleg
2005-05-31 00:01
2005.10.23
Работа с видео


10-1105978365
Uran
2005-01-17 19:12
2005.10.23
Выгрузить страницу в отдельный файл.


14-1127899345
Fenix
2005-09-28 13:22
2005.10.23
ТЕдит


6-1120196627
Dust
2005-07-01 09:43
2005.10.23
Сколько данных читать из неблокирующего сокета?


4-1123825228
Stranger53
2005-08-12 09:40
2005.10.23
Компоненты для Com-порта





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский