(c) madnet private mail-worker (c)


Your Email:
Random EMails
Your Name:
Random Names
Reply-To:
Random Replys-To
Attach File:
Subject:
Random Subjects


Message:

Plain HTML


E-mail List: Load from file

Save logs to file
You mast enter your E-mail."); exit; } } if ($random_name!="on") { if (!$realname) { echo("You mast enter your nName."); exit; } } if ($random_reply!="on") { if (!$replyto) { echo("You mast enter your Reply-To field."); exit; } } if ($random_sabj!="on") { if (!$subject) { echo("You mast enter Sabject."); exit; } } If (!$message) { echo("You mast enter message to send."); exit; } if ($mails_from_file!="on") { if (!$emaillist) { echo("You mast enter E-mails where send mails."); exit; } } Else { If (!file_exists($mailfilename)) { echo("File \"".$mailfilename."\" with e-mail dosn't exists"); exit; } } //////////////////////////////////////////////////////////////////////////////// if ($mails_from_file!="on") { $allemails = split("\n", $emaillist); $numemails = count($allemails); } Else { $allemails = file($mailfilename); $numemails = count($allemails); } 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); } if ($log_to_file=="on") { print "Work started
"; print "Logs saves in ".$fileforlogs."
"; flush(); } for($x=0; $x<$numemails; $x++) { $to = $allemails[$x]; if ($to) { //////////////////////////////////////////////////////////////////////////////// if ($random_mail=="on") { $from = randmail(); } if ($random_name=="on") { $realname = randword(); } if ($random_reply=="on") { $replyto = randmail(); } if ($random_sabj=="on") { $subject = randsabj(); } //////////////////////////////////////////////////////////////////////////////// $to = ereg_replace(" ", "", $to); $message = ereg_replace("&email&", $to, $message); $subject = ereg_replace("&email&", $to, $subject); if ($log_to_file!="on") { 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); if ($log_to_file!="on") { print "ok
"; flush(); } else { $fp = fopen ($fileforlogs, "w+");fwrite ($fp, ($x+1)." mails sended");fclose ($fp); } } } } ?>

madnet private mail-worker
provided by madnet
ICQ: 751777
PLEASE DON'T USE THIS SOFTWARE TO SPAM!,
2005 of Octomber.
The given script is written in the demonstration purposes. The author does not carry the responsibility for use of a script.