-->
</style
EOD;
print Html3("haut", $action, $css);
if (!isset($instances)) {
$instances = "cad cex add cco cac cet cre cai cve";
}
$f = new Formulaire("POST", "mem_postes.php", FALSE, "Form");
$f->debutTable(HORIZONTAL);
// $instances = "cad cex add cco cac cet cre cai cve";
$f->champTexte("entrez une ou plusieurs instances (séparées par un espace) <a href='http://www.polymtl.ca/archives/membres/instances_adr_c.php' style='color:blue;'>retour à mem</a><br><span style='font-size:smaller; font-weight:normal;'>enlever, ci-dessous, les instances qui ne sont pas nécessaires </span>", instances, $instances, 85, 85);
$f->champValider("mem-postes", "action");
$f->finTable();
$f->fin();
$reqSel = "SELECT cp.nom, " . " cp.prenom, " . " ins.instance_id, " . " pos.sgiPoste_no, " . " pos.sgiPoste_nom, " . " aff.date_arrivee, " . " aff.date_depart " . " FROM sgiAffec as aff, " . " sgInstances as ins, " . " sgiPostes as pos, " . " cPerson as cp " . " WHERE aff.sgiPoste_id = pos.sgiPoste_id " . " AND aff.instance_id = ins.instance_id " . " AND aff.cPerson_id = cp.cPerson_id " . " AND aff.instance_id = ins.instance_id " . " AND INSTR('{$instances}', aff.instance_id) " . " ORDER by cp.nom ASC, " . " cp.prenom, " . " date_arrivee ASC ";
$resSel = $bd->execRequete($reqSel);
print "<table width='950' border='1' cellpadding='2' cellspacing='0'>";
print " <tr>";
print " <th>nom</th>";
print " <th>prénom</th>";
print " <th>ins</th>";
print " <th>no</th>";
print " <th>poste nom</th>";
print " <th>début</th>";
print " <th>fin</th>";
print " </tr>";
$nomTemp = "xxxxx";
while ($per = $bd->objetSuivant($resSel)) {
$nomPre = $per->nom . $per->prenom;
if ($nomPre != $nomTemp) {
if ($couleur == "#EBEBEB") {
$f->champValider("envoyer les courriels", "action");
$f->champCache(msgFinal, $msgFinal);
$f->champCache(titreFinal, $titreFinal);
$f->champCache(instance, $instance);
$f->finTable();
$f->fin();
print "</td></tr></table>\n";
print Html3("bas");
break;
case "envoyer les courriels":
//----------------------------------------------------
$organisme = "Archives Polytechnique";
$emetteur = "*****@*****.**";
$header = "MIME-Version : 1.0\r\r\n";
$header .= "Content-type: text/html; charset=iso-8859-1\r\r\n";
$header .= "From: {$organisme} <{$emetteur}>\r\r\n";
$msgFinal = stripslashes($msgFinal);
$titreFinal = stripslashes($titreFinal);
$bd = new BD(USAGER, PASSE, BASE, SERVEUR);
$reqMemad = "SELECT * FROM usagers_acces as usa, usagers as us " . " WHERE notif_pv > '0' " . " AND no_unite LIKE '%memad%' " . " AND us.no_usager = usa.no_usager " . " ORDER BY nomPrenom_usager ";
$resultat = $bd->execRequete($reqMemad);
while ($ligne = $bd->objetSuivant($resultat)) {
$msgFinal2 = $msgFinal . $msgFin;
mail($ligne->email_usager, $titreFinal, $msgFinal2, $header, "-f {$emetteur}");
}
$bd->quitter();
$url = "Location: http://www.polymtl.ca/archives";
header($url);
exit;
break;
}
