//##############################################################################
// Einlesen der Bilder aus folgenden Verzeichnissen (Komma getrennte Strings)
$vverzeichnisse = array("../../Torsten_Hansen", "../../Peter_Foschum", "../../Rudolf_Betker", "../../Joachim_Honer");
//##############################################################################
function Dateien_in_Verzeichnis_ausgeben ($verzeichnis, $tiefe, &$ausgabestring){
// Verzeichnis Aufruftiefe auf 20 begrenzen!
$tiefe++;
if ($tiefe > 10):
return;
endif;
//print "
Die Aufruftiefe von $verzeichnis ist: $tiefe!
";
$pfadname = dirname ($verzeichnis);
$dateiname = basename ($verzeichnis);
if ( ($dateiname == ".") OR ($dateiname == "..")):
return;
endif;
$ausgabestring .= "
|
"; //$dateiname
// Verzeichnis öffenen
$dirhandel = opendir ($verzeichnis);
// Alles einlesen
while ($datei =readdir ($dirhandel)):
// Verzeichnisse .. und . ignorieren
if ( ($datei == ".") OR ($datei == "..")):
continue;
endif;
$dateineu = $verzeichnis."/".$datei;
//print "Eingelesen: $dateineu
";
if (is_dir ($dateineu) ):
// Verzeichnis gefunden
//print "Lese Verzeichnis $dateineu ein.
";
Dateien_in_Verzeichnis_ausgeben ($dateineu, $tiefe, $ausgabestring);
endif;
if (is_file ($dateineu) ):
// Datei gefunden
//print "Datei $pfadname/$datei gefunden.
";
$ausgabestring .= "$datei | $dateiname |
";
endif;
endwhile;
closedir ($dirhandel);
//$ausgabestring .= "";
}
$startzeit = date("H:i:s");
print "Tabellenversion - Version 0.1 - $startzeit
";
print "Aktuelle Bilder auf dem Server der Astronomischen Arbeitsgruppe e.V.
";
foreach ($vverzeichnisse as $vverzeichnis) {
$person = basename ($vverzeichnis);
print "
Bilder von $person
";
$ausgabestring =
"
Bild oder Datei |
Verzeichnis |
";
Dateien_in_Verzeichnis_ausgeben ($vverzeichnis, 0, $ausgabestring);
$ausgabestring .=
"
";
$ausgabestring_html = htmlentities ($ausgabestring);
print "$ausgabestring";
}
?>