PHP eoecho函数代码示例

function montru_sxangxoformularon($konfiguro)
{
    if ($konfiguro->datoj['ID']) {
        eoecho("<h2>Konfiguro-s^ang^o</h2>");
    } else {
        eoecho("<h2>Nova konfiguro</h2>");
    }
    echo "<form action='renkontigxaj_konfiguroj.php' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("renkontig^o-ID", "renkontigxoID", $konfiguro->datoj['renkontigxoID']);
    tabela_kasxilo("ID", 'ID', $konfiguro->datoj['ID']);
    $elektoj = array();
    foreach ($GLOBALS['konfiguraj_tipoj'] as $tipo => $titolo) {
        $elektoj[$tipo] = $titolo[1];
    }
    tabela_elektilo("tipo", 'tipo', $elektoj, $konfiguro->datoj['tipo']);
    tabelentajpejo("interna nomo", 'interna', $konfiguro->datoj['interna'], 20);
    tabelentajpejo("grupo", 'grupo', $konfiguro->datoj['grupo'], 5);
    tabelentajpejo("teksto", 'teksto', $konfiguro->datoj['teksto'], 50);
    tabelentajpejo("rimarko", 'aldona_komento', $konfiguro->datoj['aldona_komento'], 50);
    echo "</table>\n";
    echo "<p>";
    if ($konfiguro->datoj['ID']) {
        butono('sxangxu', "S^ang^u");
        butono("kreu", "Kreu (kun nova ID)");
    } else {
        butono('kreu', "Kreu");
    }
    ligu("renkontigxaj_konfiguroj.php", "Reen al la listo");
    echo "</p>";
}

/**
 * metas la HTML-kapon kun ioma informo pri la
 *  stato de la akceptado.
 * $pasxo - la nomo de la aktuala pasxo.
 */
function akceptado_kapo($pasxo)
{
    $partoprenanto = $_SESSION['partoprenanto'];
    HtmlKapo();
    eoecho("<p>Ni nun akceptas <b>" . $partoprenanto->datoj[personanomo] . " " . $partoprenanto->datoj[nomo] . " </b>(" . $partoprenanto->datoj[ID] . ") al la <b>" . $_SESSION["renkontigxo"]->datoj[nomo] . "</b>.</p>\n");
    eoecho("<h2>Akceptada proceduro &ndash; Pas^o <em>" . $GLOBALS['PASXO_NOMOJ'][$pasxo] . "</em></h2>\n");
    // TODO: reen-ligoj al antauxaj pasxoj
}

/**
 * Montras por unu deziro A->B la detalojn
 * de A kaj B, kaj la statuson.
 */
