txetxo
21 de Noviembre del 2003

Hola

Tengo que hacer una aplicacion para hacer copias del contenido de una carpeta y dejarlo en otra ubicacion, he metido un DirListBox, pero no se como hacer para capturar la ruta de la carpeta seleccionda, y no puedo copiar archivo por archivo porque puede que la carpeta tenga muchos archivos.

¿Alguien me puede ayudar?

Muchas gracias de antemano.

sdemingo
21 de Noviembre del 2003

Hola,

Utiliza el filesystemobject

dim fs as object

set fs = createobject("scripting.filesystemobject")

fs.copyfolder origen , destino

Un saludo
sdemingo

sdemingo
21 de Noviembre del 2003

También puedes copiar solo los archivos

fs.copyfile origen & "*.*", destino