/**
* Eksendas la mesagxon, kaj eldonas iujn informojn pri tio.
*
* @uses email_message_class::Send
*/
function eksendu()
{
$eraro = $this->baza_objekto->Send();
$this->testu_eraron($eraro);
if (echo_sendis_mesagxon) {
eoecho("<p>Sendis mesag^on al: " . $this->baza_objekto->headers['To'] . ", " . $this->baza_objekto->headers['Cc'] . ", " . $this->baza_objekto->headers['Bcc'] . "</p>\n");
}
}
/**
* 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;
}
}
* Multiple alternative parts are gathered in multipart/alternative parts.
* It is important that the fanciest part, in this case the HTML part,
* is specified as the last part because that is the way that HTML capable
* mail programs will show that part and not the text version part.
*/
$alternative_parts = array($text_part, $html_part);
$email_message->CreateAlternativeMultipart($alternative_parts, $alternative_part);
/*
* All related parts are gathered in a single multipart/related part.
*/
$related_parts = array($alternative_part, $image_part, $background_image_part);
$email_message->AddRelatedMultipart($related_parts);
/*
* One or more additional parts may be added as attachments.
* In this case a file part is added from data provided directly from this script.
*/
$attachment = array("Data" => "This is just a plain text attachment file named attachment.txt .", "Name" => "attachment.txt", "Content-Type" => "automatic/name", "Disposition" => "attachment");
$email_message->AddFilePart($attachment);
/*
* 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";
}
var_dump($email_message->parts);
/**
* 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;
}
}
