Run Time Error 20507 Invalid File Name


I'm is new member, I have trouble with my application. I'm use visual basic 6.0 with access as database and crystal report 8.5. My trouble is "Run time error 20507 Invalid file name. I have script like this :

CR.DataFiles(0) = App.Path & "\databasename.mdb"

CR.ReportFileName = App.Path & "\reportfilename.rpt"

CR.WindowState = crptMaximized

CR.Action = 1

When the click button for view report, show message error as above.

Somebody help me.....

I'm very thank's

Helpful Answer