function imprimir_dirs($dir)
{
if ($handle = opendir( $dir ))
{
while (false !== ($file = readdir($handle)))
{
if ($file != "." && $file != ".." && $file[0] != ".")
{
$archivo = $dir . "/" .$file;
$fecha_arch = gmdate("M d Y H:i:s",filectime($archivo));
$tam = filesize($archivo);
$ff1 = "<a href='gestion3.php?ver=1&nom=$archivo'>";
$ff2 = "</a>";
if (is_dir($archivo))
{
printf("<tr><td width='410'><p align='left'><strong>$ff1 $file $ff2 </strong><?p><br></td>\n");
}
}
}
closedir($handle);
}
else
{
echo "No se pudo abrir ".$dir;
}
}
function imprimir_files($dir, $n_espacios,$as, $ds)
{
if ($handle = opendir( $dir ))
{
while (false !== ($file = readdir($handle)))
{
if ($file != "." && $file != ".." && $file[0] != ".")
{
$archivo = $dir . "/" .$file;
$fecha_arch = gmdate("M d Y H:i:s",filectime($archivo));
$tam = filesize($archivo);
$link = realpath($archivo);
$ff1 = "<a href='$link'>";
$ff2 = "</a>";
$as++;
if (is_file($archivo))
{
printf("<tr height='10'>
<td width='410'><span class='style2'><div align='left'>$ff1 $file $ff2</div><?span><br></td>
<td width='115'><span class='style2'><div align='right'>$tam bytes</div><?span></td>
<td width='155'><span class='style2'><div align='right'>$fecha_arch</div><?span></td>\n");
}
}
}
closedir($handle);
}
}
?>
to calll
printf("<table width=680 cellspacing=0 border=1 cellpadding=0 align='center'>
<tbody><tr align='center' bgcolor='#dfdfdf'><td> Archivo </td><td> Tamaño </td>
<td> Fecha </td></tr>");
$n_espacios = 0;
imprimir_dirs($nom);
imprimir_files($nom,$n_espacios,$as,$ds);
printf("</tbody></table>");