Jump to content

Recommended Posts


Posted
Private Sub Command1_Click()
 Dim fso As Object
 
 Set fso = CreateObject("Scripting.FileSystemObject")
 fso.CopyFile "C:\*.TXT", "D:\DESTINATION\"

End Sub

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...