550708_es-ES

liliconcom

¿Cómo eliminar todos los archivos de una carpeta?

Una carpeta no contiene carpetas sino varios archivos.
¿Cómo puedo eliminar estos archivos usando JSL?

Debido a que esta carpeta está ocupada por otros niveles, no se puede lograr eliminando la carpeta.

rd1=Delete Directory(dir);rc1=Create Directory(dir);

 

¡Gracias!

secuencias de comandosventanasRe: ¿Cómo eliminar todos los archivos de una carpeta?

Para mí, el directorio se elimina incluso si tiene archivos. ¿Quizás algunos de sus archivos todavía se están usando?

Names Default To Here(1);

dir_path = "$TEMP\test\";

If(!Directory Exists(dir_path),
 Create Directory(dir_path);
 new_file = Save Text File(dir_path || "DeleteMe.txt", "The quick brown fox");
 new_file = Save Text File(dir_path || "DeleteMe2.txt", "The quick brown fox");
);

wait(1);
Show(Directory Exists(dir_path));
Show(Files In Directory(dir_path));
Show(File Exists(new_file));

Delete Directory(dir_path);

wait(1);

Show(File Exists(new_file));
Show(Directory Exists(dir_path));

Re: ¿Cómo eliminar todos los archivos de una carpeta?

Si solo desea eliminar los archivos, aquí hay una modificación en @jthi código para hacer eso

Names Default To Here( 1 );

dir_path = "$TEMP\test\";

If( !Directory Exists( dir_path ),
 Create Directory( dir_path );
 new_file = Save Text File(
  dir_path || "DeleteMe.txt",
  "The quick brown fox"
 );
 new_file = Save Text File(
  dir_path || "DeleteMe2.txt",
  "The quick brown fox"
 );
);

Wait( 1 );

// Get the files in the folder
the_Files = Files In Directory( dir_path );

For Each( {file}, the_files, rc = Delete File( dir_path || file ) );

Show( Files In Directory( dir_path ) );

Re: ¿Cómo eliminar todos los archivos de una carpeta?

¡Gracias!

 

Ya no puedo usar Windows 7.

Asegúrese de utilizar JMP 16.

Poderoso para cada uno ()

For Each( {file}, the_files, rc = Delete File( dir_path || file ) );