[vb6] File Copy error

Hello..
I'm kinda new here..:wave:

i'm having a problem with file copy and limits of incorrect pw.
here is my code..
the backup button:

Code:

---

Private Sub cmdBackup_Click()
    SourceFile = App.Path & Text1
    DestinationFile = App.Path & Text2
    fs.CopyFolder SourceFile, DestinationFile
    Set fs = Nothing
    Timer1.Enabled = True
End Sub

---

and the browsing part is this:

Code:

---

Private Sub cmdBrowse1_Click()
With cd
        .CancelError = False
        .Filter = "All Files (*.mdb)|*.mdb"
        .ShowOpen
        Text1 = .FileName
        If Len(.FileName) = 0 Then
            Exit Sub
        End If
        sFile = .FileName
End With
end sub

---

i'm having an error msg "Bad file name or number"
i set my reference to microsoft scripting runtime
can you help me??:confused:

and also..
can you teach me how to limit the incorrect password of users??

please please help me..
badly needed for thesis..:(
tnx tnx..

Welcome to the forums. :wave:

I added [code]your code goes here[/code] tags to your post as it makes reading posted code a lot easier.

How about

Code:

---

SourceFile = App.Path & "\" & Text1.Text
    DestinationFile = App.Path & "\" & Text2.Text

---

Quote:

---

Originally Posted by Hack

Welcome to the forums. :wave:

I added [code]your code goes here[/code] tags to your post as it makes reading posted code a lot easier.

How about

Code:

---

SourceFile = App.Path & "\" & Text1.Text
    DestinationFile = App.Path & "\" & Text2.Text

---

---

I tried it and it's still the same error..:(
I'm confused..:eek2:

tnx for editing my post... :)

What is contained the textbox? (the exact string)

the exact filename and directory actually..
example : "C:\My Docu\masterfile.mdb"
like that..

You are using CopyFolder not CopyFile; your source & destination appear to be files.

Is the database closed when you attempt to copy it?

ei.. tnx now i get it!:wave:

tnx so much.,.,

i've replaced the copyfolder.
tnx xo much!:thumb: