hi,
thank you very much.
it works.
best regards

>

>oFSO = CREATEOBJECT("Scripting.FileSystemObject")
>cSource = "E:\Dra"
>cDestination = "G:\"
>oFSO.CopyFolder(cSource, cDestination) && it does not overwrite the old content, if found
>&& or
>oFSO.CopyFolder(cSource, cDestination, .T.) && it overwrites any content, if OS allows it.
>

>
>Hope this helps.
>
>
>(update. I forgot to add the formatting tags).