echo "</TD><TD>";
if (nova_kunlogxado) {
$ri = $_SESSION['partoprenanto']->personapronomo;
$Ri = ucfirst($ri);
eoecho("Kunlog^deziroj de kaj pri {$ri}:");
// !!!!!!!!!!!!!!!!
require_once $prafix . "/iloj/iloj_kunlogxadoj.php";
montru_kunlogxdezirojn_ambauxdirekte($_SESSION['partopreno'], "↑");
// provizore nur por teknikumistoj, por elprovi:
rajtligu("kunlogxado.php?ago=sercxu", "serc^u kunlog^dezirojn", "", "teknikumi");
}
}
}
echo "</TD></TR></TABLE>\n";
if ($faru == 'konfirmi') {
echo nl2br(faru_1akonfirmilon($_SESSION["partoprenanto"], $_SESSION["partopreno"], $partopreno_renkontigxo));
echo "<BR><BR>";
if ($_SESSION["partoprenanto"]->datoj[retposxto] and rajtas(retumi)) {
ligu("partrezultoj.php?faru=sendukonfirmo", "--> sendi 1an konfirmilon");
}
echo "<hr/><p>La nova unua konfirmilo:</p>";
require_once $prafix . '/iloj/iloj_konfirmilo.php';
echo "<pre>" . kreu_unuan_konfirmilan_tekston($partoprenanto, $partopreno, $renkontigxo, 'utf-8') . "</pre>";
ligu("partrezultoj.php?faru=sendu_unuan_konfirmilon", "sendi la novan unuan konfirmilon");
}
if ($faru == 'sendu_unuan_konfirmilon') {
require_once $prafix . '/iloj/retmesagxiloj.php';
require_once $prafix . '/iloj/iloj_konfirmilo.php';
require_once $prafix . '/iloj/diversaj_retmesagxoj.php';
$teksto = kreu_kaj_sendu_unuan_konfirmilon($_SESSION["partoprenanto"], $_SESSION["partopreno"], $partopreno_renkontigxo, $_SESSION['kkren']['entajpantonomo']);
echo "<p>Ni sendis la jenan unuan informilon:</p><pre>";
/**
* 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;
}
}
}
if ($partopreno->datoj['dulita'][0] != 'J') {
$partopreno->datoj['dulita'] = 'N';
}
$partopreno->skribu();
rekalkulu_agxojn($partopreno->datoj['ID']);
$partopreno = new Partopreno($partopreno->datoj['ID']);
// TODO: Etwa hier sollten wir auch nötige Mails verschicken
// TODO: können wir mit partoprenkontrolo zusammenlegen.
sendu_auxtomatajn_mesagxojn($partopreno, $partoprenanto, $renkontigxo);
//$vosto = $sekvontapagxo."?&enkodo=$enkodo&kodnomo=$kodnomo&kodvorto=$kodvorto&partoprenantoidento=$partoprenantoidento&partoprenidento=$partoprenidento";
//automatisches Backup
sendu_ekzport($partoprenanto, $partopreno, $renkontigxo);
granda_kesto_komenco();
geoecho("<p>", "Du hast dich erfolgreich angemeldet <br/>", "Vi sukcese alig^is</p>");
if ($partoprenanto->datoj['retposxto']) {
geoecho("<p>", "Das folgende <em>Konfirmilo</em> wurde an deine" . "E-Mail-Adresse geschickt.<br/>", "La suba konfirmilo estas sendata al via retadreso</p>");
sendu_konfirmilon($partoprenanto, $partopreno, $renkontigxo, $teksto);
} else {
$teksto = faru_1akonfirmilon($partoprenanto, $partopreno, $renkontigxo);
geoecho("<p>", "Bitte speichere (oder drucke) den folgenden Text. <br/>", "Bonvolu sekurigu la suban tekston.</p>");
}
echo "<hr />";
echo "<div>";
echo nl2br($teksto);
echo "</div>";
echo "<hr />";
granda_kesto_fino();
//$partoprenanto->montru_aligxinto();
//$partopreno->montru_aligxo();
}