function montru_kunlogxdezirdetalojn($deziro)
{
    $dezirant_eno = new Partopreno($deziro->datoj['partoprenoID']);
    $deziranto = new Partoprenanto($dezirant_eno->datoj['partoprenantoID']);
    $dezirat_eno = new Partopreno($deziro->datoj['kunKiuID']);
    $dezirato = new Partoprenanto($dezirat_eno->datoj['partoprenantoID']);
    eoecho("<h2>Kunlog^deziraj detaloj</h2>");
    eoecho("<table>\n" . "<tr><th /><th>deziranto</th><th>dezirato</th></tr>\n");
    kampoj("ID", array(donu_ligon("partrezultoj.php?partoprenidento=" . $dezirant_eno->datoj['ID'], $dezirant_eno->datoj['ID']), donu_ligon("partrezultoj.php?partoprenidento=" . $dezirat_eno->datoj['ID'], $dezirat_eno->datoj['ID'])));
    kampoj("nomo", array($deziranto->tuta_nomo(), $dezirato->tuta_nomo()));
    kampoj("domotipo", array($dezirant_eno->domotipo(), $dezirat_eno->domotipo()));
    kampoj("ag^o", array($dezirant_eno->datoj['agxo'], $dezirat_eno->datoj['agxo']));
    // testas, cxu seksoj kaj deziritaj cxambrotipoj harmonias.
    if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u' and $dezirat_eno->datoj['cxambrotipo'] == 'u') {
        kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso => "averto"));
        kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo() => "averto"));
    } else {
        if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u') {
            kampoj("sekso", array($deziranto->sekso, $dezirato->sekso => "averto"));
            kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo()));
        } else {
            if ($deziranto->sekso != $dezirato->sekso and $dezirat_eno->datoj['cxambrotipo'] == 'u') {
                kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso));
                kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo() => "averto"));
            } else {
                kampoj("sekso", array($deziranto->sekso, $dezirato->sekso));
                kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo()));
            }
        }
    }
    // se unu volas dulitan cxambron, tiam la alia ankaux volu.
    if ($dezirant_eno->datoj['dulita'] != $dezirat_eno->datoj['dulita']) {
        kampoj("dulita", array(jes_ne($dezirant_eno->datoj['dulita']) => "averto", jes_ne($dezirat_eno->datoj['dulita']) => "averto"));
    } else {
        kampoj("dulita c^.?", array(jes_ne($dezirant_eno->datoj['dulita']), jes_ne($dezirat_eno->datoj['dulita'])));
    }
    eoecho("</table>\n");
    $sql = datumbazdemando(array("ID"), "kunlogxdeziroj", array("partoprenoID = '" . $deziro->datoj['kunKiuID'] . "'", "kunKiuID = '" . $deziro->datoj['partoprenoID'] . "'"));
    $rez = sql_faru($sql);
    if ($linio = mysql_fetch_assoc($rez)) {
        $alia_deziro = new Kunlogxdeziro($linio['ID']);
        eoecho("<p>Estas ankau^ ");
        ligu("kunlogxado.php?kunlogxID=" . $linio['ID'], "kunlog^deziro en la inversa direkto");
        eoecho(", kies stato nun estas <em>" . $alia_deziro->stato() . "</em>");
    } else {
        eoecho("<p>Sed " . $dezirato->tuta_nomo() . " ne indikis, ke " . $dezirato->personapronomo . " volas log^i kun " . $deziranto->tuta_nomo() . ".</p>\n");
    }
    eoecho("<p>Aktuala stato de la kunlog^deziro: <em>" . $deziro->stato() . "</em>.</p>\n");
    echo "<form action='kunlogxado.php' method='POST'>\n";
    tenukasxe("kunlogxID", $deziro->datoj['ID']);
    butono("forvisxhu", "Forvis^u", "ago");
    butono("ne_eblas", "Ne eblas", "ago");
    butono("eblas", "Eblas", "ago");
    echo "</form>\n";
    eoecho("<p>C^iuj kunlog^deziroj de " . $deziranto->tuta_nomo() . ":</p>");
    montru_kunlogxdezirojn($dezirant_eno);
}

/**
 * donas erarmesaĝon, ke la uzanto ne rajtas fari ion,
 * kaj finas la skripton.
 *
 * @param string $ago kiun rajton oni bezonus.
 * @todo prenu la nomon, kie plendi el la konfiguro.
 * @todo ĉu iel taŭge fini la HTML-strukturon?
 */
function ne_rajtas($ago = "?")
{
    eoecho("Malg^usta kodvorto au^ nomo ne ekzistas, au^ eble vi ne rajtas uzi tiu c^i pag^on ({$ago})<BR>");
    eoecho("Se vi pensas, ke vi devus rajti, kaj ke vi donis la g^ustan kodvorton, plendu c^e Pau^lo.");
    // TODO: Pauxlo -> el konfiguro
    ligu("index.php", "<-- reen al la komenca pag^o", "_top");
    // TODO: exit() finas la tutan skripton, sen zorgi, ke la HTML estas ie en la mezo ...
    // Eble iom helpus voki htmlFino().
    exit;
}

function faru_SQL($sql)
{
    echo $sql . "\n";
    if (INSTALA_MODUSO) {
        eoecho("faranta ...");
        flush();
        sql_faru($sql);
        eoecho("farita!\n");
    }
}

/**
 * HTML-a kapo por la serĉ-paĝo, inkluzive de elektilo por jam
 * ekzistantaj serĉoj.
 */
function sercxKapo()
{
    HtmlKapo();
    eoecho("<h2>G^enerala Serc^o</h2>\n");
    kasxeblaSercxoElektilo();
    ligu("partsercxo.php", "Reen al la partoprenantoserc^o");
    ligu("gxenerala_sercxo.php", "nova serc^o");
    if ($_REQUEST['antauxa_sercxo']) {
        trovuSercxon($_REQUEST['antauxa_sercxo'], $GLOBALS['valoroj'], true);
    }
}

