How to combine 2 or more crystal report and combine it with your VB.NET project

Question

1.00/5 (1 vote)

See more:

How to call crystal report using print button
and how to combine or add sub report on crystal report
and how to export them as one application

What I have tried:

Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
        Dim cryRpt As New ReportDocument
        Dim crtableLogoninfos As New TableLogOnInfos
        Dim crtableLogoninfo As New TableLogOnInfo
        Dim crConnectionInfo As New ConnectionInfo
        Dim CrTables As Tables
        Dim CrTable As Table

        cryRpt.Load("PUT CRYSTAL REPORT PATH HERE\CrystalReport1.rpt")

        With crConnectionInfo
            .ServerName = "YOUR SERVER NAME"
            .DatabaseName = "YOUR DATABASE NAME"
            .UserID = "YOUR DATABASE USERNAME"
            .Password = "YOUR DATABASE PASSWORD"
        End With

        CrTables = cryRpt.Database.Tables
        For Each CrTable In CrTables
            crtableLogoninfo = CrTable.LogOnInfo
            crtableLogoninfo.ConnectionInfo = crConnectionInfo
            CrTable.ApplyLogOnInfo(crtableLogoninfo)
        Next

        CrystalReportViewer1.ReportSource = cryRpt
        CrystalReportViewer1.Refresh()
    End Sub

i am using ms access as database

Posted 13-Jul-20 15:52pm

Beginner213456

Updated 13-Jul-20 21:17pm

v2

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)

Andre Oosthuizen · Answer 1 · 2020-07-13T21:17:00

Q1) How to print CR directly to printer -

refer THIS link.

VB

Dim cryRpt As ReportDocument = New ReportDocument()
        cryRpt.Load(Server.MapPath("~/extraConrols/CrystalReport1.rpt"))
       
      
        CrystalReportViewer1.RefreshReport()
        CrystalReportViewer1.PrintMode = CrystalDecisions.Web.PrintMode.Pdf
 

        cryRpt.PrintToPrinter(1, False, 0, 0)

You could also use -

ASP.NET

<form id="form1" runat="server">
        <CR:CrystalReportViewer ID="CrystalReportViewer1" runat="server" AutoDataBind="true" />
    </form>

with code behind -

VB

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim cryRpt As ReportDocument = New ReportDocument()
        cryRpt.Load(Server.MapPath("~/extraConrols/CrystalReport1.rpt"))
        CrystalReportViewer1.ReportSource = cryRpt
       

        CrystalReportViewer1.RefreshReport()
        CrystalReportViewer1.PrintMode = CrystalDecisions.Web.PrintMode.Pdf

Q2) Combine 2 reports -
Approach 1 : Use sub-report :- If you have a common parameter between both the report, then best approach to this is to use one report as a sub-report and second will treat as a main report. For this in main report, Insert -> Sub-report, map both reports and execute will give the desire result.

See how to combine 2 crystal reports to 1 crystal reports for more details.

Q3)How to export report - Make use of the PDF function to export.