Simple question

[jjortiz]

You can make a refrence to the microsoft runtime library and then do the following
It's a little messy.

Dim objFSO As New FileSystemObject
   Dim objFolder As Folder
   Dim sDestination As String
   Dim sSource As String
   
   sDestination = "C:\program Files\testfolder\"
   sSource = App.Path
   Set objFSO = New FileSystemObject
    If Not objFSO.FolderExists(sDestination) Then
        objFSO.CreateFolder (sDestination)
    End If
   
    objFSO.CopyFolder sSource, sDestination, True