Пишу скрипт .... отправлка на мыло файла
Добавлено: Сб май 24, 2003 03:05
Скрипт пишется как модуль к нюке .. но это не важно ...
Вобщем чел заходит на страницу - выбирает файл - пишет мыло , и сервак шлет ему на мыло этот файл ...
Сначалa я научилa его отправлять мыл с инфой о выбранном в select файле .. а вот научить посылать этот файл ни как не выходит. Подскажите , что неправильно в этом коде ?
На мыло вобще ничего не приходит как вставилa код отправки аттачмента
Код:
Вобщем чел заходит на страницу - выбирает файл - пишет мыло , и сервак шлет ему на мыло этот файл ...
Сначалa я научилa его отправлять мыл с инфой о выбранном в select файле .. а вот научить посылать этот файл ни как не выходит. Подскажите , что неправильно в этом коде ?
На мыло вобще ничего не приходит как вставилa код отправки аттачмента
Код:
<?php
if (!eregi("modules.php", $PHP_SELF)) {
die ("You can't access this file directly...");
}
require_once("mainfile.php");
$module_name = basename(dirname(__FILE__));
get_lang($module_name);
include("header.php");
OpenTable();
echo "<FORM METHOD=\"post\" ACTION=\"modules.php?name=$module_name\"><b>"._SELECTSCRIPT."</b><br><br><select name=\"scriptfile\"><option name=\"scriptfile\" value=\"\" selected>"._CHOOSE."</option>";
$scriptdir = dir("scripts");
while($func=$scriptdir->read()) {
$scriptslist .= "$func ";
}
closedir($scriptdir->handle);
$scriptslist = explode(" ", $scriptslist);
sort($scriptslist);
for ($i=0; $i < sizeof($scriptslist); $i++) {
if($scriptslist[$i]!="") {
$bl = ($scriptslist[$i]);
$bl = ereg_replace(".zip","",$bl);
$bl = ereg_replace(".rar","",$bl);
$bl = ereg_replace("_"," ",$bl);
echo "<option value=\"$scriptslist[$i]\">$bl</option>\n";
}
}
echo "</select>\n";
echo "<br><br>";
echo "<b>"._YOURMAIL." </b> <INPUT type=\"text\" NAME=\"sender_email\" VALUE=\"$sender_email\" SIZE=30><br><br>\n"
."<input type=submit value="._SEND.">\n"
."</form>\n";
CloseTable();
//////////////
$attachment = "scripts/$scriptfile"; // файл, который нужно отправить (имя файла то которыое выбрали выше)
#build the attachment
$fp = fopen("scripts/$scriptfile", "rb");
while(!feof($fp))
$attachment .= fread($fp, 4096);
$attachment = base64_encode($attachment);
#build the mail message
$boundary = uniqid("NextPart_");
$headers = "From: $adminmail\nContent-type: multipart/mixed; boundary=\"$boundary\"";
$body = "--$boundary\nContent-type: text/plain; charset=iso-8859-1\nContent-transfer-encoding: 8bit\n\n$body\n\n--$boundary\nContent-type: application/octet-stream; name=$scriptfile\nContent-disposition: inline; filename=$scriptfile\nContent-transfer-encoding: base64\n\n$attachment\n\n--$boundary--";
$msg = "$sitename\n\n";
$to = $sender_email;
$subject = "$scriptfile\n";
mail($to, $subject, $msg, $body, $headers);