/**
 *
 */
function montru_laux_tage($nomo, $noktonombro, $sql, $klaso)
{
    eoecho("<tr class='" . $klaso . "'><th>" . $nomo . "</th>");
    //  echo "<!-- noktonombro: $noktonombro -->";
    for ($noktoj = 1; $noktoj <= $noktonombro; $noktoj++) {
        //	  echo "<!-- noktoj: $noktoj -->";
        $vera_sql = str_replace('{{nokto}}', $noktoj, $sql);
        echo "<!-- vera_sql: [{$vera_sql}] -->\n";
        $row = mysql_fetch_array(sql_faru($vera_sql));
        echo "<td>" . $row[0] . "</td>";
    }
    echo "</tr>\n";
}

function faru_noton_el_gxi()
{
    $noto = new Noto(0);
    $noto->kreu();
    $noto->datoj['partoprenantoID'] = $_POST['ID'];
    $noto->datoj['kiu'] = $_POST['de_nomo'];
    $noto->datoj['kunKiu'] = $_POST['alkiu'];
    $noto->datoj['tipo'] = "rete";
    $noto->datoj['subjekto'] = $_POST['temo'];
    $noto->datoj['enhavo'] = $_POST['teksto'];
    $noto->datoj['prilaborata'] = $_POST['prilaborata'];
    $noto->datoj['dato'] = date("Y-m-d H:i:s");
    $noto->skribu();
    eoecho("<p style='color:red'>Noto savita.</p>");
}

function montru_kondicxoredaktilon($kondicxo)
{
    eoecho("<h2>" . ($kondicxo->datoj['ID'] ? "S^ang^o" : "Kreo") . " de kondic^o</h2>\n");
    echo "<form action='kondicxo.php' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", 'ID', $kondicxo->datoj['ID']);
    tabelentajpejo("Nomo", 'nomo', $kondicxo->datoj['nomo'], 30);
    $panto = $kondicxo->datoj['entajpanto'];
    tabela_kasxilo("Entajpanto", "entajpanto", $panto, $panto ? eltrovu_entajpanton($panto) : "-");
    granda_tabelentajpejo("Priskribo", "priskribo", $kondicxo->datoj['priskribo'], 60, 4);
    granda_tabelentajpejo("Kondic^okodo", "kondicxoteksto", $kondicxo->datoj['kondicxoteksto'], 60, 4);
    granda_tabelentajpejo("J^avaskripta formo", "jxavaskripta_formo", $kondicxo->datoj['jxavaskripta_formo'], 60, 4);
    echo "</table>\n<p>";
    if ($kondicxo->datoj['ID']) {
        butono('sxangxu', "S^ang^u");
    } else {
        butono('kreu', "Kreu");
    }
    echo "</form>\n";
}

/**
 * Uzas la serĉ-opciojn por serĉi kaj
 * montras la rezulton.
 *
 * TODO: Plibeligu la aspekton.
 * @uses Sercxilo
 */
function montruRezulton($valoroj)
{
    $sercxilo = new Sercxilo();
    $teksto = eotransform("<h3>Serc^rezulto</h3>\n");
    list($kampoj, $inversa, $sql) = kreuSercxSQL($valoroj);
    if (empty($kampoj)) {
        eoecho("<p>Vi elektu <em>almenau^ unu serc^indaj^o</em>" . " &ndash; alikaze mi nenion povas serc^i.</p>");
        return;
    }
    $sercxilo->metu_sql($sql);
    $teksto .= "<p><code>{$sql}</code></p>";
    $kolumnoj = array();
    foreach ($kampoj as $alias) {
        $kol = array('kampo' => $alias, 'titolo' => $inversa[$alias]['titolo']);
        if ($inversa[$alias]['ligo']) {
            $kol['ligilsxablono'] = $inversa[$alias]['ligo'];
        }
        $kolumnoj[] = $kol;
        // 	  $kolumnoj []= array($alias, $inversa[$alias]['titolo'], 'XXXXX', 'l',
        //						  $inversa[$alias]['ligo'], '');
    }
    $sercxilo->metu_kolumnojn($kolumnoj);
    if (in_array('nomo', $kampoj) and in_array('personanomo', $kampoj) and in_array('ID', $kampoj)) {
        if ($valoroj['sercxo_titolo']) {
            $sercxilo->metu_menutitolon("g^en. serc^o: " . $valoroj['sercxo_titolo']);
        } else {
            $sercxilo->metu_menutitolon("rezulto de sennoma " . "g^enerala serc^o");
        }
    } else {
    }
    reset($kampoj);
    $sercxilo->metu_ordigon(current($kampoj), 'asc');
    $sercxilo->metu_sumregulojn(array(array(array('entute:', '', 'r'), array('XX', 'A', 'l'))));
    $sercxilo->metu_memligomontradon(true);
    $sercxilo->metu_identigilon('gxenerala_sercxo_rezulto');
    if (strtoupper(substr($_REQUEST['tipo'], 0, 4)) == 'HTML') {
        echo $teksto;
    }
    echo "<!-- " . var_export($sercxilo, true) . "-->";
    $sercxilo->montru_rezulton_en_tipo($_REQUEST['tipo']);
}

