Report Viewer does not show any data

Question

0.00/5 (No votes)

See more:

I am trying to make a report using this code. But the report shows no data, only blank white form. What is wrong with this code ? please help me

Private Sub rpPaket_Load(ByVal sender As System.Object, ByVal         e       As System.EventArgs) Handles MyBase.Load

    objConnection = New OleDbConnection(strConnectionString)
    objCommand = New OleDbCommand("SELECT * from TbPaket", objConnection)
    ReportViewer1.LocalReport.Refresh()

    'Initialize the DataAdapter object and set the SelectCommand property
    objDataAdapter = New OleDbDataAdapter
    objDataAdapter.SelectCommand = objCommand

    'Initialize the DataTable object
    objDataTable = New DataTable
    Dim DataSet1 As Database2DataSet8.TbPaketDataTable = New   Database2DataSet8.TbPaketDataTable
    'Populate the DataTable
    objDataAdapter.Fill(DataSet1)


    Dim ReportDataSource As New ReportDataSource("DataSet1_WORKORDERDataTable", CType(DataSet1, DataTable))
    ReportViewer1.LocalReport.DataSources.Clear()
    ReportViewer1.LocalReport.DataSources.Add(ReportDataSource)


End Sub

Posted 29-Jan-15 20:45pm

tiwi

Add a Solution

1 solution

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)

/\jmot · Answer 1 · 2015-01-29T20:58:00

Solution 1

try Use

VB

ReportViewer1.RefreshReport()

Like my code..

VB

ReportViewer1.LocalReport.DataSources.Clear()

   Dim adaptar As New HotelsDataSetTableAdapters.Rstrnt_Bill_TABLETableAdapter
   Dim rstrnt_Table As New HotelsDataSet.Rstrnt_Bill_TABLEDataTable
   adaptar.Fill1(rstrnt_Table, vOrder_ID)

   ReportViewer1.LocalReport.DataSources.Add(New Microsoft.Reporting.WinForms.ReportDataSource("DataSet1", rstrnt_Table.DefaultView))
   ReportViewer1.LocalReport.ReportPath = "Reports\Rstrnt_Bill.rdlc"
   ReportViewer1.RefreshReport()

Posted 29-Jan-15 20:58pm

/\jmot

Comments

tiwi 30-Jan-15 3:31am

thanks for your reply,

where do i need to make folder "Reports\Report3.rdlc" ? in the bin folder inside the project folder ?

/\jmot 30-Jan-15 4:16am

no, it's the path of the report.
where is your report path??

/\jmot 30-Jan-15 4:16am

1st try to use.
ReportViewer1.RefreshReport()
at the end of the code.

tiwi 30-Jan-15 5:38am

I have put the path, it show error "an error occured during local report processing the report definition for report c:\user\tjiwi\document\visualstudio2005\project\report5.alec"

tiwi 30-Jan-15 5:39am

It show error above when i run the program

/\jmot 30-Jan-15 5:44am

Search anything in Google

tiwi 30-Jan-15 6:58am

I also fried using report wizard, it running well in my computer. All report can be show. When i install my application in other computer, the report viewer turn error "cantik find database2". But other table that use database2 running well, only the report viewer. Any idea how can i change the path of database that connect to report viewer?

tiwi 30-Jan-15 6:59am

Sorry "can not find database2"

/\jmot 30-Jan-15 7:04am

datatase 2??
check connection string here..
objConnection = New OleDbConnection(strConnectionString)

tiwi 31-Jan-15 20:26pm

here is my full code what is wrong with this ?

Public Class rpPaket
Dim strConnectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Database2.accdb"
Dim objConnection As OleDbConnection
Dim objCommand As OleDbCommand
Dim objDataAdapter As OleDbDataAdapter
Dim objDataTable As DataTable
Dim Report As ReportDataSource

Private Sub rpPaket_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

objConnection = New OleDbConnection(strConnectionString)
objCommand = New OleDbCommand("SELECT * from TbPaket", objConnection)
ReportViewer1.LocalReport.Refresh()

'Initialize the DataAdapter object and set the SelectCommand property
objDataAdapter = New OleDbDataAdapter
objDataAdapter.SelectCommand = objCommand

'Initialize the DataTable object
objDataTable = New DataTable
Dim DataSet1 As Database2DataSet8.TbPaketDataTable = New Database2DataSet8.TbPaketDataTable
'Populate the DataTable
objDataAdapter.Fill(DataSet1)

' Dim ReportDataSource As New ReportDataSource("DataSet1_WORKORDERDataTable", CType(DataSet1, DataTable))
'ReportViewer1.LocalReport.DataSources.Clear()
'ReportViewer1.LocalReport.DataSources.Add(ReportDataSource)

Dim adaptar As New Database2DataSet8TableAdapters.TbPaketTableAdapter
Dim paket_tbl As New Database2DataSet8.TbPaketDataTable
adaptar.Fill(paket_tbl)
ReportViewer1.LocalReport.DataSources.Add(New Microsoft.Reporting.WinForms.ReportDataSource("DataSet1", paket_tbl.DefaultView))
ReportViewer1.LocalReport.ReportPath = "Reports\Report3.rdlc"
ReportViewer1.RefreshReport()

End Sub
End Class