getMessage ());
// Si mode DEBUG, on affiche la connexion est OK
if ($DEBUG == 1)
echo "La base ".$dsn['database']." est connectée.
";
// Récupération des variables collectivites
$res = $db -> query ($sql_collectivite);
if (DB :: isError ($res))
die ($res -> getMessage ()."erreur ".$sql_collectivite);
$k = 0;
while ($row =& $res -> fetchRow ()) {
$ville = $row [0];
$logo = $row [1];
$nom = $row [2];
}
$res -> free ();
// Récupération des informations sur les droits de l'utilisateur
$sql = "select profil from droit where droit = '".$obj."'";
$droit = $db -> getOne ($sql);
// Header HTML
echo "\n";
echo "
";
include("../dyn/entete.inc");
echo "\n";
// Fichier reqmo
if (file_exists ("../sql/".$dsn['phptype']."/".$obj.".reqmo.inc"))
include ("../sql/".$dsn['phptype']."/".$obj.".reqmo.inc");
else
$obj = "";
if ($_SESSION ['profil'] >= $droit && $_SESSION ['profil'] > 0 && $obj != "") {
if ($validation == 0) {
//
$validation = 1;
//
echo "\n";
// Titre
$ent = "Requêteur -> ".ucwords($obj)."";
if (preg_match ("@->@", $ent))
$ent = str_replace ("->", "", $ent);
echo "\t";
echo $ent;
echo "
\n";
// Aide
$ico = "ico_pdf.png";
echo "\t\n";
// affichage
echo "";
echo "
";
echo "".$reqmo["libelle"]." |
";
echo "
";
// Inclusion du menu
include_once ("../dyn/menu.inc");
} else {
// ************************
// validation = 1
// affichage de la requete
// ou fichier csv
// ************************
// remplacement des zones paramétrées
$temp = explode("[",$reqmo["sql"]);
// lecture des champs saisies et remplacement dans la requete
for($i=1;$i pas de champ donc *
//$reqmo['sql']=str_replace("[".$temp1[0]."]",'',$reqmo['sql']);
}
//
}else{
// remplacement par le parametre text ou select
$reqmo['sql']=str_replace("[".$temp1[0]."]",$temp2,$reqmo['sql']);
}
// re initialisation
$temp1[0]="";
}
// controle syntaxe suite suppression d un champ
// double virgule si suppression d un champ
$blanc=0;
$temp="";
// controle de la chaine sql => pour reperer les caracteres de la chaine
// et les eliminer
//for($i=0;$i";
//}
// enleve blanc (32) + retour charriot (10 et 13)
// pour permettre un controle de syntaxe
for($i=0;$iquery($reqmo['sql']);
if (DB :: isError($res))
die($res->getDebugInfo());//."erreur
".$reqmo['sql']);
else{
$info=$res->tableInfo();
// affichage de la requete
echo "\n";
// *** cas tableau
if ($sortie =='tableau'){
echo "";
foreach($info as $elem){
echo "".$elem['name']." | ";
}
echo "
";
while ($row=& $res->fetchRow()){
echo "";
$i=0;
foreach($row as $elem){
if (is_numeric($elem))
echo "";
else
echo " | ";
echo $elem." | ";
$i++;
}
echo "
";
}
echo "
";
//
}else{
// *** cas fichier csv
$inf="";
foreach($info as $elem){
echo $elem['name'].$separateur;
$inf=$inf.$elem['name'].$separateur;
}
echo "
";
$inf=$inf."\n";
while ($row=& $res->fetchRow()){
$i=0;
foreach($row as $elem){
echo $elem.$separateur;
$inf=$inf.$elem.$separateur;
$i++;
}
echo "
";
$inf=$inf."\n";
}
$nom_fichier="../tmp/export_".$obj.".csv";
$fic = fopen($nom_fichier,"w");
fwrite($fic,$inf);
//fermeture du fichier
fclose($fic);
echo "
".$obj." exporté.(e)
";
echo "Fichier Export ";
}
}
}
} else {
//
echo "\n";
// Titre
$ent = "Requêteur -> ".ucwords($obj)."";
if (preg_match ("@->@", $ent))
$ent = str_replace ("->", "", $ent);
echo "\t";
echo $ent;
echo "
\n";
// Aide
$ico = "ico_pdf.png";
echo "\t\n";
//
echo "\t\n";
// Inclusion du menu
include_once ("../dyn/menu.inc");
}
// Déconnexion de la bdd
$db -> disconnect ();
// Si mode DEBUG, on affiche que la base est déconnectée
if ($DEBUG == 1)
echo "La base ".$dsn['database']." est déconnectée.
";
// Footer HTML
echo "\n";
echo "\n";
?>