strt.CopyFolder

[vb_student]

Hello

i have got a command button on a form which used to copy the contents of the folder to another folder, however it is now throwing an error for some reason.

it comes up with the msg "error" because of the messagebox
can you guys tell me how to figure out why is it throwing an error?

Dim strt As New FileSystemObject
 
'        'this actually over writes all files in the currentDirPath directory with those stored under the initialize directory
    Command2.BackColor = RGB(255, 255, 255)
    Command2.Refresh
    On Error GoTo Error:
    'Call strt.CopyFolder(WiMAXDoORsrootdir & "\Initialize", currentDirPath, True)
    Call strt.CopyFolder("C:\WiMAXDoORs\Projects\Initialize", "C:\WiMAXDoORs\Projects\SampleProject-2", True)
    MsgBox "no error"
 
Error:
    Command2.BackColor = &H8000000F
    MsgBox "error"
    Command2.Refresh

i removed the error handler and it says

Run-time error '-2147023672 (800704c8)':
Method 'CopyFolder' of object 'IFileSystem3' failed

and it comes up with end, debug, help