I have a dir list box
db.Close
'Kill (App.Path & "\PhoneTel.mdb")
our = (Dir1.Path + "\" + File2.filename)
mitt = Left$(File2.filename, 12) ' phonetel.mdb
SourceFile1 = our '
DestinationFile1 = App.Path + "\" + mitt '"PhoneTel.mdb"
FileCopy SourceFile1, DestinationFile1
as seen in the second image there is
i will that when a press the backup command it will go
direct to foldeer backup