From a workbook I wanted a button that would copy a folder to another
drive. After dinging around I came up with this:

Set CpyFolder = CreateObject("Scripting.FileSystemObject")
CpyFolder.CopyFolder "c:\TestIt", "d:\TestIt", overwrite
End Sub

This works but I have no idea why. The CopyFolder only works if you use
a Set = something then use the Something.copyfolder. This seems just
idiotic and useless.

Why not just "Copy c:\folder, d:\folder" and make it easy? What is the
purpose of adding the complication of objects?

Also... the copy process was 10 times slower than dragging it in xp.

Is there a faster way of doing it?

Thanks

John

hi John

> Why not just "Copy c:\folder, d:\folder" and make it easy?
You can do that with files

Or use Name to move a folder

It is not fast if you copy, maybe windows shell is faster ? but with the FileSystemObject
you can test easily if a folder exist.

I have some info here
http://www.rondebruin.nl/folder.htm

I update it this weekend with specialfolder info


--
Regards Ron de Bruin
http://www.rondebruin.nl



"John" <(E-Mail Removed)> wrote in message news:%(E-Mail Removed)...
> From a workbook I wanted a button that would copy a folder to another drive. After dinging around I came up with this:
>
> Set CpyFolder = CreateObject("Scripting.FileSystemObject")
> CpyFolder.CopyFolder "c:\TestIt", "d:\TestIt", overwrite
> End Sub
>
> This works but I have no idea why. The CopyFolder only works if you use a Set = something then use the Something.copyfolder. This
> seems just idiotic and useless.
>
> Why not just "Copy c:\folder, d:\folder" and make it easy? What is the purpose of adding the complication of objects?
>
> Also... the copy process was 10 times slower than dragging it in xp.
>
> Is there a faster way of doing it?
>
> Thanks
>
> John
>