ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > PHP, PERL, MySQL, JavaScript > ПО для Web разработчика
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

скрипт рассылки
  #1  
Старый 27.11.2008, 15:59
Аватар для N19hTW0lF
N19hTW0lF
Участник форума
Регистрация: 11.07.2007
Сообщений: 292
Провел на форуме:
2131521

Репутация: 512
По умолчанию скрипт рассылки

подскажыте скрипт рассылки письем.
ну подписька-)
 
Ответить с цитированием

  #2  
Старый 27.11.2008, 17:32
Аватар для heretic1990
heretic1990
Постоянный
Регистрация: 02.07.2008
Сообщений: 472
Провел на форуме:
3728999

Репутация: 444
По умолчанию

Форма
Код HTML:
<form action=subscrible.php method=post>
<b><center>Пожалуйста, введите Ваш e-mail:<input type=text size=15 name=email>
<input type=submit value="Подписаться">
</form>

это сам скрипт
subscrible.php
PHP код:
<?php

if ( isset ($id) )
{
$data File ("users.txt");

for (
$i=0;$i<count($data);$i++) {
$dat explode (":"$data[$i]);
echo 
"<center><table border=1 bgcolor=lightblue>";
echo 
"<tr><td><center>Email<td><center>Дата регистрации</tr>";
echo 
"<tr><td><center>$dat[0]<td><center>$dat[1]</tr></table><br>";
}
echo 
"<a href=\"subscrible.php\">Назад</a>";
exit;
}

if ( isset (
$text) && isset ($subject) )
{
if (
$text == "" OR $subject == "")
{
echo 
"<b><center>Не указана тема или текст подписки !";
echo 
"<p><a href=\"subscrible.php\">Назад</a>";
exit;
}

$data File ("users.txt");
for (
$i=0;$i<count($data);$i++) {
$dt explode (":"$data[$i]);
$to $dt[0];
$text $text."\r\n\r\n\r\n --";
mail ($to$subject$text);
echo 
"<center>$to -> отправлено<br>";
}
echo 
"Рассылка успешно отправлена, спасибо за использование системы";
exit;
}

if ( isset (
$login) && isset ($password))
{

if ( ! 
file_exists ("passwordad.txt") )
{
$password md5 ($password);
$fp fopen ("passwordad.txt""w");
fputs ($fp"$login:$password");
fclose ($fp);
echo 
"<b><center><i>Вход для администратора подписок<p></i>";
echo 
"Файл с паролем создан успешно !<p>";
echo 
"<form action=subscrible.php method=post>";
echo 
"<table border=0 bgcolor=lightblue>";
echo 
"<tr><td>Login<td><input type=text size=15 name=login></tr>";
echo 
"<tr><td>Password<td><input type=text size=15 name=password></tr>";
echo 
"<tr><td colspan=2><center><input type=submit value=\"ВХОД\"></tr>";
echo 
"</table>";
exit;
}

$data File ("passwordad.txt");
$dat explode (":"$data[0]);
$password md5 ("$password");
if (
$dat[0] == "$login&& $dat[1] == "$password")
{
$data File ("users.txt");
echo 
"<b><center><h2>Административная панель</h2><p>";
echo 
"Всего зарегистрировано подписчиков: ".count($data)."<p>";
echo 
"<br><a href=\"subscrible.php?id=1\">Посмотреть всех подписчиков</a><br>";
if (
count($data) == 0)
{
echo 
"<b><center>Не кому делать рассылку !";
exit;
}
echo 
"<form action=subscrible.php method=post>";
echo 
"<input type=submit value=\"Разослать подписчикам\"<p>";
echo 
"<p>Укажите тему, которая будет подставляться в письмо при отправке информации подписчикам<br>";
echo 
"<p><input type=text size=20 name=subject>";
echo 
"<p>Введите в текстовое поле текст Вашей рассылки (можно указывать html-теги)<br>";
echo 
"<textarea name=text cols=85 rows=10></textarea>";
echo 
"</form>";
exit;
}

}

if ( ! isset (
$email) && ! isset ($number) )
{
echo 
"<b><center><i>Вход для администратора подписок<p></i>";
  if ( ! 
file_exists ("passwordad.txt") )
  { echo 
"Вы входите первый раз, сейчас будет создан файл с Вашим логином и паролем"; }
echo 
"<form action=subscrible.php method=post>";
echo 
"<table border=0 bgcolor=lightblue>";
echo 
"<tr><td>Login<td><input type=text size=15 name=login></tr>";
echo 
"<tr><td>Password<td><input type=text size=15 name=password></tr>";
echo 
"<tr><td colspan=2><center><input type=submit value=\"ВХОД\"></tr>";
echo 
"</table>";
exit;
}

$data File ("usersnot.txt");

if ( isset (
$number) && isset ($email) )
{

for (
$i=0;$i<count($data);$i++) {
$dat explode (":"$data[$i]);
if ( 
$dat[0] == "$email&& $dat[1] == "$number\r\n")
{
$datemom date ("d F"time());
$fp fopen ("users.txt""a");
fputs ($fp"$email:$datemom\r\n");
fclose ($fp);
$fp fopen ("usersnot.txt","w");
for (
$f=0;$f<count($data);$f++) {
$da explode (":"$data[$f]);
if (
$da[0] == $email)
$data[$f] = trim (""); }
fputs ($fp$data[$f]."\r\n"); 
}
fclose ($fp);

echo 
"<b><center>Спасибо за регистрацию !";
exit;
}
}
echo 
"Не могу найти запись !";
exit;
}

if ( isset (
$email) )
{

$email substr ($email050);
if ( ! 
stristr ($email"@") )
{
echo 
"<b><center>Указан неверный e-mail !";
exit;
}
$data File ("users.txt");
for (
$i=0;$i<count($data);$i++) {
$dat explode (":"$data[$i]);
if (
$dat[0] == "$email")
{
echo 
"На этот адрес уже произведена подписка !";
exit;
}
}

$randomess rand(9999999910000);
$site "127.0.0.1/subscrible/subscrible.php";
$to $email;
$subject "Подтверждение подписки !";
$message "Здравствуйте\r\nНа Ваш электронный адрес $email была произведена подписка с сайта $site\r\nДля подтверждения подписки пройдите по следующей ссылке: http://$site?email=$email&number=$randomess";
mail ($to$subject$message) or print ("Не могу отправить письмо !");
$fp fopen ("usersnot.txt""a");
fputs ($fp"$email:$randomess\r\n");
fclose ($fp);
}

?>
и два пустых файла usersnot.txt и users.txt

Для входа в административную панель, необходимо в браузере загрузить subscrible.php
Если это первый вход, вам будет предложено создать файл с паролем и логином, пароль шифруется внутренним алгоритмом php md5, что исключает возможность расшифровки.

P.S. вроде я его уже гдето выкладывал)
 