/**
 * Uzas la sercx-opciojn por sercxi kaj
 * montras la rezulton.
 *
 * TODO: Plibeligu la aspekton.
 */
function montruRezulton($valoroj)
{
    eoecho("<h3>Serc^rezulto</h3>\n");
    list($kampoj, $inversa, $sql) = kreuSercxSQL($valoroj);
    echo "<p><code>{$sql}</code></p>";
    if (empty($kampoj)) {
        eoecho("<p>Vi elektu <em>almenau^ unu serc^indaj^o</em> &ndash; alikaze mi" . " nenion povas serc^i.</p>");
        return;
    }
    $kolumnoj = array();
    foreach ($kampoj as $alias) {
        $kolumnoj[] = array($alias, $inversa[$alias]['titolo'], 'XXXXX', 'l', $inversa[$alias]['ligo'], '');
    }
    // Ne funkcias, cxar la menu-elektilo volas ordigi laux p.nomo, kaj
    // nia demando ne enhavas tabelon 'p', sed nur partoprenanto.
    if (in_array('renkNumero', $kampoj) and in_array('nomo', $kampoj) and in_array('personanomo', $kampoj) and in_array('ID', $kampoj)) {
        $almenuo = 'jes';
    } else {
        $almenuo = '';
    }
    reset($kampoj);
    sercxu($sql, array(current($kampoj), 'asc'), $kolumnoj, array(array(array('entute:', '', 'r'), array('XX', 'A', 'l'))), 'gxenerala_sercxo_rezulto', 0, 0, "", $almenuo, 'ne');
}

function redaktilo_por_kurzo($kurzo)
{
    if ($kurzo->datoj['ID']) {
        eoecho("<h2>Redakto de kurzo</h2>");
    } else {
        eoecho("<h2>Nova kurzo</h2>");
    }
    echo "<form action='kurzoj.php' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", 'ID', $kurzo->datoj['ID']);
    tabela_elektolisto_el_konfiguroj("valuto", 'valuto', 'valuto', $kurzo->datoj['valuto'], $ppRenk);
    tabelentajpejo("dato", 'dato', $kurzo->datoj['dato'], 10);
    tabelentajpejo("kurzo", 'kurzo', $kurzo->datoj['kurzo'], 10);
    echo "</table>\n";
    echo "<p>\n";
    if ($kurzo->datoj['ID']) {
        butono('sxangxu', "S^ang^u!");
    } else {
        butono('kreu', "Enmetu!");
    }
    ligu("kurzoj.php", "Reen");
    echo "</p>\n";
    echo "</form>";
}

