Бесплатный скрипт рассылки

Lunoxod · 1 Фев 2008

бесплатный но эффективный скрипт рассылки нужен тока php

Для просмотра скрытого содержимого вы должны войти или зарегистрироваться.

abrvalkin · 5 Фев 2008

Да скрипт работает, отлько не могу разобраться как нормальные русские сообщения писать. Люди человеки подскажите пожалуйста!!!

Добавлено через 5 минут
от ведь почитати нада))) Всё разобрался!
Нада найти строчку с charset и заменить на charset=windows-1251
и ещё находим $header .= "Content-Type: text/ и заменяем на $header .= "Content-Type: text/$contenttype; charset=windows-1251 \r\n";

Добавлено через 24 минуты
Попробовал себе отправить 500 сообщений. В результате мэил агент чуть не загнулся

В ходе испытаний нашёл ещё один недочёт. Хост на котором висит скрипт может подписать такую дрянь типа 9D71116C5787@robots-s6.in-solve.hidden

это можно исправить . После строчки $header .= "Content-Type: text/$contenttype\r\n"; надо добавить $header .= "Message-ID: <9D71116C5787@blablablabla>\r\n" ;;
Блин а сообщения досих пор приходят уже 783. Сколько ж я отправил.

!bogus · 5 Фев 2008

Ну если бесплатный, на php, вот держите от WR:

Для просмотра скрытого содержимого вы должны войти или зарегистрироваться.

имхо простой, удобный, понятный)

ewafr · 14 Фев 2008

Что-то он медленный чересчур!

Что-то он медленный чересчур!
У кого как?

fuckthesystem · 23 Фев 2008

кто нибудь спамил со скрипта маднета?

Для просмотра скрытого содержимого вы должны войти или зарегистрироваться.

в письме в конце ссылки добавляется \%22 и ссылка не работает.
мож кто знает как от этого избавиться?

laszlo · 23 Фев 2008

fuckthesystem написал(а):
кто нибудь спамил со скрипта маднета? Для просмотра ссылки Войди или Зарегистрируйся
в письме в конце ссылки добавляется \%22 и ссылка не работает.
мож кто знает как от этого избавиться?

Вот аналог скрипта маднета, а может - его предшественник
Не такой красивый, зато полностью работоспособный
(для работы мускул не нужен!)

PHP:

<?


If ($action=="mysql"){

	#Grab email addresses from MySQL

	include "./mysql.info.php";

	if (!$sqlhost || !$sqllogin || !$sqlpass || !$sqldb || !$sqlquery){

	print "Please configure mysql.info.php with your MySQL information. All settings in this config file are required.";

	exit;

	}

	$db = mysql_connect($sqlhost, $sqllogin, $sqlpass) or die("Connection to MySQL Failed.");

	mysql_select_db($sqldb, $db) or die("Could not select database $sqldb");

	$result = mysql_query($sqlquery) or die("Query Failed: $sqlquery");

	$numrows = mysql_num_rows($result);

	

	for($x=0; $x<$numrows; $x++){

	$result_row = mysql_fetch_row($result);

	$oneemail = $result_row[0];

	$emaillist .= $oneemail."\n";

	}

	}



if ($action=="send"){

	$message = urlencode($message);

	$message = ereg_replace("%5C%22", "%22", $message);

	$message = urldecode($message);
	$message = stripslashes($message);
	$subject = stripslashes($subject);

}



?>

