Lesen aller *.htm, *.html, *.shtm, *.shtm Dateien in einem Verzeichnis mit beliebig vielen Unterverzeichnissen

Vorteil zur Version files5.php3 ist die sortierte Ausgabe der Dateien!

Beispiel: files6.php3

Code:

<html><body>
<?
//written by Mag. Otto Dolinsek
$z=1;//Zähler auf Null stellen;
function dateien_lesen($dir_name, &$z)
{
 $d = dir($dir_name); 
 while ($file_name = $d->read()) 
 { 
	$test=$dir_name.$file_name;
	if (is_file($test) && (eregi("\.htm|\.shtm|\.html|\.shtml",$file_name)))
	{echo $z." ".$test."</b><br>\n";$z++;}
 }
 $d->close();	
}
function verzeichnisse_lesen($dir_name,&$z)
{
 dateien_lesen($dir_name, &$z);	
 $d = dir($dir_name); 
 while ($file_name = $d->read()) 
 { 
	$test=$dir_name.$file_name."/";
	if (is_dir($test) && $file_name != "." && $file_name != "..") 
	{
		dateien_lesen($test, &$z);
		verzeichnisse_lesen($test,&$z);//rekursive Funktion
	}
 }
 $d->close();
}
echo "<p align=\"center\"><b>Alle Dateien der Homepage mit der Extension *.htm</b></p>";
verzeichnisse_lesen("d:/daten/htdocs/",&$z);
$z--;  
echo "<p align=\"center\"><b>Das sind $z - Dateien mit der Extension *.htm</b></p>";
?>
</body>
</html>