function montru_reguloformularon($regulo)
{
    if ($regulo->datoj['ID']) {
        eoecho("<h1>Redakto de " . $regulo->regulovorto . " <em>" . $regulo->datoj['nomo'] . "</em></h1>");
    } else {
        eoecho("<h1>Kreado de nova " . $regulo->regulovorto . "</h1>");
    }
    echo "<form action='regulo.php?tipo=" . $regulo->tipo . "' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", "ID", $regulo->datoj['ID']);
    tabelentajpejo("nomo", "nomo", $regulo->datoj['nomo'], 20);
    tabelentajpejo("Mallongigo", "mallongigo", $regulo->datoj['mallongigo'], 10);
    granda_tabelentajpejo("Priskribo", "priskribo", $regulo->datoj['priskribo'], 40, 4);
    tabela_kondicxoelektilo("Elektu c^i tie la g^ustan kondic^on por tiu " . "krompagotipo. (Se vi bezonas aliajn, aldonu per " . donu_ligon("kondicxo.php", "la kondic^oredaktilo") . ".)", $regulo->datoj['kondicxo']);
    tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $regulo->datoj['uzebla'], "C^u montri en la g^enerala listo?");
    tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto', 'n' => 'nur unufoje'), $regulo->datoj['lauxnokte'], "C^u lau^nokta krompago, c^u unufoja?");
    echo "</table>\n<p>";
    if ($regulo->datoj['ID']) {
        butono('sxangxu', "S^ang^u");
    } else {
        butono('kreu', "Kreu");
    }
    echo "</p>\n</form>";
}

 /**
  * Montras la aliĝdatojn en HTML-tabelo
  */
 function montru_aligxo($sen_bla = false)
 {
     // TODO: tiu funkcio ankaŭ ŝajnas multe tro longa kaj
     // nesuperrigardebla por mi ...
     $renkontigxo = new renkontigxo($this->datoj['renkontigxoID']);
     $partoprenanto = new partoprenanto($this->datoj['partoprenantoID']);
     if (!$sen_bla) {
         eoecho("partoprendatumoj por la <strong>" . $renkontigxo->datoj['nomo'] . "</strong> en " . $renkontigxo->datoj['loko'] . ":");
     }
     echo "<table  valign='top'>\n";
     kampo("ID:", $this->datoj['ID']);
     if ($this->datoj['ordigoID'] != '0.000') {
         kampo("ordigo-ID:", $this->datoj['ordigoID']);
     }
     kampo("Lingva nivelo:", $this->nivelo());
     $this->simpla_kampo("studento", array(array('j', '[X]', "estas studento"), array('n', '[_]', "ne estas studento"), array('?', '?', "ne klaras, c^u studento.")));
     $this->simpla_kampo1('havas_asekuron', "N", "[X]", "bezonas asekuron pri malsano");
     /*
      TODO: indiko pri invitpeto-datoj
     */
     $this->simpla_kampo1('retakonfirmilo', 'J', "[X]", "deziras retan konfirmilon");
     $this->simpla_kampo1("germanakonfirmilo", "J", "[X]", "deziras germanlingvan konfirmilon");
     $this->simpla_kampo1("litolajxo", "J", "[X]", "mendas litolaj^on");
     $this->simpla_kampo("partoprentipo", array(array("t", "t", "partoprenos tuttempe (de: " . $this->datoj['de'] . " g^is: " . $this->datoj['gxis'] . ")"), array("p", "", "partoprenos partatempe (de: " . $this->datoj['de'] . " g^is: " . $this->datoj['gxis'] . ")")), array('?', "", "partoprenos tute ne?? io eraro okazis - bonvolu kontaktu nin"));
     $this->simpla_kampo("listo", array(array('J', "[X]", "volas aperi en la interreta listo."), array('N', "[_]", "ne volas aperi en la interreta listo.")), array('?', "?", 'interreta listo: "' . $this->datoj['listo'] . '"'));
     $this->simpla_kampo("intolisto", array(array('J', "[X]", "volas aperi en la adresaro."), array('N', "[_]", "ne volas aperi en la adresaro.")), array("?", "?", 'adresaro: "' . $this->datoj['listo'] . '"'));
     $this->simpla_kampo("vegetare", array(array("J", "[X]", "estas <em>vegetarano</em>"), array("A", "[X]", "estas <em>vegano</em>"), array("N", "[X]", "estas <em>viandmang^anto</em>")), array("", "?", "<em>nekonata mang^otipo</em>!"));
     if (deviga_membreco_tipo != 'nenia') {
         $this->simpla_kampo("GEJmembro", array(array('J', "[X]", "estas membro de " . deviga_membreco_nomo)), array('N', "[_]", "ne estas membro de " . deviga_membreco_nomo));
         kampo($this->datoj['surloka_membrokotizo'], $this->membrokotizo());
     }
     // TODO: pripensi, ĉu ankaŭ eblas fari simile kiel la antaŭaj.
     switch ($this->datoj['tejo_membro_laudire'] . $this->datoj['tejo_membro_kontrolita']) {
         case 'jj':
         case 'nj':
             kampo("[X]", "estas membro de TEJO (kontrolita)");
             break;
         case 'jn':
             kampo("-", "ne estas membro de TEJO (kvankam " . $partoprenanto->personapronomo . " asertis, ke jes)");
             break;
         case 'j?':
             kampo("[?]", "asertis esti membro de TEJO (ankorau^ ne kontrolita)");
             break;
         case 'nn':
         case 'n?':
             kampo("-", "ne estas membro de TEJO");
             break;
         case 'np':
         case 'jp':
             kampo("-", "ne estas membro de TEJO, sed tamen pagas ioman monon al TEJO/UEA");
             break;
         case 'ni':
         case 'ji':
             kampo("[I]", "ig^as nova membro de TEJO surloke");
             break;
         default:
             kampo("?", "eraro okazis pri la TEJO-membreco: " . "laudire=" . $this->datoj['tejo_membro_laudire'] . ", kontrolita=" . $this->datoj['tejo_membro_kontrolita']);
     }
     $this->simpla_kampo1("KKRen", "J", "[X]", "estas " . organizantoj_nomo . "-ano");
     if (mangxotraktado == 'ligita') {
         $vosto = "";
         $vosto .= "kaj ";
         $komenco = "";
         if ($this->datoj['domotipo'] == "M") {
             $komenco .= "M";
             $vosto .= "memzorgas";
             if ($this->datoj['kunmangxas'] == "J") {
                 $vosto .= ", sed kunmang^as (senpage)";
                 $komenco .= "J";
             } else {
                 if ($this->datoj['kunmangxas'] == 'K') {
                     $vosto .= ", sed krompagas por kunmang^i";
                     $komenco .= "K";
                 }
             }
         } else {
             if ($this->datoj['domotipo'] == "J") {
                 $vosto .= "junulargastejumas en ";
                 $komenco .= "J";
                 if ($this->datoj['dulita'] == "J") {
                     $komenco .= "2";
                     $vosto .= "(eble) dulita ";
                 } else {
                     if ($this->datoj['dulita'] == 'U') {
                         $vosto .= "(eble) unulita ";
                         $komenco .= "1";
                     }
                 }
                 if ($this->datoj['cxambrotipo'] == "u") {
                     $vosto .= "unuseksa ";
                     $komenco .= "u";
                 }
                 if ($this->datoj['cxambrotipo'] == "g") {
                     $vosto .= "gea ";
                     $komenco .= "g";
                 }
                 if ($this->datoj['cxambrotipo'] == "n") {
//.........这里部分代码省略.........

        ligu_butone("partrezultoj.php?partoprenidento=" . $partopreno->datoj['ID'], "sendi la unuan konfirmilon", array('faru' => 'sendu_unuan_konfirmilon'));
    } else {
        eoecho("Vi ne havas la rajton por elsendi" . " la mesag^on.");
    }
    echo "</p>\n";
}
if ('informmesagxo' == $_REQUEST['faru']) {
    eoecho("<hr /><h3>La informmesag^o</h3>");
    require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php';
    echo "<pre>";
    echo kreu_informmesagxan_tekston($_SESSION['partoprenanto'], $_SESSION['partopreno'], $partopreno_renkontigxo, 'x-metodo');
    echo "</pre><p>";
    if (rajtas("retumi")) {
        ligu_butone("partrezultoj.php?partoprenidento=" . $partopreno->datoj['ID'], "sendi la informmesag^on", array('faru' => 'sendu_informmesagxon'));
    } else {
        eoecho("Vi ne havas la rajton por elsendi" . " la mesag^on.");
    }
    echo "</p>\n";
}
if ($_REQUEST['faru'] == 'sendu_unuan_konfirmilon') {
    kontrolu_rajton('retumi');
    require_once $prafix . '/iloj/retmesagxiloj.php';
    require_once $prafix . '/tradukendaj_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 konfirmilon:</p><pre>";
    echo eotransformado($teksto, 'utf-8');
    echo "</pre>";
}
if ('sendu_informmesagxon' == $_REQUEST['faru']) {
    kontrolu_rajton('retumi');