Many Thanks for all your replies and your expensive time. But the code is still not doing his job. Below you'll find the code and attached a screenshot from the form. The code will be used if i hit the buton Command11.
Private Sub Command11_Click()
Dim Sourcepath, Destinationpath
Sourcepath...
So i have changed the code, see below. But now I receive a message Too few parameters. Expected 1.
Dim Sourcepath, Destinationpath
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("Param")
Sourcepath = rs!Source
Destinationpath = rs!DEST
If (rs.BOF And rs.EOF) Then...
Thanks for your reply, I did change the code as you told me to but it is still only copying to the destination from the first record. I do not understand why because there are 3 records in total.
I have a problem with trying to execute a command for each record in a recordset. What I'm trying to build is a file distribution system. I have a form with the path where the source file is and a subform with a couple of records where the destination path is defined. I use the code you will...