Ejemplo n.º 1
0
    $f->champValider("go", "action");
    $f->finTable();
    $f->debutTable(HORIZONTAL);
    $f->champTexte("étiquettes :<br>no de ligne (1 &agrave; 7)", ligneimp, "1", 10, 10);
    $f->champTexte("étiquettes :<br>no de colonne (1 ou 2)", colimp, "1", 10, 10);
    if ($PHP_AUTH_USER == "p486735") {
        $f->champTexte("tri alpha(oui-non)<br>liste seulement", trialpha, $trialpha, 5, 5);
    }
    $f->finTable();
    $f->fin();
    $xhtml = Entete();
    $xhtml .= Menu_membre();
    $xhtml .= "<br /><table border=\"0\" bgcolor=\"#EBEBEB\" align=\"center\"><tr><td align='center'>\n";
    $xhtml .= "<a href='instances.php'>Liste des instances et de leur date de mise &agrave; jour</a></td></tr><tr><td>\n";
    $xhtml .= Imprime_titreListe("Liste des membres actifs d'une instance", "titreNavy");
    $xhtml .= $f->Get_formulaire();
    $xhtml .= "</td></tr></table>\n";
    $xhtml .= "</body>\n";
    $xhtml .= "</html>";
    print $xhtml;
    if (strstr(" p486735 p301454 ", $PHP_AUTH_USER)) {
        print Imprime_operation3("<a href='http://www.polymtl.ca/archives/u111/person/majCEPA.php'>regénérer Cocep tous les membres</a><br><br><a href='http://www.polymtl.ca/rensgen/repertoires/instance.php'>pour imprimer les listes mais <b>SANS</b> les adresses compl&egrave;tes et les nos de t&eacute;l&eacute;phone</a>");
    }
} else {
    $connexion = Connexion(USAGER, PASSE, BASE, SERVEUR);
    $requete = "SELECT instance_nom, instance_pweb_mem, instance_notes " . " FROM sgInstances " . " WHERE instance_id = '{$instance_id}' ";
    $resultat2 = ExecRequete($requete, $connexion);
    $ligne = LigneSuivante($resultat2);
    $instance = $ligne->instance_nom;
    $dateMaj = DateNormale($ligne->instance_pweb_mem);
    $instance_notes = $ligne->instance_notes;