Automate Generate Crystal Report

Posted on 2002-04-08
Last Modified: 2012-06-27

Does anyone know how to automate to generate the crystal report with data and then save it to crystal report format or html format or excel format or text format?

I knows that crystal report able to export the crystal report to other supported format by click on the button when viewing the report.

My question is, is there a way not to allow user click on those button? Meams, automatic generate the report?

Urgent matter need your expertise and ideas and solutions!


Question by:ht055
  • 5
  • 4
LVL 100

Expert Comment

ID: 6928605
If you are refering to the export icn on the CR viewer, you can make it visible or invisible from VB.

If you are using the ActiveX control you use the following

  CR_Report.WindowShowExportBtn = False

To automatically generate a file you can do something like this

Public Sub print_File_from_View(txt_Report_File_Name As String, _
                            txt_Rec_Select_Formula As String, _
                            txt_Disk_File_Name As String)

    cr_Rpt.ReportFileName = txt_Report_File_Name
    cr_Rpt.ReplaceSelectionFormula txt_Rec_Select_Formula
    cr_Rpt.Destination = crptToFile
    cr_Rpt.PrintFileType = crptWinWord
    cr_Rpt.PrintFileName = txt_Disk_File_Name
    cr_Rpt.ProgressDialog = False
End Sub

PrintFileType can have many different values depending on what convertors you have loaded. (Excel, text, CSV, etc)

good luck

Author Comment

ID: 6930894
Hi mlmcc,

thank you very much for you reply as i was waited for a day!!!!

Based on your solution, my have question for your clarification.

1. Is the user need to click on the export icon in CR viewer? I don't want user to click on any icon to export the file. Which means end of the month, the system auto generate the report without user involved.

2. You public function does the automation generation of report?


LVL 100

Expert Comment

ID: 6932919
Yes it will automatically generate the file.  In fact we generate the file and then e-mail to the customer.

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.


Author Comment

ID: 6933077 you had done the automate the report generation project. That good!

Appreciate if you could show me an working example code (full) to automate the report generation.

The mark definetely is for you!
LVL 100

Expert Comment

ID: 6935766
Basically what I gave you is a full example.  There are a couple of declarations and then the components you must add.  I'll try to find it tonight otherwise I'll add it at work tomorrow.

LVL 100

Expert Comment

ID: 6935791
Here is an example from Crystal.  You may find it useful.  I'll still provide what i have.


Author Comment

ID: 6936037
hi mlmcc.

Thank you very much.

You can send to

Thanks again!
LVL 100

Accepted Solution

mlmcc earned 100 total points
ID: 6937054
Unfortunately my application is much to large to send and is very database specific (MS SQL) but here is a documented excerpt from the code with the required references.  This will create the report in a file ready to be opened by the application  It ispossible to have the application started from VB after the report is complete and open the file.

Add the following component to the project
Crystal Report Control

Add the following references to the project
Crystal Reports 8 ActiveX Designer Design Time Library
Crystal Reports 8 ActiveX Designer Run Time Library
Crystal Reports 8 Standard Wizard Library

On the MDI form or a form used to print the report add the following


‘  Create a Crystl Report object  - uses the ActiveX control

Dim WithEvents cr_Generic_Report As CrystalReport

Behind the Button or in a procedure add the following code to print to the file

‘  Set the report to produce.  Must unclude the full path, filename and extension

    cr_Generic_Report.ReportFileName = “c:\Database\Reports\My_Report.rpt”

‘  Allows changing the WHERE clause of the query

    cr_Generic_Report.ReplaceSelectionFormula “{} = 5”

‘  Where do you want the report to go
‘     File               crptToFile
‘     Preview          crptToWindow
‘     Printer               crptToPrinter
‘     Mail               crptMapi
‘     MS Exchange          crptExchange

    cr_Generic_Report.Destination = crptToFile

‘  If you are going to a file what type and the file name
‘     MS Word     crptWinWord
‘     MS Excel     crptExcel50
‘     Text File     crptText
‘     RTF File     crptRTF

    cr_Generic_Report.PrintFileType = crptWinWord
    cr_Generic_Report.PrintFileName = “c:\my_documents\my_report04022002.doc”

‘  Display the progress dialog box

    cr_Generic_Report.ProgressDialog = False

‘  Execute the report


‘  Reset the Crystal Object – allows printing multiple reports

good luck

Author Comment

ID: 6941572
hi mlmcc,

would test out the your code.


Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction While answering a recent question ( in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

791 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question