'Crystal Report' Thread RSS Feed

Crystal Report

Sun, 13 Dec 2009 04:40:35 -0800

Hello friends, I have a invoice form that contains some billing info (i.e. textbox, dropdown field etc...) and i have a calculate button in it that calculate the sum total of the relevant fields. so i want to print the data in crystal report. i have vs 2008 that already inbuilt CR. it'll prints only the data that put in billing field not all the database field. so plz help me.

Re: Crystal Report

Sun, 13 Dec 2009 14:57:49 -0800

Please paste your source code in a "code" block.

Re: Crystal Report

Sun, 13 Dec 2009 22:14:18 -0800

my code is as here under:

 Try
            Dim conn As New SqlConnection(ConfigurationManager.ConnectionStrin
gs("Billing").ConnectionString)

            Dim mmd As SqlCommand = conn.CreateCommand

            mmd.CommandType = CommandType.Text

            mmd.CommandText = "Select * From Bill"

            Using conn

                conn.Open()
                Dim da As New SqlDataAdapter(mmd)
                Dim ds As New SqlCommandBuilder(da)

                Dim mytable As New DataTable("Billing")

                da.Fill(mytable)

                mytable.Rows.Add(txtSerial.Text.Trim, cmdName.Text.Trim, dtCrDate.Text.Trim, cmbSrRate.Text.Trim, txtShrQty.Text.Trim, txtShrAmount.Text.Trim, cmbSrrRate.Text.Trim, txtShrrQty.Text.Trim, txtShrrAmount.Text.Trim, _
                cmbptRate.Text.Trim, txtPtQty.Text.Trim, txtPtAmount.Text.Trim, cmbptRRate.Text.Trim, txtPtRQty.Text.Trim, txtPtRAmount.Text.Trim, txtCoatRate.Text.Trim, txtCoatQty.Text.Trim, txtCoatAmount.Text.Trim, txtSafariRate.Text.Trim, txtSafariQty.Text.Trim, txtSafariAmount.Text.Trim, _
                txtKurtaRate.Text.Trim, txtKurtaQty.Text.Trim, txtKurtaAmount.Text.Trim, txtPjmRate.Text.Trim, txtPjmQty.Text.Trim, txtPjmAmount.Text.Trim, _
                DtDLvDate.Text.Trim, txtgrdTotal.Text.Trim)

                da.Update(mytable)
                mmd.ExecuteNonQuery()
                conn.Close()

            End Using

            MessageBox.Show("Do You want to Print the Bill", caption:="Print Bill")
        Catch ex As Exception
            MessageBox.Show("An Error has Occured: " + ex.Message.ToString + vbCritical, vbCrLf)
        End Try

The matter is that i creating a small billing project that contains Invoice fields. Firstly i save all the data in my database, then after i added the messagebox method in it to display "Do you want to print the data". so now the trick is that the crystal report print only last Invoice record which i saved in the database i.e. LIFO method.

thank u

Re: Crystal Report

Mon, 14 Dec 2009 06:46:58 -0800

Maybe I am not understanding what you are asking? From reading your first post, It sounds like you have a Crystal Report built, but it is not returning all of the information you want it to... You are asking for some help to get that report working correctly?

If that is not what you were asking, please restate what you need clearly.

The code that you provided is to insert a record into a database table. Do you already have code written to print a crystal report, if so you will need to post that, we can work off of that to get you a solution.

If you are asking for help building a crystal report to display the last item added to the database, I do not know much about crystal report building, but I know Databases enough to help you with that.

Add a field to the Database Table called "Creation_Time" or something similar "Added_Date" "Added_Time" and set it to be datatype "Date/Time". When you insert a record to the database, set the Creation Time = Now

Dim dtNow as Date = Now
MessageBox.Show(dtNow)

In your crystal report, when you query the data, your SQL should look like this:

"SELECT TOP 1 * FROM MyDataTable ORDER BY Creation_Time DESC"

This line returns the TOP 1 (1 result) record, with all fields (*), From the MyDataTable table, ordering the results by Creation_Time with the highest value (most recent date) at the top of the list, Ordered Descending.

Hope this helps,
Sean C

Re: Crystal Report

Mon, 14 Dec 2009 13:15:09 -0800

Hi Thanx for ur reply, Now i added Crystal Report code.

Dim cryRpt As New ReportDocument
With cryRpt
                Dim str As String = "Report Directory/bill.RPT"
                .SetDataSource(mytable)
                .Load(str)
                CrystalReportViewer1.ReportSource = cryRpt
                CrystalReportViewer1.Refresh()
            End With

but the following error occurs: Invalid Report File Path

Re: Crystal Report

Tue, 15 Dec 2009 06:25:32 -0800

