A ver si te sirve esto.
CopyFolder - El método CopyFolder copia una carpeta entera y sus
subcarpetas. La sintaxis es:
oFSO = CREATEOBJECT("Scripting.FileSystemObject")
oFSO.CopyFolder(< carpeta origen >, < carpeta destino >, [ sobreescribir ])
Los parámetros de carpeta origen y destino son cadenas. Como se ve arriba,
el parámetro sobrescribir es opcional, con el valor por omisión siendo .T.
Note que si la carpeta destino es de sólo lectura, ocurrirá un error. Es
más, se producirá error si el destino es un archivo existente o si existen
archivos en la carpeta destino con el mismo nombre y sobrescribir está en
.F.
Ariel Luna
De: [email protected] [mailto:[email protected]] En nombre de Mutual Club Union
Enviado el: Jueves, 18 de Junio de 2009 10:23 a.m.
Para: GUFA List Member
Asunto: [GUFA] Copiar Carpetas y subcarpetas
Norberto :
Con wsh lo hacés fácil....
No tengo ningún ejemplo a mano, pero buscalo en portalfox que vas a
encontrar un monton...
Saludos.
César.-
From: Norberto <mailto:[email protected]> Mario Alvarez
Sent: Tuesday, June 16, 2009 5:39 PM
To: GUFA List Member <mailto:[email protected]>
Subject: [GUFA] Copiar Carpetas y subcarpetas
Estimados colisteros, tengo que hacer un proceso desde VFP que me permita
copiar a partir de distintas carpetas todas sus subcarpetas y ficheros. O
sea desde un destino hacia un origen y luego Viceversa. Alguien me puede
tirar una idea, ya que se me quemó el cerebro. Desde ya muchas gracias
Norberto Alvarez
Socio # 1892
