Take a look at Thread #793714 Message #793756
or

oShell    = CreateObject("Shell.Application")
objFolder = oShell.NameSpace("C:\backup\this-dir")
*** c:\backup\this-dir must exists!!!
objFolder.CopyHere("C:\this-dir\*.*")

check http://msdn2.microsoft.com/en-us/library/ms723207.aspx

>I would like to create a switch on a form
>that, when clicked, will perform the same
>task as the following DOS command:
>
> xcopy this-dir backup\this-dir /e /s
>
>Can someone shed a light? THank you.
>
>JW