>>>So, if is not your rights it must be your code, for CopyFolder works perfectly for me.
>>>
>>>Also check that there is no read-only file/folder in the directory structure, and that there is no file in use that would make the copy fail
>>
>>This sugestion makes more sense , i'll check that
>
>Why did my previous suggestion not made any sense? Try running the command without rights and tell me :P
>
>Just in case this is the code I used for testing
>
>
>loFSO = Createobject('Scripting.FileSystemObject')
>loFSO.CopyFolder('\\skyapps\apps\foxv\divar', '\\' + Getenv("COMPUTERNAME") + '\c$\divar')
>
>
>As an alternative, you can use the Shell object to do this, which it would also fire the "Copying files" AVI for long files, although I might have the parameters wrong, I only used it once in my applications and forgot where and which parameters I used, but it works too.
>
>
>loShell = CreateObject("Shell.Application")
>loFolder = loShell.NameSpace(Getenv("COMPUTERNAME") + '\c$\divar')
>loFolder.CopyHere('\\skyapps\apps\foxv\divar', 16 + 64 + 256 + 512 + 1024 + 2048 + 4096 + 9182)
>
Nice, thanks, though I can not test it now.
If it's not broken, fix it until it is.
My Blog