$dir = getcwd();
echo " Directorio Actual: $dir
";
echo "
";
if ($cd = opendir($dir)) {
while ($file=readdir($cd)){ // files: arreglo con los nombres de archivo
if (!preg_match("/^index.php$|^\.$/i",$file)){
$files[]=$file;
}
}
closedir($cd);
sort($files); // ordenación alfabética
foreach ($files as $f){ // los archivos se listan como links a si mismos
if (strpos($f, 'LCK') == false && strpos($f, 'htaccess') == false) print(" $f
");
}
} else {
echo "No se puede abrir $dir.
";
}
echo "
";
echo " Indice creado con PHP
FaMAF 28-11-2006
"
?>