Moving mp3's from directory to USB stick problem

[hardrock]

Hi All,

I have an old mp3 player that works off a USB stick. The player plays in the order of when the tracks are copied to the USB stick.
I’m nearly there with an Access app that copies the tracks in the order that I want, but I can’t get the Filecopy to work. Can anyone spot where the mistake is my code below? F:\ in the location of my USB stick. Thanks J


Dim Source, Destination, Song As String
Dim lngCount As Long

For i = 1 To lngCount

Song = DLookup("[Filename]", "tblFiles", "[ID]= " & i & "")

Source = "D:\Mysongs\" & Song & ""
Destination = "F:\"

Filecopy (Source, Destination)

Next i

 

[Estuardo]

G'd evening,
You can't copy a file just like that. You need to supply the full path and destination file name. Like:

Filecopy "c:\song1.mp3","f:\anynamehere.mp3"

G'd luck

 

[hardrock]

That's it !! Thankyou