read()):
if (Is_Dir($polozka) and $polozka !="." and $polozka !=".."):
$pp[] = $polozka ;
endif;
endwhile;
$adresar->close();
$ppv = array_values(array_diff ($pp, $oa));
?>
Fotoalba:";
for ($i = 0; $i < Count ($ppv); $i++):
echo "
• $ppv[$i] ";
endfor;
?>
Další možnosti:
UPLOAD FOTEK
read()):
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$date = ("./$cesta/" .$polozka); ////////////////////////////////////////// zde smažte slůvko filemtime pokud vám řazení podle data dělá problémy!!!
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pp[$date] = $polozka;
endwhile;
$adresar->close();
ksort($pp);
$polepolozek = array_values($pp);
for ($i = 0; $i < Count ($polepolozek); $i++):
$cast = explode(".", $polepolozek[$i]);
for ($j = 0; $j < Count ($cast); $j++):
if (($cast[$j]=="jpg" or $cast[$j]=="JPG") && $cast[$j+1]!="thumb" && $cast[$j+2]!="jpeg"):
$polejpegu[] = $polepolozek[$i];
endif;
endfor;
endfor;
for ($i = 0; $i < Count ($polejpegu); $i++):
$puvodniobrazek=$polejpegu[$i];
if (!file_exists("./$cesta/$puvodniobrazek.thumb.jpeg")):
$sirka=$sirkaPom;
$dataobrazku = getimagesize("./$cesta/".$puvodniobrazek);
if ($sirka && ($dataobrazku[0] < $dataobrazku[1])):
$sirka = ($vyska / $dataobrazku[1]) * $dataobrazku[0];
else:
$vyska = ($sirka / $dataobrazku[0]) * $dataobrazku[1];
endif;
$nahled = ImageCreateTrueColor($sirka,$vyska);
$obrazek = ImageCreateFromJpeg("./$cesta/".$puvodniobrazek);
imagecopyResampled ($nahled, $obrazek, 0, 0, 0, 0, $sirka, $vyska, $dataobrazku[0], $dataobrazku[1]);
ImageJpeg($nahled, "./$cesta/" .$puvodniobrazek .".thumb.jpeg", 70);
$obrazek="";
endif;
endfor;
for ($i = 0; $i < Count ($polejpegu); $i++):
$puvodniobrazek=$polejpegu[$i];
$dataobrazku = getimagesize("./$cesta/".$puvodniobrazek);
if ($dataobrazku[0] < $velkasirka2): $velkasirka=$dataobrazku[0];
else: $velkasirka=$velkasirka2;
endif;
if ($obrazek == $polejpegu[$i]):
?>
![](\"".$cesta)
";
endif;
endfor;
$strana = Ceil(Count($polejpegu)/$trid);
?>
ZPĚT NA SEZNAM ALB
Vítejte,
zde můžete do fotogalerie vložit libovolnou fotografii, prosím dodržujte následující:
vkládací skript automaticky zmenší fotku na šírku 1024 pixelů
komentář k fotografii budete moc přidat později (jako ke každé jiné)
Nezapomeňte vyplnit název adresíře, který bude zároveň názvem alba do kterého se fotografie nahrají
Pokud máte problém s nahráváním obrázků, zkuste jich nahrát menší počet najednou, případně obrázky zmenšit...
read()):
if (Is_Dir($polozka) and $polozka !="." and $polozka !=".."):
$pp[] = $polozka ;
endif;
endwhile;
$adresar->close();
$ppv = array_values(array_diff ($pp, $oa));
echo " Již existující adresáře: (fotky můžete nahrát do již existujícího nebo vytvořit úplně nový):
";
for ($i = 0; $i < Count ($ppv); $i++):
echo " • $ppv[$i] ";
endfor;
?>
ZPĚT NA SEZNAM ALB
read()):
if (Is_Dir($polozka) and $polozka !="." and $polozka !=".."):
$pp[] = $polozka ;
endif;
endwhile;
$adresar->close();
$ppv = array_values(array_diff ($pp, $oa));
?>
";
?>
read()):
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$date = ("./$cesta/" .$polozka); ////////////////////////////////////////// zde smažte sluvko filemtime pokud vám oazení podle data dilá problémy!!!
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pp[$date] = $polozka;
endwhile;
$adresar->close();
ksort($pp);
$polepolozek = array_values($pp);
for ($i = 0; $i < Count ($polepolozek); $i++):
$cast = explode(".", $polepolozek[$i]);
for ($j = 0; $j < Count ($cast); $j++):
if (($cast[$j]=="jpg" or $cast[$j]=="JPG") && $cast[$j+1]!="thumb" && $cast[$j+2]!="jpeg"):
$polejpegu[] = $polepolozek[$i];
endif;
endfor;
endfor;
for ($i = 0; $i < Count ($polejpegu); $i++):
$puvodniobrazek=$polejpegu[$i];
if (!file_exists("./$cesta/$puvodniobrazek.thumb.jpeg")):
$sirka=$sirkaPom;
$dataobrazku = getimagesize("./$cesta/".$puvodniobrazek);
if ($sirka && ($dataobrazku[0] < $dataobrazku[1])):
$sirka = ($vyska / $dataobrazku[1]) * $dataobrazku[0];
else:
$vyska = ($sirka / $dataobrazku[0]) * $dataobrazku[1];
endif;
$nahled = ImageCreateTrueColor($sirka,$vyska);
$obrazek = ImageCreateFromJpeg("./$cesta/".$puvodniobrazek);
imagecopyResampled ($nahled, $obrazek, 0, 0, 0, 0, $sirka, $vyska, $dataobrazku[0], $dataobrazku[1]);
ImageJpeg($nahled, "./$cesta/" .$puvodniobrazek .".thumb.jpeg", 70);
$obrazek="";
endif;
endfor;
for ($i = 0; $i < Count ($polejpegu); $i++):
$puvodniobrazek=$polejpegu[$i];
$dataobrazku = getimagesize("./$cesta/".$puvodniobrazek);
if ($dataobrazku[0] < $velkasirka2): $velkasirka=$dataobrazku[0];
else: $velkasirka=$velkasirka2;
endif;
if ($obrazek == $polejpegu[$i]):
?>
";
$z=$idprispevek-1;
if ($z > 0):
$f=$j-1;
echo " << předchozí ";
endif;
$y=$idprispevek+1;
if ($y <= count($polejpegu)):
$g=$j+1;
echo " >> další ";
endif;
echo "
";
$strana = Ceil(Count($polejpegu)/$trid);
for ($x=1;$x<=$strana;$x++):
$e=$x-1;
echo "" . ($x*$trid-($trid-1)) . " ";
endfor;
echo"
Aktuální fotografie : " .($idprispevek*$trid-($trid-1)) ."
";
echo "";
echo "";
endif;
endfor;
echo "kliknutí na obrázek jej zobrazí v plné velikosti";
?>
komentáře
$jmeno";
$koment = HTMLSpecialChars($koment);
$koment = Trim($koment);
$koment = Str_Replace("\n","
", $koment);
$slovo = Split("[[:blank:]]+", $koment);
for($y=0;$y
", $koment);
$koment = Str_Replace("</b>", "", $koment);
$koment = Str_Replace("<i>", "", $koment);
$koment = Str_Replace("</i>", "", $koment);
$koment = Str_Replace("<u>", "", $koment);
$koment = Str_Replace("</u>", "", $koment);
$koment = "$koment
";
$cesta2 = " \n";
$ip = "";
$write = StripSlashes($ip .$jmeno .$koment .$cesta2); //odstraneni koncu radku
if (File_Exists ("galerie-data.dat")):
$fp = FOpen ("galerie-data.dat", "r");
$zaloha = File ("galerie-data.dat");
if (Count($zaloha)>10):
copy ("galerie-data.dat", "galerie-data.dat.zaloha");
endif;
$data = FRead ($fp, FileSize("galerie-data.dat"));
FClose($fp);
endif;
$fp = FOpen ("galerie-data.dat", "w");
FWrite ($fp, $write.$data);
FClose($fp);
?> Komentář odeslán!
";
?>
Nahrávání fotek:
";
else:
echo "Prosim jenom soubory ve formatu .jpg
";
endif;
else:
if ($fotoupload_type=="image/jpeg" or $fotoupload_type=="image/pjpeg"):
copy ($fotoupload, "./$dir/$cislo$cislo2.jpg");
else:
echo "Prosim jenom soubory ve formatu .jpg";
endif;
$sirka=1024;
$vyska=768;
if ($sirka && ($dataobrazku[0] < $dataobrazku[1])):
$sirka = ($vyska / $dataobrazku[1]) * $dataobrazku[0];
else:
$vyska = ($sirka / $dataobrazku[0]) * $dataobrazku[1];
endif;
$nahled = ImageCreateTrueColor($sirka,$vyska);
$obrazek = ImageCreateFromJpeg("./$dir/$cislo$cislo2.jpg");
imagecopyResampled ($nahled, $obrazek, 0, 0, 0, 0, $sirka, $vyska, $dataobrazku[0], $dataobrazku[1]);
ImageJpeg($nahled, "./$dir/$cislo$cislo2.jpg", 85);
echo "Soubor byl uspesne nahran
";
endif;
else: echo "Špatné heslo
";
endif;
else: echo "Nezvoleno žádné foto nebo nezadán název adreáře
";
endif;
}
?>
>>>POKRAČOVAT V NAHRÁVÁNÍ
ZPĚT NA SEZNAM ALB