Hi, I try to duplicate a folder

[loulouly]

Hi,

I try to duplicate a folder in VBA with this but it doesn't work!
=============================
Private Sub Command1_Click()
Dim fso
Dim fld
SourcePath = "C:\My Documents\My Webs\*"
TargetPath = "C:\My Documents\My Webs\images\"
Set fso = CreateObject("Scripting.FileSystemObject&quot

fso.CopyFolder SourcePath, TargetPath
End Sub
==============================

I get a "run-time error '5': Invalide procedure call or argument"

What's that?! Don't know what I do wrong, cause it's should work like that! it works with the Copyfile!

Someone has an idea to solve my problem?
Thanx
/Lou

 

[DougP]

Dim fso
Dim fld

Set fso = CreateObject("Scripting.FileSystemObject&quot
Set fld = fso.CopyFolder SourcePath, TargetPath



DougP, MCP