Visual Basic - COPIAR CARPETAS CON SUBCARPETAS URGENTE!

hola a todos......AYUDENME PORFAVOOOR!!! Necesito copiar una carpeta con todo y sus subcarpetas (y si se puede las subcarpetas de las subcarpetas) por medio de VB. He probado con el FileCopy pero solo puedo copiar la carpeta y los archivos dentro de ella pero no copia las subcarpetas...........alguien sabe como ? yo se que se puede pero no se como......AYUDENME! necesito hacer este programita URGENTEMENTE! gracias....luiyi.

Hola luiyi,

Revisa este codigo, primero levantas la referencia a Microsoft Scripting Runtime y

Dim objFSO As New Scripting.FileSystemObject
Call objFSO.CopyFolder("c:\Origen", "c:\Destino")
Set objFSO = Nothing

Listo, copia todo lo que tengas en Origen

Saludos!!!