object.CopyFile() has an error?
Sub Test()
Dim fo As Object
Set fo = CreateObject("Scripting.FileSystemObject")
fo.CopyFile "C:\file1.txt", "C:\data\file1.txt", False
End Sub
Before you run the above code, create an empty directory
of "C:\data". Oh course, "file1.txt" must exist on C: as well.
If you run the above code once, file1.txt will successfully
be copied into C:\data. However, run the code for a second
time and you get a run-time error 58 message that says:
"File already exists".
Why does this error message appear? I've set the overwrite
option to False, meaning do NOT overwrite.
If I set the overwrite flag to True, the file inside C:\data
never gets overwritten. No matter how many times I try.
(Neither files are set to Read Only)
So, I'm getting an error message when I use the False
option. And, I'm unable to overwrite the file if I use the
True flag.
What is going on here????
|