Copy Not Move

[HeSaidJoe]

Having 2 files in a folder called FolderA
I want to copy the files to FolderB and FolderC and still have the files in FolderA

Thanks,
Wayne

[Aaron Young]

Try using the FileSystemObject with the CopyFile Method..

Private Sub Command1_Click()
Dim oFSO As Object
Set oFSO = CreateObject("Scripting.FileSystemObject")
oFSO.CopyFile "C:\Test1\*.*", "C:\Test2"
Set oFSO = Nothing
End Sub



------------------
Aaron Young
Analyst Programmer
aarony@redwingsoftware.com
adyoung@win.bright.net