New file |
0,0 → 1,57 |
<?php |
|
include ("../../../../api/jpgraph_1.12.2/jpgraph.php") ; |
include ("../../../../api/jpgraph_1.12.2/jpgraph_line.php") ; |
include ("../../../../api/jpgraph_1.12.2/jpgraph_bar.php"); |
include ("../../../../papyrus/configuration/pap_config.inc.php") ; |
|
include_once 'DB.php' ; |
$db = DB::connect (PAP_DSN) ; |
if (DB::isError($db)) { |
echo 'Message Standard : ' . $db->getMessage() . "\n"; |
echo 'Message DBMS/Utilisateur : ' . $db->getUserInfo() . "\n"; |
echo 'Message DBMS/Déboguage : ' . $db->getDebugInfo() . "\n"; |
exit; |
} |
|
$tab_mois = array('', "Jan","Fev","Mar","Avr","Mai","Juin","Juil","Août","Sep","Oct","Nov","Dec"); |
$tab_donnees = array(0); |
$tps_debut = mktime(0,0,0,1,1); |
$tps_courrant = $tps_debut; |
$tps_fin = time();// jour courrant |
$i = 1; |
//Requete par mois |
while ($tps_courrant <= $tps_fin) { |
//$tps_semaine_suivante = $tps_courrant + (7 * 24 * 60 * 60); |
$tps_mois_suivant = mktime(0,0,0,$i+1,1); |
//echo date('Y-m-d H:i:s', $tps_courrant).' - '.date('Y-m-d H:i:s', $tps_mois_suivant); |
$requete = 'SELECT U_DATE '. |
'FROM annuaire_tela '. |
'WHERE U_DATE >= "'.date('Y-m-d H:i:s', $tps_courrant).'" '. |
'AND U_DATE < "'.date('Y-m-d H:i:s', $tps_mois_suivant).'" '; |
$resultat = $db->query($requete) ; |
$tab_donnees[$i] = $tab_donnees[$i-1] + $resultat->numRows(); |
//echo ' - '.$resultat->numRows().'<br/>'; |
$tps_courrant = $tps_mois_suivant; |
$i++; |
} |
//echo '<pre>'.print_r($tab_donnees, true).'</pre>'; |
|
$graph = new Graph(500,440,"auto"); |
$graph->img->SetMargin(50,50,30,50); |
$graph->SetMarginColor("white"); |
$graph->SetScale('textint'); |
$graph->xaxis->SetTickLabels($tab_mois); |
$graph->SetShadow(); |
$graph->title->Set("Évolution des inscrits au Réseau au ".date('d-m-Y', $tps_fin)); |
$graph->title->SetFont(FF_FONT1,FS_BOLD); |
$graph->xaxis->title->Set("Mois depuis le 1er janvier ".date('Y')); |
|
$LinePlot = new LinePlot($tab_donnees); |
$LinePlot->value->Show(); |
$LinePlot->value->SetFormat("%s"); |
$LinePlot->SetColor("brown") ; |
|
$graph->Add($LinePlot); |
$graph->Stroke(); |
?> |