Coping Mulitiple files

How can I copy all the files in a directory to disk a in vb
example:
copy (mydir\*.* a:\
thank you
searAsked:
Who is Participating?
 
jf26028Commented:
this uses the drive, directory, and file list boxes on a form.


Private Sub Command1_Click()
    Dim i As Integer
    Dim a As String
    Dim b As String
    If File1.ListCount > 0 Then                'if files in the selected dir

        For i = 0 To File1.ListCount - 1            'for all the files
           FileCopy file1.list(i), "c:\whateverdir\" & file1.list(i)
        Next                                        'continue for other files
    End If
End Sub

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.