[RESOLVED] copy folder

[chxxangie]

for example,
i have a folder (My Music) in directory
"C:\Documents and Settings\Owner\My Documents\My Music"

now i want to copy My Music to another directory, likes....
"C:\Documents and Settings\Owner\My Documents\My Folder\My Music"

how to do it?

** is copy, not shortcut......

[chxxangie]

Private Sub Command1_Click()
 
FileCopy "a.txt", "b.txt"
 
End Sub

[amrita]

1. Add a reference to Microsoft scripting runtime.
2. Write the following

Dim fso As New FileSystemObject
 
fso.CopyFolder "C:\TEST\New", "C:\TEST", True '--to allow overwrite