/** * Sendas retmesagxon al iu h**o. * * $subjekto - temlinio de la mesagxo (en UTF-8, EO-signoj per c^-kodigo) * $korpo - la teksto de la mesagxo (dito) * $to_name - la nomo de la ricevonto (dito) * $to_adress - la retposxtadreso de la ricevonto */ function sendu_xxxxx_mesagxon($subjekto, $korpo, $to_name, $to_address) { $subject = eotransformado($subjekto, "utf-8"); // $mesagxo = "### auxtomata mesagxo de la DEJ-aligilo ###\n\n"; $mesagxo .= eotransformado($korpo, "utf-8"); $from_name = "Pauxlo Ebermann"; // TODO: (eble prenu nomon aux el la datumbazo/konfiguro, aux la entajpanton ?) $from_address = "*****@*****.**"; // TODO: Eble prenu el la datumbazo? $email_message = new email_message_class(); $email_message->default_charset = "UTF-8"; if (!strcmp($error = $email_message->SetEncodedEmailHeader("To", $to_address, eotransformado($to_name, "utf-8")), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("From", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("Reply-To", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedHeader("Errors-To", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("Bcc", "*****@*****.**", "Paul Ebermann"), "") && !strcmp($error = $email_message->SetEncodedHeader("Subject", $subject), "") && !strcmp($error = $email_message->AddQuotedPrintableTextPart($email_message->WrapText($mesagxo)), "")) { $error = $email_message->Send(); } if ($error) { erareldono($error); exit; } }
/* * Set the Return-Path header to define the envelope sender address to * which bounced messages are delivered. * If you are using Windows, you need to use the smtp_message_class to set * the return-path address. */ if (defined("PHP_OS") && strcmp(substr(PHP_OS, 0, 3), "WIN")) { $email_message->SetHeader("Return-Path", $error_delivery_address); } $email_message->SetEncodedHeader("Subject", $subject); /* * A message with attached files usually has a text message part * followed by one or more attached file parts. */ $text_message = "Hello " . strtok($to_name, " ") . "\n\nThis message forwarding another message that is encapsulated as attachment.\n\nThank you,\n{$from_name}"; $email_message->AddQuotedPrintableTextPart($email_message->WrapText($text_message)); $forwarding_message = array("FileName" => "message.eml", "Name" => "[Fwd: Testing Manuel Lemos' MIME E-mail composing and sending PHP class: HTML message]"); $email_message->AddMessagePart($forwarding_message); /* * The message is now ready to be assembled and sent. * Notice that most of the functions used before this point may fail due * to programming errors in your script. You may safely ignore any errors * until the message is sent to not bloat your scripts with too much error * checking. */ $error = $email_message->Send(); if (strcmp($error, "")) { echo "Error: {$error}\n"; } else { echo "Message sent to {$to_name}\n"; }
/** * TODO: dokumentado por sendu_konfirmilon * * $teksto - en tiu variablo ni metos la tekston de la mesagxo, * por ebligi montri gxin ankoraux en la retpagxo (krom * la dissendado). * * ### uzado: partrezultoj.php, AligxiloDankon.php ### */ function sendu_konfirmilon($partoprenanto, $partopreno, $renkontigxo, &$teksto) { $subject = "unua konfirmilo por la " . $renkontigxo->datoj[nomo]; $mesagxo = "### auxtomata mesagxo ###\n\n"; $from_name = "IS-Aligilo"; $from_address = "*****@*****.**"; // TODO: forigi retadreson $to_name = utf8_decode($partoprenanto->datoj[personanomo] . " " . $partoprenanto->datoj[nomo]); $to_address = $partoprenanto->datoj[retposxto]; $teksto = faru_1akonfirmilon($partoprenanto, $partopreno, $renkontigxo); $mesagxo .= $teksto; $email_message = new email_message_class(); $email_message->default_charset = "UTF-8"; if (!strcmp($error = $email_message->SetEncodedEmailHeader("To", $to_address, $to_name), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("From", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("Reply-To", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedEmailHeader("Bcc", "*****@*****.**", "Paul Ebermann"), "") && !strcmp($error = $email_message->SetEncodedHeader("Errors-To", $from_address, $from_name), "") && !strcmp($error = $email_message->SetEncodedHeader("Subject", $subject), "") && !strcmp($error = $email_message->AddQuotedPrintableTextPart($email_message->WrapText($mesagxo)), "")) { $error = $email_message->Send(); } if ($error) { erareldono($error); exit; } }