Убрать ошибки
На 038.rosplans.ru флэш-прога. После того, что заказчик отредактирует, он должен нажать на сохранение, и результаты его писанины должны прийти мне на почту. Но результаты не приходят. Надо разобраться, почему.
текст скрипта:
// настройки - высота и ширина картинки
$_xsize = 401;
$_ysize = 300;
// куда шлем
$to = "[email protected]";
// от кого письмо
$from = "[email protected]";
// текст письма
$text = "Комментарий: \n";
// тема письма
$subj = "Test of image send - ";
function correctColor($color) {
$res = "";
for ($i=0; $i
$res .="0";
$res.=$color;
return $res;
}
if (isset($_POST['ttext']))
$text.=$_POST['ttext'];
if (isset($_POST['pic_arr'])) {
$data = explode(",",$_POST['pic_arr']);
$im = imagecreatetruecolor($_xsize, $_ysize);
// создаем палитру
$palette = array();
for ($i=0; $i
for ($j=0; $j
$index = $i*$_xsize+$j;
if (!isset($palette[$data[$index]])) {
$cval = correctColor($data[$index]);
$r = hexdec(substr($cval,0,2));
$g = hexdec(substr($cval,2,2));
$b = hexdec(substr($cval,4,2));
$palette[$data[$index]] = imagecolorallocate($im, $r, $g, $b);
}
}
// данные на картинку
for ($i=0; $i
for ($j=0; $j
$index = $i*$_xsize+$j;
$cval = correctColor($data[$index]);
imagesetpixel($im, $j, $i, $palette[$cval]);
}
$date = date("Y-m-d_H-i-s");
$fnam = $date;
if (file_exists($date.".jpg"))
for ($i=1; $i
if (!file_exists($date."_".$i.".jpg")) {
$fnam = $date."_".$i;
break;
}
$filename=$fnam.".jpg";
imagejpeg($im, $filename);
$f = fopen($filename,"rb");
$unq = strtoupper(uniqid(time()));
$subj .= $date;
$head = "From: $from\n";
$head .= "To: $to\n";
$head .= "Subject: $subj\n";
$head .= "Reply-To: $from\n";
$head .= "Mime-Version: 1.0\n";
$head .= "Content-Type:multipart/mixed;";
$head .= "boundary=\"----------".$unq."\"\n\n";
$body = "------------".$unq."\nContent-Type:text/html;charset=\"windows-1251\"\n";
$body .= "Content-Transfer-Encoding: 8bit\n\n$text\n\n";
$body .= "------------".$unq."\n";
$body .= "Content-Type: application/octet-stream;";
$body .= "name=\"".basename($filename)."\"\n";
$body .= "Content-Transfer-Encoding:base64\n";
$body .= "Content-Disposition:attachment;";
$body .= "filename=\"".basename($filename)."\"\n\n";
$body .= chunk_split(base64_encode(fread($f,filesize($filename))))."\n";
fclose($f);
mail($to, $subj, $body, $head);
unlink($filename);
}
?>