Using VB6, MS Access 2000 mbd and Crystal Reports 8.

I set the database for the report with
Code:
Report.Datafiles(0) = App.Path & "\Database.mbd"
Now I want to move my reports into their own directory (Reports) under the program directory to clear up the clutter in the application directory. The databases will stay in the application directory (or might be moved into their own directory as well). Changed the location with
Code:
Report.Datafiles(0) = App.Path & "\Reports\Database.mdb"
All the reports with no subreports works 100%. All the reports that contains subreports error out saying Run-time error '20533': Unable to open database.

I have different databases, that's why I need to pass the database to use to the report but each report uses only the one database passed. The main report as well as the subreports uses the same passed database.

What am I missing here?