CodeItBetter Programming Another VB Programming Blog

How to copy all folders and files from one location to another location

Posted on January 4, 2009
1
2
3
4
5
6
7
8
9
10
'File/Folder Handling - How to copy all folders and files from one location to another location
Option Explicit
 
Sub Main()
'This will copy all folders in D:\Test\ to C:\Temp
    Dim oFSO As New Scripting.FileSystemObject
    Set oFSO = New FileSystemObject
    oFSO.CopyFolder "D:\Test\*", "C:\Temp\", False
    Set oFSO = Nothing
End Sub
Comments (0) Trackbacks (0)

No comments yet.


Leave a comment


 

No trackbacks yet.