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...