//##############################################################################
// 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){
// 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 = "
";
// 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);
endif;
if (is_file ($dateineu) ):
// Datei gefunden
//print "Datei $pfadname/$datei gefunden.
";
$ausgabestring .= "$datei
";
endif;
endwhile;
closedir ($dirhandel);
$ausgabestring .= "