Passwd d'amministrazione sondaggio errata";
}
}
if ($link=="modifica"){
if(!file_exists("count1.txt")){
$File=fopen("count1.txt","w");
$Tmp1=sprintf("%d",0);
fwrite($File,$Tmp1);
fclose($File);
$Conteggio=0;
}
if(!file_exists("count2.txt")){
$File=fopen("count2.txt","w");
$Tmp2=sprintf("%d",0);
fwrite($File,$Tmp2);
fclose($File);
$Conteggio=0;
}
if(!file_exists("count3.txt")){
$File=fopen("count3.txt","w");
$Tmp3=sprintf("%d",0);
fwrite($File,$Tmp3);
fclose($File);
$Conteggio=0;
}
if(!file_exists("count4.txt")){
$File=fopen("count4.txt","w");
$Tmp4=sprintf("%d",0);
fwrite($File,$Tmp4);
fclose($File);
$Conteggio=0;
}
if(!file_exists("count5.txt")){
$File=fopen("count5.txt","w");
$Tmp5=sprintf("%d",0);
fwrite($File,$Tmp5);
fclose($File);
$Conteggio=0;
}
if ($archivia == V1){
if(!file_exists("con_archivio.txt")){
$File=fopen("con_archivio.txt","w");
$Tmp1=sprintf("%d",1);
fwrite($File,$Tmp1);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("con_archivio.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("con_archivio.txt","w");
$Tmp1=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp1);
fclose($File);
$Fil1=fopen("tit","r");
$leg1 = fread($Fil1,100);
fclose($Fil1);
$Fil2=fopen("dom1","r");
$leg2 = fread($Fil2,100);
fclose($Fil2);
$Fil2a=fopen("count1.txt","r");
$leg2a = fread($Fil2a,100);
fclose($Fil2a);
$Fil3=fopen("dom2","r");
$leg3 = fread($Fil3,100);
fclose($Fil3);
$Fil3a=fopen("count2.txt","r");
$leg3a = fread($Fil3a,100);
fclose($Fil3a);
$Fil4=fopen("dom3","r");
$leg4 = fread($Fil4,100);
fclose($Fil4);
$Fil4a=fopen("count3.txt","r");
$leg4a = fread($Fil4a,100);
fclose($Fil4a);
$Fil5=fopen("dom4","r");
$leg5 = fread($Fil5,100);
fclose($Fil5);
$Fil5a=fopen("count4.txt","r");
$leg5a = fread($Fil5a,100);
fclose($Fil5a);
$Fil6=fopen("dom5","r");
$leg6 = fread($Fil6,100);
fclose($Fil6);
$Fil6a=fopen("count5.txt","r");
$leg6a = fread($Fil6a,100);
fclose($Fil6a);
$archiviazione = "
$leg1
$leg2
$leg2a
$leg3
$leg3a
$leg4
$leg4a
$leg5
$leg5a
$leg6
$leg6a
";
$paginetta = fopen("$Tmp1".".html", "w");
fwrite($paginetta , "$archiviazione");
fclose($paginetta );
if(file_exists("count1.txt")){
$File=fopen("count1.txt","w");
$Tmp1=sprintf("%d",0);
fwrite($File,$Tmp1);
fclose($File);
$Conteggio=0;
}
if(file_exists("count2.txt")){
$File=fopen("count2.txt","w");
$Tmp2=sprintf("%d",0);
fwrite($File,$Tmp2);
fclose($File);
$Conteggio=0;
}
if(file_exists("count3.txt")){
$File=fopen("count3.txt","w");
$Tmp3=sprintf("%d",0);
fwrite($File,$Tmp3);
fclose($File);
$Conteggio=0;
}
if(file_exists("count4.txt")){
$File=fopen("count4.txt","w");
$Tmp4=sprintf("%d",0);
fwrite($File,$Tmp4);
fclose($File);
$Conteggio=0;
}
if(file_exists("count5.txt")){
$File=fopen("count5.txt","w");
$Tmp5=sprintf("%d",0);
fwrite($File,$Tmp5);
fclose($File);
$Conteggio=0;
}
echo "
archiviato";
}
$tit = fopen("tit", "w");
fwrite($tit, "$titolo");
fclose($tit);
$dom1 = fopen("dom1", "w");
fwrite($dom1, "$prim");
fclose($dom1);
$dom2 = fopen("dom2", "w");
fwrite($dom2, "$sec");
fclose($dom2);
$dom3 = fopen("dom3", "w");
fwrite($dom3, "$terz");
fclose($dom3);
$dom4 = fopen("dom4", "w");
fwrite($dom4, "$quart");
fclose($dom4);
$dom5 = fopen("dom5", "w");
fwrite($dom5, "$quint");
fclose($dom5);
echo "
Il sondaggio è stato modificato con
successo";
}
if (!$link){
$File1=fopen("tit","r");
$leggi1 = fread($File1,100);
fclose($File1);
$File2=fopen("dom1","r");
$leggi2 = fread($File2,100);
fclose($File2);
$File3=fopen("dom2","r");
$leggi3 = fread($File3,100);
fclose($File3);
$File4=fopen("dom3","r");
$leggi4 = fread($File4,100);
fclose($File4);
$File5=fopen("dom4","r");
$leggi5 = fread($File5,100);
fclose($File5);
$File6=fopen("dom5","r");
$leggi6 = fread($File6,100);
fclose($File6);
echo "
";
# pulsante radio num.1
if ($Sond == 1){
if(!file_exists("count1.txt")){
$File=fopen("count1.txt","w");
$Tmp1=sprintf("%d",1);
fwrite($File,$Tmp1);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("count1.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("count1.txt","w");
$Tmp1=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp1);
fclose($File);
}
# pulsante radio num.2
if ($Sond == 2){
if(!file_exists("count2.txt")){
$File=fopen("count2.txt","w");
$Tmp2=sprintf("%d",1);
fwrite($File,$Tmp2);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("count2.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("count2.txt","w");
$Tmp2=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp2);
fclose($File);
}
# pulsante radio num.3
if ($Sond == 3){
if(!file_exists("count3.txt")){
$File=fopen("count3.txt","w");
$Tmp3=sprintf("%d",1);
fwrite($File,$Tmp3);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("count3.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("count3.txt","w");
$Tmp3=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp3);
fclose($File);
}
# pulsante radio num.4
if ($Sond == 4){
if(!file_exists("count4.txt")){
$File=fopen("count4.txt","w");
$Tmp4=sprintf("%d",1);
fwrite($File,$Tmp4);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("count4.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("count4.txt","w");
$Tmp4=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp4);
fclose($File);
}
# pulsante radio num.5
if ($Sond == 5){
if(!file_exists("count5.txt")){
$File=fopen("count5.txt","w");
$Tmp5=sprintf("%d",1);
fwrite($File,$Tmp5);
fclose($File);
$Conteggio=0;
}else{
$File=fopen("count5.txt","r");
$Conteggio=fread($File,10);
fclose($File);
}
$File=fopen("count5.txt","w");
$Tmp5=sprintf("%d",$Conteggio+1);
fwrite($File,$Tmp5);
fclose($File);
}
$File1=fopen("count1.txt","r");
$Cont1=fread($File1,10);
fclose($File1);
$File2=fopen("count2.txt","r");
$Cont2=fread($File2,10);
fclose($File2);
$File3=fopen("count3.txt","r");
$Cont3=fread($File3,10);
fclose($File3);
$File4=fopen("count4.txt","r");
$Cont4=fread($File4,10);
fclose($File4);
$File5=fopen("count5.txt","r");
$Cont5=fread($File5,10);
fclose($File5);
$perc = (100/($Cont1+$Cont2+$Cont3+$Cont4+$Cont5));
$val1 = ($Cont1*$perc);
$val2 = ($Cont2*$perc);
$val3 = ($Cont3*$perc);
$val4 = ($Cont4*$perc);
$val5 = ($Cont5*$perc);
echo "
Risultati
$leggi2
$leggi3
$leggi4
$leggi5
$leggi6
";
}
?>
|
$leg1 |
|
| $leg2 | $leg2a |
| $leg3 | $leg3a |
| $leg4 | $leg4a |
| $leg5 | $leg5a |
| $leg6 | $leg6a |
|
Risultati |
|
| $leggi2 | |
| $leggi3 | |
| $leggi4 | |
| $leggi5 | |
| $leggi6 | |