date.chapril.org-framadate/exportcsv.php

89 lines
2.6 KiB
PHP

<?php
/* This software is governed by the CeCILL-B license. If a copy of this license
* is not distributed with this file, you can obtain one at
* http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
*
* Authors of STUdS (initial project) : Guilhem BORGHESI (borghesi@unistra.fr) and Raphaël DROZ
* Authors of OpenSondage : Framasoft (https://github.com/framasoft)
*
* =============================
*
* Ce logiciel est régi par la licence CeCILL-B. Si une copie de cette licence
* ne se trouve pas avec ce fichier vous pouvez l'obtenir sur
* http://www.cecill.info/licences/Licence_CeCILL_V2.1-fr.txt
*
* Auteurs de STUdS (projet initial) : Guilhem BORGHESI (borghesi@unistra.fr) et Raphaël DROZ
* Auteurs d'OpenSondage : Framasoft (https://github.com/framasoft)
*/
include_once('fonctions.php');
if(!isset($_GET['numsondage']) || ! preg_match(";^[\w\d]{16}$;i", $_GET['numsondage'])) {
header('Location: studs.php');
}
$sql = 'SELECT * FROM user_studs WHERE id_sondage='.$connect->Param('numsondage').' ORDER BY id_users';
$sql = $connect->Prepare($sql);
$user_studs = $connect->Execute($sql, array($_GET['numsondage']));
$dsondage = get_sondage_from_id($_GET['numsondage']);
$nbcolonnes=substr_count($dsondage->sujet,',')+1;
$toutsujet=explode(",",$dsondage->sujet);
#$toutsujet=str_replace("°","'",$toutsujet);
//affichage des sujets du sondage
$input =";";
foreach ($toutsujet as $value) {
if ($dsondage->format=="D"||$dsondage->format=="D+") {
if (strpos($dsondage->sujet,'@') !== false) {
$days=explode("@",$value);
$input.= date("j/n/Y",$days[0]).';';
} else {
$input.= date("j/n/Y",$values).';';
}
} else {
$input.= $value.';';
}
}
$input.="\r\n";
if (strpos($dsondage->sujet,'@') !== false) {
$input.=";";
foreach ($toutsujet as $value) {
$heures=explode("@",$value);
$input.= $heures[1].';';
}
$input.="\r\n";
}
while ( $data=$user_studs->FetchNextObject(false)) {
// Le nom de l'utilisateur
$nombase=str_replace("°","'",$data->nom);
$input.=$nombase.';';
//affichage des resultats
$ensemblereponses=$data->reponses;
for ($k=0;$k<$nbcolonnes;$k++) {
$car=substr($ensemblereponses,$k,1);
if ($car=="1") {
$input.='OK;';
$somme[$k]++;
} else {
$input.=';';
}
}
$input.="\r\n";
}
$filesize = strlen( $input );
$filename=$_GET["numsondage"].".csv";
header( 'Content-Type: text/csv; charset=utf-8' );
header( 'Content-Length: '.$filesize );
header( 'Content-Disposition: attachment; filename="'.$filename.'"' );
header( 'Cache-Control: max-age=10' );
echo $input;
die();