Ответить с цитированием

  #3  
Старый 28.11.2008, 17:23
Аватар для N19hTW0lF
N19hTW0lF
Участник форума
Регистрация: 11.07.2007
Сообщений: 292
Провел на форуме:
2131521

Репутация: 512
По умолчанию

не работает твой скрипт почему то ! не создает файл админа.
 
Ответить с цитированием

  #4  
Старый 28.11.2008, 20:35
Аватар для heretic1990
heretic1990
Постоянный
Регистрация: 02.07.2008
Сообщений: 472
Провел на форуме:
3728999

Репутация: 444
По умолчанию

а ты вот эту строку изменил?
$site = "127.0.0.1/subscrible/subscrible.php";
п.с. у меня всё работает!!!
 
Ответить с цитированием

  #5  
Старый 28.11.2008, 21:05
Аватар для N19hTW0lF
N19hTW0lF
Участник форума
Регистрация: 11.07.2007
Сообщений: 292
Провел на форуме:
2131521

Репутация: 512
По умолчанию

да изменил , никакой рекации
 
Ответить с цитированием

  #6  
Старый 28.11.2008, 21:06
Аватар для N19hTW0lF
N19hTW0lF
Участник форума
Регистрация: 11.07.2007
Сообщений: 292
Провел на форуме:
2131521

Репутация: 512
По умолчанию

я даю данные все равно
Цитата:
Вы входите первый раз, сейчас будет создан файл с Вашим логином и паролем
 
Ответить с цитированием

  #7  
Старый 29.11.2008, 17:26
Аватар для heretic1990
heretic1990
Постоянный
Регистрация: 02.07.2008
Сообщений: 472
Провел на форуме:
3728999

Репутация: 444
По умолчанию

я не знаю в чём продлема,(( у меня всё работает
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите влить скрипт на сервак ... Sting Чаты 15 21.12.2006 22:39
Скрипт шпион Melkiy АнтиАдмин 7 17.06.2005 12:27
Как безопасно запустить скрипт с локали, чтобы не запалили..? BNF Болталка 1 19.05.2005 02:53
Скрипт подставления кук на Php. (готовое решение) chin PHP, PERL, MySQL, JavaScript 7 06.05.2005 04:04
Что ломать? Almight Чаты 3 09.02.2004 18:48



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