Subversion Repositories Sites.tela-botanica.org

Rev

Rev 255 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 255 Rev 257
Line 12... Line 12...
12
    echo 'Message DBMS/Utilisateur : ' . $db->getUserInfo() . "\n";
12
    echo 'Message DBMS/Utilisateur : ' . $db->getUserInfo() . "\n";
13
    echo 'Message DBMS/Déboguage   : ' . $db->getDebugInfo() . "\n";
13
    echo 'Message DBMS/Déboguage   : ' . $db->getDebugInfo() . "\n";
14
    exit;
14
    exit;
15
}
15
}
Line 16... Line 16...
16
 
16
 
17
$tab_mois = array("Jan","Fev","Mar","Avr","Mai","Juin","Juil","Août","Sep","Oct","Nov","Dec");
17
$tab_mois = array('Jan', 'Fev', 'Mar', 'Avr', 'Mai', 'Juin', 'Juil', 'Août', 'Sep', 'Oct', 'Nov', 'Dec');
18
$tab_donnees_add = array() ;
18
$tab_donnees_add = array() ;
-
 
19
$tab_donnees_del = array() ;
-
 
20
if (isset($_GET['annee'])) {
-
 
21
	$tps_debut = mktime(0, 0, 0, 1, 1, $_GET['annee']);
-
 
22
	$tps_fin = mktime(23, 59, 59, 12, 31, $_GET['annee']);
-
 
23
	$annee = $_GET['annee'];
19
$tab_donnees_del = array() ;
24
} else {
-
 
25
	$tps_debut = mktime(0, 0, 0, 1, 1);
-
 
26
	$tps_fin = time();// jour courrant
-
 
27
	$annee = date('Y', $tps_fin);
20
$tps_debut = mktime(0,0,0,1,1);
28
}
21
$tps_courrant = $tps_debut;
-
 
22
$tps_fin = time();// jour courrant
29
$tps_courrant = $tps_debut;
23
$i = 0;
30
$i = 0;
24
//Requete par mois
31
//Requete par mois
25
while  ($tps_courrant <= $tps_fin) {
32
while  ($tps_courrant <= $tps_fin) {
26
	$tps_semaine_suivante = $tps_courrant + (7 * 24 * 60 * 60);
33
	$tps_semaine_suivante = $tps_courrant + (7 * 24 * 60 * 60);
27
	$tps_mois_suivant = mktime(0,0,0,$i+2,1);
34
	$tps_mois_suivant = mktime(0, 0, 0,$i+2, 1, $annee);
28
	//echo date('Y-m-d H:i:s', $tps_courrant).' - '.date('Y-m-d H:i:s', $tps_mois_suivant);
35
	//echo date('Y-m-d H:i:s', $tps_courrant).' - '.date('Y-m-d H:i:s', $tps_mois_suivant);
29
	$requete = 	'SELECT IS_ACTION '.
36
	$requete = 	'SELECT IS_ACTION '.
30
				'FROM ins_STATS '.
37
				'FROM ins_STATS '.
31
				'WHERE IS_DATE >= "'.date('Y-m-d H:i:s', $tps_courrant).'" '.
38
				'WHERE IS_DATE >= "'.date('Y-m-d H:i:s', $tps_courrant).'" '.
Line 41... Line 48...
41
	$tps_courrant = $tps_mois_suivant;
48
	$tps_courrant = $tps_mois_suivant;
42
	$i++;
49
	$i++;
43
}
50
}
Line 44... Line 51...
44
 
51
 
45
// Création du graphique
52
// Création du graphique
46
$graph = new Graph(500,400,"auto"); 
53
$graph = new Graph(500, 400, 'auto'); 
47
$graph->img->SetMargin(30,30,30,40);   
54
$graph->img->SetMargin(30, 30, 30, 40);   
48
$graph->SetMarginColor("white");  
55
$graph->SetMarginColor('white');  
49
$graph->SetScale('textint');
56
$graph->SetScale('textint');
50
$graph->xaxis->SetTickLabels($tab_mois); 
57
$graph->xaxis->SetTickLabels($tab_mois); 
51
$graph->SetShadow(); 
58
$graph->SetShadow(); 
52
$graph->title->Set("Évolution des inscriptions au Réseau"); 
59
$graph->title->Set('Évolution des inscriptions au Réseau'); 
53
$graph->title->SetFont(FF_FONT1,FS_BOLD); 
60
$graph->title->SetFont(FF_FONT1,FS_BOLD); 
54
$graph->xaxis->title->Set("Mois depuis le 1er janvier ".date('Y'));
61
$graph->xaxis->title->Set("Mois depuis le 1er janvier $annee");
55
$graph->legend->SetLayout(LEGEND_HOR);
62
$graph->legend->SetLayout(LEGEND_HOR);
Line 56... Line 63...
56
$graph->legend->Pos(0.5, 0.05, 'left', 'top'); 
63
$graph->legend->Pos(0.5, 0.05, 'left', 'top'); 
57
 
64
 
58
// Création des barres
65
// Création des barres
59
$BarPlotAdd = new BarPlot($tab_donnees_add); 
66
$BarPlotAdd = new BarPlot($tab_donnees_add); 
60
$BarPlotAdd->SetFillColor("orange");
67
$BarPlotAdd->SetFillColor('orange');
61
$BarPlotAdd->value->Show();
68
$BarPlotAdd->value->Show();
Line 62... Line 69...
62
$BarPlotAdd->value->SetFormat("%s"); 
69
$BarPlotAdd->value->SetFormat('%s'); 
63
$BarPlotAdd->SetLegend ('Inscription'); 
70
$BarPlotAdd->SetLegend ('Inscription'); 
64
 
71
 
65
$BarPlotDel = new BarPlot($tab_donnees_del); 
72
$BarPlotDel = new BarPlot($tab_donnees_del); 
66
$BarPlotDel->SetFillColor("green");
73
$BarPlotDel->SetFillColor('green');
Line 67... Line 74...
67
$BarPlotDel->value->Show();
74
$BarPlotDel->value->Show();
68
$BarPlotDel->value->SetFormat("%s"); 
75
$BarPlotDel->value->SetFormat('%s'); 
69
$BarPlotDel->SetLegend ('Désinscription');
76
$BarPlotDel->SetLegend ('Désinscription');