function nacti ($cesta)
{
$velikost = filesize ($cesta);
$soubor = fopen ($cesta, "r");
$retezec = @fread ($soubor, $velikost);
fclose ($soubor);
$data = unserialize ($retezec);
return $data;
}
?>
$adresar = opendir ("kniha");
$soubory = array ();
while ($zaznam = readdir ($adresar))
{
if ($zaznam != "." && $zaznam != "..")
{
$soubory [] = $zaznam;
}
}
closedir ($adresar);
sort ($soubory);
reset ($soubory);
$first = true;
if ($soubory [0] != "")
{
do
{
if (!$first)
{
echo "
";
}
$data = nacti ("kniha/".current ($soubory));
$datum = number_format(substr (current ($soubory), 8, 2)).". ".number_format(substr (current ($soubory), 5, 2)).". ".substr (current ($soubory), 0, 4);
echo "
".$data ["uzivatel"]." ".$datum."
".$data ["text"]."
";
$first = false;
}
while (next ($soubory));
}
else
{
echo "
V návštěvní knize nejsou zatím žádné příspěvky.
";
}
?>