Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copying an entire directory and its tree to another loca
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP
Network:
Windows 2000 Server
Miscellaneous
Thread ID:
00980851
Message ID:
01327101
Views:
41
>>>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform