Crystal Reports bind password protectec access to cr10

Message

   I am using vb6 and crystal report 10 for report generation , also using ms access  2000 as a backend database.

i
had put password to the database and when i run my report i am getting
message "Invalid password" as i check i had provide the true password
and if i remove the password the report run fine .

I also want that the report use data from application path and not the fix path.

I am using the following code

Private Sub Form_Load()
Report1.Database.Tables(1).SetSessionInfo "", Chr(10) & "abc123"
Report1.Database.Tables(1).Location = App.Path & "\My Project.mdb"
Screen.MousePointer = vbHourglass
Report1.SQLQueryString = "select * from Sales"
CRViewer1.ReportSource = Report1
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
End sub

what wrong in this code , when i remove the password report works fine if i put the password it says invalid password.

any help ?