Dim str As String = "Report Directory/bill.RPT"

Firstly, you used the wrong slash in your path (use "/" for web addresses and unix, use "\" for Windows Paths)

Secondly, This needs to be the fully qualified path of the file you are trying to load... for instance, I want to open "SeanCampbell.RPT" and it is in a folder in "program files" my code would look like this:

Dim str as String = "C:\Program Files\Some Folder I Just Made\SeanCampbell.RPT"

If you want to load a file that you have added to the same folder the application is running in, u don't have to designate the full path:

Dim Str as String = "Sean.RPT"

When I go to load this file, it will look in this path:
C:\Documents and Settings\SeanCampbell\My Documents\VS 2009\Projects\WindowsApplication1\WindowsApplicati on1\Bin\Debug\Sean.RPT

Hope this helps,
If you still cannot get it to work after entering the correct full-path of the file, please copy the details from the error message and paste them into your next reply,
Sean Campbell

Re: Crystal Report

Tue, 15 Dec 2009 11:53:53 -0800

this is my complete code:

Private Sub RadButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadButton1.Click
        Try
            Dim cryRpt As New ReportDocument
            Dim conn As New SqlConnection(ConfigurationManager.ConnectionStrin
gs("Billing").ConnectionString)

            Dim mmd As SqlCommand = conn.CreateCommand

            mmd.CommandType = CommandType.Text

            mmd.CommandText = "SELECT TOP 1 * FROM Bill ORDER BY [Current Date] DESC"

            conn.Open()
            Dim da As New SqlDataAdapter(mmd)
            Dim mytable As New DataTable("Billing")

            da.Fill(mytable)
            mmd.ExecuteNonQuery()

            cryRpt.SetDataSource(mytable)
            cryRpt.Load("C:\Documents and Settings\saquib1\My Documents\Visual Studio 2008\Projects\Memorial Software\Memorial Software\Memorial.rpt")
            CrystalReportViewer1.ReportSource = cryRpt
            CrystalReportViewer1.Update()
            CrystalReportViewer1.Refresh()
            conn.Close()
        Catch ex As Exception
            MessageBox.Show("An Error has occured: " + ex.Message.ToString + vbCrLf)
        Finally

        End Try

    End Sub

and i set the breakpoint in cryRpt.Load and it's display the error that Invalid file path but Nothing any wrong path included in it. and also when i commented the line "cryRpt.SetDataSource(mytable)" it display the report but with no database binding and nothing display on the report. Can i send u my DB with report and form files.

Re: Crystal Report

Tue, 15 Dec 2009 12:09:37 -0800

I need you to paste the FULL details of the error message it gives you.

Remove the Try Catch, let the program crash, click Details>>, copy the contents of the details and paste it into a reply.

Re: Crystal Report

Wed, 16 Dec 2009 11:17:37 -0800

Re: Crystal Report

Wed, 16 Dec 2009 11:22:17 -0800

if the image not display paste the image link to address bar:
http://4.bp.blogspot.com/_i14Hz19WAp8/SykjWAB8s4I/AAAAAAAAAcY/DxZ7V15S8zo/s1600-h/error1.jpg

and the error details:

CrystalDecisions.CrystalReports.Engine.LoadSaveRep ortException was unhandled
Message="Invalid report file path."
Source="CrystalDecisions.Shared"
StackTrace:
at CrystalDecisions.CrystalReports.Engine.EngineExcep tionUtils.DoThrowException(String message, EngineExceptionErrorID id) at CrystalDecisions.CrystalReports.Engine.ExceptionTh rower.ThrowEngineException(String messageID, EngineExceptionErrorID id) at CrystalDecisions.CrystalReports.Engine.ReportDocum ent.Load(String filename, OpenReportMethod openMethod, Int16 parentJob) at CrystalDecisions.CrystalReports.Engine.ReportDocum ent.EnsureLoadReport() at CrystalDecisions.CrystalReports.Engine.ReportDocum ent.SetDataSourceInternal(Object val, Type type) at CrystalDecisions.CrystalReports.Engine.ReportDocum ent.SetDataSource(DataTable dataTable) at WindowsApplication1.CrystalRep.RadButton1_Click(Ob ject sender, EventArgs e) in C:\Documents and Settings\saquib1\My Documents\Visual Studio 2008\Projects\Memorial Software\Memorial Software\CrystalRep.vb:line 33 at System.Windows.Forms.Control.OnClick(EventArgs e) at Telerik.WinControls.RadControl.OnClick(EventArgs e) at Telerik.WinControls.UI.RadButton.ButtonElement_Cli ck(Object sender, EventArgs e) at Telerik.WinControls.RadItem.OnClick(EventArgs e) at Telerik.WinControls.UI.RadButtonItem.OnClick(Event Args e) at Telerik.WinControls.RadItem.DoClick(EventArgs e) at Telerik.WinControls.RadItem.RaiseBubbleEvent(RadEl ement sender, RoutedEventArgs args) at Telerik.WinControls.RadElement.RaiseRoutedEvent(Ra dElement sender, RoutedEventArgs args) at Telerik.WinControls.RadItem.RaiseBubbleEvent(RadEl ement sender, RoutedEventArgs args) at Telerik.WinControls.RadElement.RaiseRoutedEvent(Ra dElement sender, RoutedEventArgs args) at Telerik.WinControls.RadElement.DoMouseUp(MouseEven tArgs e) at Telerik.WinControls.ComponentInputBehavior.OnMouse Up(MouseEventArgs e) at Telerik.WinControls.RadControl.OnMouseUp(MouseEven tArgs e) at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks) at System.Windows.Forms.Control.WndProc(Message& m) at System.Windows.Forms.ScrollableControl.WndProc(Mes sage& m) at Telerik.WinControls.RadControl.WndProc(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.O nMessage(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.W ndProc(Message& m) at System.Windows.Forms.NativeWindow.DebuggableCallba ck(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam) at System.Windows.Forms.UnsafeNativeMethods.DispatchM essageW(MSG& msg) at System.Windows.Forms.Application.ComponentManager. System.Windows.Forms.UnsafeNativeMethods.IMsoCompo nentManager.FPushMessageLoop(Int32 dwComponentID, Int32 reason, Int32 pvLoopData) at System.Windows.Forms.Application.ThreadContext.Run MessageLoopInner(Int32 reason, ApplicationContext context) at System.Windows.Forms.Application.ThreadContext.Run MessageLoop(Int32 reason, ApplicationContext context) at System.Windows.Forms.Application.Run(ApplicationCo ntext context) at Microsoft.VisualBasic.ApplicationServices.WindowsF ormsApplicationBase.OnRun() at Microsoft.VisualBasic.ApplicationServices.WindowsF ormsApplicationBase.DoApplicationModel() at Microsoft.VisualBasic.ApplicationServices.WindowsF ormsApplicationBase.Run(String[] commandLine) at WindowsApplication1.My.MyApplication.Main(String[] Args) in 17d14f5c-a337-4978-8281-53493378c1071.vb:line 81 at System.AppDomain._nExecuteAssembly(Assembly assembly, String[] args) at System.AppDomain.ExecuteAssembly(String assemblyFile, Evidence assemblySecurity, String[] args) at Microsoft.VisualStudio.HostingProcess.HostProc.Run UsersAssembly() at System.Threading.ThreadHelper.ThreadStart_Context( Object state) at System.Threading.ExecutionContext.Run(ExecutionCon text executionContext, ContextCallback callback, Object state) at System.Threading.ThreadHelper.ThreadStart()
InnerException:

Re: Crystal Report

Thu, 17 Dec 2009 06:45:34 -0800

Mind you, I really don't have any experience with this, but here is what I think is going on...

You have to Load the Report before you set the data source... so swap your .Load and .SetDataSource lines of code to look like this:

cryRpt.Load("C:\Documents and Settings\saquib1\My Documents\Visual Studio 2008\Projects\Memorial Software\Memorial Software\Memorial.rpt")
cryRpt.SetDataSource(mytable)

I came to this conclusion after finding some sample code. I assume that the program trys to load the rpt when you set the DataSource (to fill it out with the data it was provided) then it throws a LoadException because the FileName is blank or nothing.

Try this and let me know if it resolves it, if not we can look at other things. Here is that sample code i found, its a tutorial:
http://www.thescarms.com/dotnet/CrystalRptViewer.aspx

Re: Crystal Report

Thu, 17 Dec 2009 09:46:58 -0800

Thank u thank u sir, it works. why its not came in my mind. if i get any problem i will contact u.

thanks you

Re: Crystal Report file path error

Tue, 04 May 2010 07:32:39 -0800

I have a similiar problem.
I made crystal reports and they run in VS2008 localhost and then I deploy to my client for windows application.
The invalid report path error exists at report view.
I had already copied the crystal reports *.rpt to client's c:\MyReport folder-same as VS2008 environment and stil same error.

Any solution?

Tommy Leung.

Re: Crystal Report file path error

Tue, 04 May 2010 08:17:52 -0800

Tommy, in order for us to help, you must post your exact code that is crashing, and the details from the Exception that is thrown.

Re: Crystal Report file path error

Thu, 06 May 2010 02:48:06 -0800

Thanks.
I found out I need to further config project setup for crystal report under VS2008, I am following the link in :

http://msdn.microsoft.com/en-us/library/bb126227(VS.90).aspx

Will report my result.