Error "invalid file path" in crystal report in VB.NET

Question

1.00/5 (2 votes)

See more:

Hi, Im new to the vb.net and crystal report. i wrote a code to generate cryatal report based on the combo box filtering values.
Ex:- I have two combo box named combo 1 and 2 to filter year with committee no. then it should display relevant report consists with other required fileds from db. when i run this code it says "Invalid report file path". can anyone help me to find the issue in my code please.

Dim con As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\Database1.accdb")
If ComboBox1.Text = "2023" And ComboBox2.Text = "1" Then

            Try
                Dim sql As String
                Dim cmd As New OleDb.OleDbCommand
                Dim dt As New DataTable
                Dim da As New OleDb.OleDbDataAdapter
                Dim cryRpt8 As New ReportDocument

                con.Open()

                
                sql = "select r.Department, r.officerName, b.Requisition_date, b.book_ID, b.title, b.Authors, b.edition, b.Quantity, b.pdf_availability, b.Book_type, q.bidder1, q.bidder2, q.bidder3, q.up1currancy, q.up2currancy, q.up3currancy, q.unitprice_b1, q.unitprice_b2, q.unitprice_b3, q.ac1currancy, q.ac2currancy, q.ac3currancy, q.ac1, q.ac2, q.ac3, q.fa1currancy, q.fa2currancy, q.fa3currancy, q.fa1, q.fa2, q.fa3, q.committee_No FROM ((reqesition r INNER JOIN books b ON b.reqesitionID=r.reqesitionID) INNER JOIN quotation q ON q.BookID=b.book_ID) where q.committee_No LIKE '%" & 1 & "%' and b.Requisition_date LIKE '%" & 2023 & "%' "
                cmd.Connection = con
                cmd.CommandText = sql
                poppp = cmd.ExecuteNonQuery

                da.SelectCommand = cmd
                da.Fill(dt)

                cryRpt8.SetDataSource(cmd)
                cryRpt8.Load("E:\Final Book purchasing System\Final Book purchasing System\CrystalReport63.rpt")
                CrystalReportViewer1.ReportSource = cryRpt8
                CrystalReportViewer1.Refresh()

            Catch ex As Exception
                MsgBox(ex.Message)
            Finally
                con.Close()
            End Try

What I have tried:

Hi, Im new to the vb.net and crystal report. i wrote a code to generate cryatal report based on the combo box filtering values.
Ex:- I have two combo box named combo 1 and 2 to filter year with committee no. then it should display relevant report consists with other required fileds from db. when i run this code it says "Invalid report file path". can anyone help me to find the issue in my code please.

Posted 13-Aug-23 21:10pm

Member 15947161

Updated 13-Aug-23 22:13pm

Add a Solution

Comments

Richard Deeming 14-Aug-23 4:02am

Hard-coding the database and report file paths is a terrible idea. It means you will never be able to distribute your application to other users - my computer doesn't even have an E: drive, let alone the two files your code is relying on. And even if it did, they're unlikely to be the same files that you have on your machine.

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard MacCutchan · Answer 1 · 2023-08-13T21:46:00

Solution 1

"Invalid report file path"
The message suggests that it cannot create the report on the filename you have selected. So check the drive and path are valid.

Posted 13-Aug-23 21:46pm

Richard MacCutchan

Comments

Andre Oosthuizen 14-Aug-23 4:00am

This is where you need to check the path, it is incorrect - 'cryRpt8.Load("E:\Final Book purchasing System\Final Book purchasing System\CrystalReport63.rpt")'

OriginalGriff · Answer 2 · 2023-08-13T22:13:00

There are two paths involved here:

Dim con As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\Database1.accdb")

And

cryRpt8.Load("E:\Final Book purchasing System\Final Book purchasing System\CrystalReport63.rpt")

Most likely it's the second of these, but you should use the debugger to find out which, and then check the drive / path combo to make sure it all exists.

In addition, it's a poor idea to keep your DB in the root folder of any drive as it's likely that write access to the root will be further restricted in future OS releases for security reasons (it already requires admin permission for your boot drive, normally C:)
Generally speaking, you should keep data (including databases and reports) under the User account: Where Should I Store My Data?[^] suggests some better places.

And you should never hard code paths: always use a configuration file, so that the path can be changed (or set by your installation utility) without the need to recompile the whole app. Because I have many apps which use databases, I use this: Instance Storage - A Simple Way to Share Configuration Data among Applications[^] but it may be a little overkill for your needs.