copyFile difficulties 1

[c00ld00d]

I'm trying to copy a set of files from one folder to another. I'm doing this locally for now, but in production this will be from the network to a local folder.

The code I am using is:

'Copy working files
fso.CopyFile src, dst, True
If Err Then
errorMsg = "Unable to copy working directory files: Error Copying Files"
updateSuccessful = False
Exit Function

When I run this code, the files actually copy, but I get the "Error # 5 Invalid procedure call or argument" error returned, which stops my script.

What am I doing wrong?

 

[PHV]

If Err Then
Try this:
If Err.Number > 0 Then

Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

 

[c00ld00d]

Thanks PH. I made that change (which was a "DUH" on my part) but I still am getting the same error...

 

[PHV]

What are the value of src and dst ?

Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

 

[c00ld00d]

Sorry, should have included that...

src = "C:\_NETWORK\*.*"
dst = "C:\_LOCAL\"

 

[PHV]

Have you tried this:
Err.Clear
fso.CopyFile src, dst, True
If Err.Number > 0 Then

Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884

 

[c00ld00d]

Thanks PHV, that seems to have done it. I guess I am used to VBA, where err is cleared automatically.