Очень сложный скрипт 8[]

[Alan]

Люди!! Можете написать скрипт для отправки писем через форму в русской кодировке.
Это последний крик о помощи......

[Lion]

Че прям так сразу возьмем и напишем нахаляву ?

[Alan]

Ну тогда хоть поправте что тут не правильно

<?
 $HTMLmessage=qp_enc(convert_cyr_string($HTMLmessage,"w","k"));
  $TEXTmessage=qp_enc(convert_cyr_string(strip_tags($HTMLmessage),"w","k"));
  $boundary=md5(time())."@".strval(time());
  // формируем сообщение в формате MIME: будет состоять
  //       из двух частей - HTML-формат и текстовой формат.
  $body="--$boundary\\r\\nContent-type: text/html; charset=\\"koi-8r\\"\\r\\nContent-Transfer-Encoding: 8bit\\r\\n\\r\\n$HTMLmessage\\r\\n\\r\\n--$boundary\\r\\nContent-type: text/plain; charset=\\"koi-8r\\"\\r\\nContent-Transfer-Encoding: 8bit\\r\\n\\r\\n$HTMLmessage\\r\\n";
  //Составляем заголовок для письма
  $header="From: $from\\r\\nMime-Version: 1.0\\r\\nContent-Type: multipart/alternative;\\r\\n boundary=$boundary\\r\\n";
$from="alan";
$subj="Привет";  
$$body=" Привет всем кому пишу";
mail("alan@alba.dp.ua",$from,$subj,$body,$header);

Че прям так сразу возьмем и напишем нахаляву ?

А скрипт такой что его только за большие деньги и в иностранной валюте?

[Britva]

function mmail($to, $from, $subject, $body) {

$from = convert_cyr_string($from, "w", "k");

$headers  = "From: <$from>\\n";

$headers .= "Return-path: <$from>\\n";

$headers .= "Content-Type: text/html; charset=koi8-r\\n";

$headers = convert_cyr_string($headers, "w", "k");

$body = str_replace("\\n", "
", $body);

$body = convert_cyr_string($body, "w", "k");

$to = convert_cyr_string($to, "w", "k");

$subject = convert_cyr_string($subject, "w", "k");

return mail($to, $subject, $body, $headers);
}


вроде это с русской должно работать, если учесть что передается в функцию win1251 а отсылается в koi8
по крайней мере у меня это прекрасно работает.

[Alan]

<?
function mmail($to, $from, $subject, $body) {
    $from="alan@alba.dp.ua";
    $body="Текст письма";
    $to="alan@alba.dp.ua";
    $subject="Тема письма";
    $from = convert_cyr_string($from, "w", "k");
    $headers  = "From: <$from>\\n";
    $headers .= "Return-path: <alan>\\n";
    $headers .= "Content-Type: text/html; charset=koi8-r\\n";
    $headers = convert_cyr_string($headers, "w", "k");
    $body = str_replace("\\n", "
", $body);
    $body = convert_cyr_string($body, "w", "k");
    $to = convert_cyr_string($to, "w", "k");
    $subject = convert_cyr_string($subject, "w", "k");
    return mail($to, $subject, $body, $headers);
}



?>
так ваще ничего не присылает.
Может у меня что-то с апачем или пхп неправильно настроено?

[Alan]

[Alan]

<?
#function mmail($to, $from, $subject, $body) {

#    $from = convert_cyr_string($from, "w", "k");
#    $headers  = "From: <$from>\\n";
    $headers = "Return-path: <alan>\\n";
    $headers = "Content-Type: text/html; charset=windows-1251\\n";
    $headers = convert_cyr_string($headers, "k", "w");
#    $body = str_replace("\\n", "
", $body);
#    $body = convert_cyr_string($body, "w", "k");
#    $to = convert_cyr_string($to, "w", "k");
#    $subject = convert_cyr_string($subject, "w", "k");
#    $from="alan@alba.dp.ua";
    $body="Текст письма";
    $to="alan@alba.dp.ua";
    $subject="Тема письма";
#    return mail($to, $subject, $body, $headers);
#}
mail($to, $subject, $body, $headers);


?>