<form name="form1" method="post" action="" enctype="multipart/form-data">

  <br>

  <table width="100%" border="0">

    <tr> 

      <td width="10%"> 

        <div align="right"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif">Your 

          Email:</font></div>

      </td>

      <td width="18%"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <input type="text" name="from" value="<? print $from; ?>" size="30">

        </font></td>

      <td width="31%"> 

        <div align="right"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif">Your 

          Name:</font></div>

      </td>

      <td width="41%"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <input type="text" name="realname" value="<? print $realname; ?>" size="30">

        </font></td>

    </tr>

    <tr> 

      <td width="10%"> 

        <div align="right"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif">Reply-To:</font></div>

      </td>

      <td width="18%"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <input type="text" name="replyto" value="<? print $replyto; ?>" size="30">

        </font></td>

      <td width="31%"> 

        <div align="right"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif">Attach 

          File:</font></div>

      </td>

      <td width="41%"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <input type="file" name="file" size="30">

        </font></td>

    </tr>

    <tr> 

      <td width="10%"> 

        <div align="right"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif">Subject:</font></div>

      </td>

      <td colspan="3"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <input type="text" name="subject" value="<? print $subject; ?>" size="90">

        </font></td>

    </tr>

    <tr valign="top"> 

      <td colspan="3"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <textarea name="message" cols="60" rows="10"><? print $message; ?></textarea>

        <br>

        <input type="radio" name="contenttype" value="plain" >

        Plain 

        <input type="radio" name="contenttype" value="html" checked>

        HTML 

        <input type="hidden" name="action" value="send">

        <input type="submit" value="Send eMails">

        </font></td>

      <td width="41%"><font size="-3" face="Verdana, Arial, Helvetica, sans-serif"> 

        <textarea name="emaillist" cols="30" rows="10"><? print $emaillist; ?></textarea>

        </font></td>

    </tr>

  </table>

</form>



<?

if ($action=="send"){



	if (!$from && !$subject && !$message && !$emaillist){

	print "Please complete all fields before sending your message.";

	exit;

	}

	

	$allemails = split("\n", $emaillist);

	$numemails = count($allemails);



	#Open the file attachment if any, and base64_encode it for email transport

	If ($file_name){

		@copy($file, "./$file_name") or die("The file you are trying to upload couldn't be copied to the server");

		$content = fread(fopen($file,"r"),filesize($file));

		$content = chunk_split(base64_encode($content));

		$uid = strtoupper(md5(uniqid(time())));

		$name = basename($file);

	}

	

	for($x=0; $x<$numemails; $x++){

		$to = $allemails[$x];

		if ($to){

		$to = ereg_replace(" ", "", $to);

		$message = ereg_replace("&email&", $to, $message);

		$subject = ereg_replace("&email&", $to, $subject);

		print "Sending mail to $to.......";

		flush();

		$header = "From: $realname <$from>\r\nReply-To: $replyto\r\n";

		$header .= "MIME-Version: 1.0\r\n";

		If ($file_name) $header .= "Content-Type: multipart/mixed; boundary=$uid\r\n";

		If ($file_name) $header .= "--$uid\r\n";

		$header .= "Content-Type: text/$contenttype\r\n";

		$header .= "Content-Transfer-Encoding: 8bit\r\n\r\n";

		$header .= "$message\r\n";

		If ($file_name) $header .= "--$uid\r\n";

		If ($file_name) $header .= "Content-Type: $file_type; name=\"$file_name\"\r\n";

		If ($file_name) $header .= "Content-Transfer-Encoding: base64\r\n";

		If ($file_name) $header .= "Content-Disposition: attachment; filename=\"$file_name\"\r\n\r\n";

		If ($file_name) $header .= "$content\r\n";

		If ($file_name) $header .= "--$uid--";

		mail($to, $subject, "", $header);

		print "ok<br>";

		flush();

		}

		}



}

?>

fuckthesystem · 23 Фев 2008

спс канеш, но это далеко не мэдспамер.
нет рандомайзинга, ну а с одного адреса, имени сильно не поспамишь...

madass · 29 Фев 2008

Всё равно нормальная система.

taboo · 22 Мар 2008

А есть ли скрипт чтоб сворвать конкретный адресс??

snovitsi · 25 Мар 2008

А как использовать такие скрипты, так чтобы еще и хостер не забанил?

Бесплатный скрипт рассылки

Lunoxod

Постоялец

abrvalkin

Создатель

!bogus

Постоялец

ewafr

Создатель

fuckthesystem

Создатель

laszlo

Постоялец

fuckthesystem

Создатель

madass

Писатель

taboo

Создатель

snovitsi

Писатель