Copy Folder

[matrik02]

How I can copy the folder from one location to another location ?

[Dungeon Keeper]

Copies the contents of folder to another folder

Private Sub Command1_Click()
Dim fso, fldr
Set fso = CreateObject("Scripting.FileSystemObject")
Set fldr = fso.GetFolder("c:\my")
fldr.Copy ("c:\temp")
End Sub

Creates another folder and copies the contents of folder to that new folder

Private Sub Command1_Click()
Dim fso, fldr
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateFolder ("c:\folder")
Set fldr = fso.GetFolder("c:\my")
fldr.Copy ("c:\folder")
End Sub

And in the end

set fso = Nothing
set fldr = Nothing