Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - krisor

#11
PHP / Ayuda, ver y borrar archivos
22 Julio 2009, 18:56 PM
Holap, soy nuevo por aqui, paso por recomendacion ^^

Mi caso es, tengo dos codes, uno para ver archivos de un directorio y otro para eliminar archivos, concretamente, el que este puesto en el .php. Lo que quisiera es, que al escribir, por ejemplo, www.webweb.com/cajon/borrar.php, muestre los archivos que hay en dichi directorio y que al seleccionar uno, se borre, seria eso posible?

Os pongo los codes:

-Para borrar

<?php
if (file_exists("/temp/aviso.bmp")) {
  
unlink("/temp/aviso.bmp");
  print(
"File removed.\n");
} else {
  print(
"File does not exist.\n");
}
?>



-Para ver los archivos

<?php
function getFiles($path) {
$files = array();
$fileNames = array();
$i 0;

if (
is_dir($path)) {
if (
$dh opendir($path)) {
while ((
$file readdir($dh)) !== false) {
if (
$file == "." || $file == ".." || $file == "index.php" || $file == "passwords.txt") continue;
$fullpath $path "/" $file;
$fkey strtolower($file);
while (
array_key_exists($fkey,$fileNames)) $fkey .= " ";
$a stat($fullpath);
$files[$fkey]['size'] = $a['size'];
if (
$a['size'] == 0$files[$fkey]['sizetext'] = "-";
else if (
$a['size'] > 1024$files[$fkey]['sizetext'] = (ceil($a['size']/1024*100)/100) . " Kb";
else if (
$a['size'] > 1024*1024$files[$fkey]['sizetext'] = (ceil($a['size']/(1024*1024)*100)/100) . " Mb";
else 
$files[$fkey]['sizetext'] = $a['size'] . " bytes";
$files[$fkey]['name'] = $file;
$files[$fkey]['type'] = filetype($fullpath);
$fileNames[$i++] = $fkey;
}
closedir($dh);
} else die (
"No pudo abrirse el directorio: $path");
} else die (
"La ruta no es un directorio: $path");
sort($fileNames,SORT_STRING);
$sortedFiles = array();
$i 0;
foreach(
$fileNames as $f$sortedFiles[$i++] = $files[$f];

return 
$sortedFiles;
}

$files getFiles("./");
foreach (
$files as $file) print "&nbsp;&nbsp;&nbsp;&nbsp;<b><a href=\"$file[name]\">$file[name]</a></b><br>\n";
}
    
?>


Espero puedan ayudarme, saludos ^^