| Listado de provincias con archivos sonoros |
";
// Se lee cada provincia
while ($buffer=fgets($hndl,4096)){
$titulo=replaceAccents($buffer);
$BASEDIR=trim($dir.'/'.$titulo);
$hndl2=opendir($BASEDIR);
// Se comprueba si la provincia tiene fichas ya subidas
while($file=readdir($hndl2)){
// No se tienen en cuenta ni el . ni el ..
if ($file=='.' || $file=='..' || $file=="PueblosSinSubir.txt")
continue;
$completepath="$BASEDIR/$file";
//Si tiene ficha se escribe
if (is_file($completepath) && $file!="ListadoPueblos.txt"){
if($es_par)
echo '| '.$buffer.' | ';
else
echo ''.$buffer.' |
';
$es_par=($es_par+1)%2;
$contador++;
break;
}
} // end while (archivos de cada provincia)
fclose ($hndl2);
} // end while (provincia)
fclose($hndl);
if (!$es_par)
echo "";
echo "";
// Se imprimen la fecha de ultima modificacion y el pie de pagina
echo 'Última modificación '.date(' j/m/Y, H:i', filemtime ("$fichapath")).'
';
include('plantillas/pie_'.$id.'.inc');
?>