How To Copy Files

[Talihomz]

Hi.I jus wanted to know how i can make a program that copies files from one location to another without deleting the original file.

[creative1]

Hi
In order to do this yo need to design a form using DirList box and DriveListBox to select source and destination store source and destination address in two textboxes call text1 and text2. Another label can be used to tell user about successful completetion of the process.

then use follwoing code

Dim fso As New Scripting.FileSystemObject
fso.CopyFolder Text1.Text, Text2.Text, True
Label1.Caption = "backup created successfully at " + Text2.Text

[debasisdas]

Try to use Scripting.FileSystemObject

[creative1]

I forgot to tell add Microsoft Scripting Runtime in reference.

Kind Regards

[Killer42]

Of course, you could just use the built-in FileCopy statement. At least, if your version of VB has one. I know VB6 does, don't know about later versions.

[jamesd0142]

this works so play around with it:

Private Sub Copy()
        'access denied to startup path
        Dim dest1 As String = "C:\a\a\text.txt"
        If System.IO.File.Exists(dest1) = False Then
            Dim origional As String = "C:\a"
            System.IO.File.Copy(origional & "\text.txt", dest1)
        End If
    End Sub
 

Thanks James