function listar_ficheros (
$carpeta){
// Comprobamos que la carpeta existe
if (
is_dir (
$carpeta)){
// Escaneamos la carpeta usando scandir
$scanarray =
scandir (
$carpeta);
echo ¨<table>
<tr>
<td><strong>Nombre</strong></td>
<td><strong>Ext</strong></td>
<td><strong>Tamaño</strong></td>
</tr>¨;
for (
$i = 0;
$i <
count (
$scanarray);
$i++){
// Eliminamos ¨.¨ and ¨..¨ del listado de ficheros
if (
$scanarray[
$i] != ¨.¨ &&
$scanarray[
$i] != ¨..¨){
// No mostramos los subdirectorios
if (
is_file (
$carpeta . ¨/¨ .
$scanarray[
$i])){
// Verificamos que la extension se encuentre en $tipos
echo ¨<tr>¨;
$thepath =
pathinfo (
$carpeta . ¨/¨ .
$scanarray[
$i]);
echo ¨<td>¨.
$scanarray[
$i].¨</td>¨;
echo ¨<td>¨.
$thepath[´extension´].¨</td>¨;
echo ¨<td>¨.
formato_tam (
filesize (
$carpeta . ¨/¨ .
$scanarray[
$i]));
echo ¨</tr>¨;
}
}
}
echo ¨</table>¨;
}
else {
echo ¨La carpeta no existe¨;
}
}
function formato_tam (
$size,
$precision = 0) {
$sizes =
array (´Tb´, ´Gb´, ´Mb´, ´Kb´, ´bytes´);
$total =
count (
$sizes);
while (
$total-- &&
$size > 1024)
$size /= 1024;
return round (
$size,
$precision).¨ ¨.
$sizes[
$total];
}
Por kelvet
