Crystal Report not showing correct data

Question

0.00/5 (No votes)

See more:

R/All,

Am Using Crystal report in my asp.net 2008 project in vb language.the report are map on run time one time report are showing correct data but when m click export button on crystal report, report are refresh and they are showing all table data instead of our query.

please help us.

I'm Using this code
-----------

VB

Dim rptDoc As New ReportDocument 
Dim dt As New DataTable 
Dim rstRep As New ADODB.Recordset 
st = ConfigurationManager.ConnectionStrings("XXSCL_WebPortelConnectionString").ToString 
con = New Data.SqlClient.SqlConnection(st) 
Dim objRpt As New CrystalReport1 
con.Open() 
Dim dscmd As New SqlDataAdapter(sql, con) 
Dim ds As New DataSet1 
dscmd.Fill(ds, "XXSCL_DDR") 
objRpt.Database.Tables.Item("XXSCL_DDR").SetDataSource(ds) 
CrystalReportViewer1.ReportSource = objRpt

regards
ashish

Posted 9-May-11 20:42pm

Ashish661982

Updated 10-May-11 9:16am

thatraja

v2

Add a Solution

Comments

Pong D. Panda 10-May-11 2:52am

Can you at least show us your code on export? How do you perform your data binding?

Ashish661982 10-May-11 2:54am

R/All,

m Using this code
-----------
Dim rptDoc As New ReportDocument
Dim dt As New DataTable
Dim rstRep As New ADODB.Recordset
'###########
st = ConfigurationManager.ConnectionStrings("XXSCL_WebPortelConnectionString").ToString
con = New Data.SqlClient.SqlConnection(st)
Dim objRpt As New CrystalReport1
con.Open()
Dim dscmd As New SqlDataAdapter(sql, con)
Dim ds As New DataSet1
dscmd.Fill(ds, "XXSCL_DDR")
objRpt.Database.Tables.Item("XXSCL_DDR").SetDataSource(ds)
CrystalReportViewer1.ReportSource = objRpt
------------

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)

cuteband · Answer 1 · 2011-05-09T21:21:00

VB

Dim mypdffile As New DiskFileDestinationOptions
mypdffile.DiskFileName = Filename
               With objReport.ExportOptions
                   .ExportDestinationType = ExportDestinationType.DiskFile
                   .DestinationOptions = mypdffile
                   .ExportFormatType = ExportFormatType.PortableDocFormat
               End With

               objReport.Export()

Ashishmau · Answer 2 · 2011-05-10T19:08:00

Solution 2

i think the problem is in this line.

VB

objRpt.Database.Tables.Item("XXSCL_DDR").SetDataSource(ds)

try in this way.

VB

da.Fill(dt)
ds.Tables(0).Merge(dt)
objRpt.SetDataSource(ds)

Posted 10-May-11 19:08pm

Ashishmau