Visual Basic :: Need Help In Using VB/VB.NET To Create Crystal Reports, Convert To Pdf Format And Email Them

In Crystal Reports, How To Display Financial Reports (P & L, Balance Sheet Etc.) In Columnar Format
Dear All,

I am developing a Financial application using VB6, MS-Access & Crystal Reports 8.5. I am facing problems in certain reports. Some of the reports like Profit & Loss and Balance Sheet require the output to be printed in columnar format.

I have tried giving subreports for each section, i.e.; Assets & Liabilities, but then, the output is not coming in order as per the groups. The problem is even more where there are sub-sections in the right side column & left side column for example in Profit & Loss, where there are sub-sections for Gross Profit/Loss and Net Profit/Loss. In such cases, how to bring the total amount fields at the same horizontal level.
I hope someone can help me how to do the above.

Thanks in advance.

Best Regards
Mahesh

Convert Crystal Reports-report To PDF
Hi all,

I have the following problem:

I need to convert a Crystal Reports-report to PDF-format. I'm doing this with the SelectPrinter and the PrintOut method of the report-object. The problem is, that there's still a window appearing asking me for a name to save the file with. I would like to do this automatically, but can't find the proper methods.

Thanks in advance for any help.

Kris

Crystal Reports And Email
Vb 6 Enterprise Edition, Crystal Reports XI - Developers Edition

In the CR Technical Document, It mentions that a CR document can be sent via email. Except for CRExportDestinationType, there are no examples or write-ups that I can find.

Can anyone give me some help in this area?

Thanks,
Sam

Crystal Reports By Email
Hi,

I am using VB6 and Crystal Reports 8.5 and I have a program that produces a delivery docket in Crystal Reports. The customer wants to be able to either print this docket, which is fine, or to email this report to their customer. I haven't been able to find any code or CR object to allow this. Can anyone help?

I've seen people export the report out to a pdf or word doc and then send this on, how can this be done?

Any suggestions are welcome.

Baz.

Email Using Crystal Reports
We have a application in vb 5.0 and crystal 7.0. The application generates a report containing letters to be send to the customers. at one time the report generates more than 50 letters. this letters are to be directly emailed to the customers. the email ids of the customers are stored in a table of customers in access ( which is a backend for the application). the letters are printed depending on the group created on customer id in the crystal report and are normally printed 1 group(customer) , 1 letter per page. Please suggest how can i send these 50+ letters to individual email ids. Please suggest how can i send these 50+ letters to individual fax nos. please note that the content of each letter is different and contains data from other table.

App To Send Email Using Crystal Reports
Can anyone direct me to a place where I can find some references(tutorials, code sample, etc.) on how to build an app that will send an email every night based on some criteria from a db(date). Here's what I'm trying to do. I have a db with about 100 projects and I need to send an email out to two people in each project if that project has been updated. The email should go every night with a report created in Crystal Report in a pdf format (the report if done, I need to find out how to automate the report creation however). So, each email would contain a report with all projects that have been updated today, if no project has been updated today, no email should be sent. Any help is much appreciated.

Thanks!

Crystal Reports Format
i want to generate a autoincrement field in crystal reports how is it possible
ex format of report
date:
invoice no:

sno salesman productdesc tax rate qty amount

amount payable rs
thank u

here srno is the item no it is not stored in database
for each each invoice it shouls start from 1 and then
it should increment by one after each product
it is a preprinted format and how to filter it for a part invoice range
and after some products it should print in next page
because since this is preprinted if more items
is there and if it is not able to fit in same
bill then it should start priting the rest of items in next
bills (so after certain products in a invoice it should start printing in next bill) with crystal reports how is it possible using vb 6 application

Crystal Reports Number Format ?
Anybody know how to format a number as a percent in crystal reports? I hink I've tried everything but the right way yet.

Thanks Don

Time is the best teacher; unfortunately it kills all its students.

QuickReport (.QRP) Format To Crystal Reports
I am re-engineering an application originally developed using Delphi to Visual Basic. The reporting feature of the application was using a reporting component by the name of QuickReports.

Does anyone know if it is possible to convert a QuickReport (.QRP) to Crystal Reports format? Or of a standalone tool that would allow me to view the design of a QuickReport?

Also please note that I do not have any Delphi or QuickReport components installed on my PC.

Crystal Reports Date Format Issue
hi all, distraught, disgruntled and distressed. i really hope this is something simple and i've just been doing all kinds of crazy gymnastics because the trees were blocking my forest.

i'm creating a periodic report (dates given as params) but the data that i have to compare to the selected dates is of type 'number' on a remote as400.

i've been using string manipulations to get the date parts out and then the date conversion to put them back together to compare with the parameters. but at that point i get the error: "too many arguments have been given to this function". the month day and year formula fields are working properly...what gives?

(crystal syntax)CDate ({@TESTYR}, {@TESTMO}, {@TESTDY})@TESTYR =
Left (Right (REPLACE(REPLACE(CSTR({WRSCONV.WRDTRC}),",",""),".",""), 6), 4)@TESTMO =
IF LEN(REPLACE(REPLACE(CSTR({WRSCONV.WRDTRC}),",",""),".","")) = 9 THEN
Left (REPLACE(REPLACE(CSTR({WRSCONV.WRDTRC}),",",""),".",""), 1)
ELSE
Left (REPLACE(REPLACE(CSTR({WRSCONV.WRDTRC}),",",""),".",""), 2)

@TESTDY =
Left (Right (REPLACE(REPLACE(CSTR({WRSCONV.WRDTRC}),",",""),".",""),8 ),2 )
(/crystal)

i'm also trying various SQL date conversions but it doesn't like this:

SUBSTRING(CAST(WRSCONV."WRDTRC" AS CHAR), 5, 4) because of the casting, i believe.

the data is coming from server at another agency, so i haven't any control over the format

am i making this more difficult than it needs to be? am i going to be embarrassed tomorrow that i even posted this because it's such a no-brainer (i hope!)?

TIA!
becky

Crystal Reports Phone Number Format
i need a format for telephone numbers. i see other ones e.g. date/time/currency etc., but i cant see either a phone number one or a custom one where i could make my own mask.

my data comes in as 1234567890 and i need it formatted like

(123) 456-7890

thanks.

Printing File Using Crystal Reports In Nlq Format
How to print a file using crystal report in a quick format
The print should be as fast as printed through a DOS editor.
Please provide a solution for this (my client wants his report to print as faster as his Tally package prints)
How to print a file using crystal report in a quick format

Crystal Reports - Change Currency Format
I've designed some reports that will be used in different areas (Ireland & UK), so my VB app needs to be able to change the report currency format at run time.

I assume you're able to do this using the Crystal Automation Engine, does anyone know of any source for this - must be something that people do quite regularly!

Any links/code appreciated

Thanks

Create Report In Crystal Reports
Hi friends

i am working on a project where i want to call crystal report .
am using vb 6.0 and crystal report 7.
the coding i have done is as follows

formdtl.crystalreport1.connect="dsn,uid,pwd"
formdtl.crystalreport1.reportfilename="report name"

am not getting any output.

formdtl.crystalreport1.action = 1
gives error like - " invalid file name " the property is write only"

so please help me to solve this problem, also i want to know is how formula property can be used in this.

expecting quick response

thanks ,
kalpana

Crystal Reports - Create By Date
I need a way to pass a date parameter from a VB program to a crystal report objext so the crystal report will generate a report based on the month pased. For example:
The vb Program will pass a month parameter to the CR object then create a report of all transaction for that month.

help

Beginner??how To Create Crystal Reports?
hi,

iam working with VB6,ADO,MSAccess extensively.upto now iam creating reports only text based.

now i want to start designing reports with visual basic and crystal reports(i had a version of 8)

how to start designing reports with visual basic,crystal reports.

is there any samples which will give me a starting confidence of how to design and call reports from visualbasic?

please provide me any examples or code samples...

regards
varma

Howto Create Forms In Vb With Crystal Reports
hi folks
i am using vb for developing an database application. iwant to
create reports. the reports will contain 4 parameters. dependingon the
parameters that i gave on the forms in vb i want report to contian that data
only.
suppose the four fiels are (1. mainlot, 2.)sublot,3.)start_Date,4.)
end_date ) depending on the no. of parameters enter on the opened form the
reports contians that particular data. how can i achieve this in vb using
crystal report. iam using access 2000.
thankx in advance.

How To Create Crystal Reports Using MSDE 2000?
Hi,

I am using Crystal report 8.5. My Database sqlserver 2000. I generated reports and are working fine.

Now I want to use MSDE 2000 instead of Sqlserver 2000 due to license factor.

My application is developed in VB 6. The all the parts of the application is working fine except the report.

All reports produced Database DLL error.

So I opened the report and try to verify the database. But it gives pdssql.dll not found. Database error.

After this error, I tried to create a new report and found that there is no option for MSDE 2000 database selection under more database.

I usually select Sql server 2000 database under More Database option of location wizard.

How to create crystal reports using MSDE 2000?

Is it due to crystal report 8.5 verison problem? I also have crystal report 11 licensed copy.

Please give me the good solution as early as possible

Regards
S. Muhilan

How To Create Executable In Visual Basic 5.0 Using Crystal Reports
I am moving an application from one server to another. I have changed all places that had the database location of the old server. I try to click on the make executable and it
runs for awhile and never finishes. I end the visual basic session and bring the machine down and backup try again and it does complete but I am getting no city, state and zip on labels produced in a crystal report. I am not sure if it is memory (win 95 - 32mb) , needed object missing, or the make executable problem. Please help - i searched all through here and have not found anything that resembles this problem.

Create Text Fields In Run Time For Crystal Reports 6.0
i'm currently using visual basic 6.0 with crystal reports 6.0

on the report i need to create textobjects at run time...
and it all depends on a string which resides on another form of the project

the contents of the string is something like this "english chinese"
the diff subjects are separated by spaces.
the string can be "english malay chinese" depending on wwat the user selects. ok now for the real thing

if the string contains 3 subjects, i need to create 3 textobjects on the report each containing the respective subjects.

is that possible? urgent help needed

or u can also email me at
s7606366@np.edu.sg
thanks

VB6 Crystal Reports XI Release 2 - Create Bookmarks From Group Tree
Does anyone know if it is possible to programmatically set the export option for CreateBookmarksFromGroupTree using CR XI Release 2 with VB6? I have found a way to do this using .NET, but the same functionality does not seem to exist in VB6. Thanks in advance for any guidance.

Can Excel Format Be Convert Word Document Format??
can I write the macro that convert the excel data to word?

How To Convert .RM (Real Media) File Format To .MP3 Format?
Any One Knows

How to Convert .RM Files to .MP3 Files?

Please Needed Links/Articles/Sample Codes/Suggestion...!

Advance Thanx to All VBCITIzens...

Open Default Email Client, And Format Email
ok this is wat i got

Code:
ShellExecute Me.hwnd, "Open", "mailto:me@me.com?subject=Statistics&body=FORMAT THIS TEXT HERE", vbNullString, vbNullString, 5

now how would i format:

FORMAT THIS TEXT HERE?

i cant do nething to format it, is there a way to do it this way?

i know you can do it other ways but then you need code for each email client, and i dun want that

any help would be apreciated
thankyou very much

Convert The General Format To Text Format
hi all ,
In excel sheet i want to convet the particular from general format to text.can we do in VBA macro?.

when I'm importing the data from xml to excel 0567899 field value is imported as 567899 as a general format in excel.but i need this value shud be 0567899 in text format can any one help this thing.

Thanks and regds,
noorjahan

Can You Tell Me How To Convert A SVG File Format ToPDF Format From VB.
Hi All,

Can you tell me how to convert a Scalable Vector Graphic (SVG) file format to PDF format from VB.

Thank you so much for your response...

Thanks
Radhakrishnan

Convert Tiff Format To Geotiff Format
Hi to all guru out there,

Currently i need to convert Tiff format to geotiff format. Could anyone suggest any tool and procedure that will assist me in converting my image file.

Is it truth that the resouation will not be affected after converting?

Thank you very much

Email Multiple Acc97 Reports In One Email Msg
I have an AC97 app that generates 8 daily reports. I currently have it save the reports in rtf format (with VBA) on my hd and then I manually attach the reports to the distribution list. I would like to automate this in a way where the reports are all attached to a single email msg through code. I have used the sendmail method previously but it doesn't seem to support multiple attachments. OUr email system is Outlook 2k & exchange server. Any suggestions would be welcomed

Sam Draper
Ill Sec of State
Dept of Info technology
Distributed Applications Group

Data Reports Active Reports Or Crystal Reports
Hi all

I am really stuck here and i need help urgently
I have to call three tables in a row to print a single invoice entry
noe the problem is if the do it by calling single tables then there is a problem that it is nopt going to print the last order which is filled.Is there is any way it can be done through using sql command or something.
Secondly if i use max order in sql then i would not be in a position to print order after searching for it

Thanx

Can You Tell Me How To Convert A SVG File Format To PDF Format From VB6.0??
Hi All,

Can you tell me how to convert a Scalable Vector Graphic (SVG) file format to PDF format from VB.

Thank you so much for your response...

Thanks
Radhakrishnan

Convert 8.3 Format To Long Name Format?
Hi all,
I need to convert an 8.3 formatted path to the long name format.
I think the function GetFullPathName can do this, but i'm not sure how to use it. Anyone knows how??
Thanx...

Convert 2000 Format To 97 Format? , How?
Hi,
Can I make a program that can change word2000 and excel2000 documents in office97 format ?.There is a lot of document ( more than 1000 ).How?

Change The Database Location In Crystal Reports Sub Reports From VB During Runtime
I have several reports that were designed in Crystal Reports that have the DB location changed during runtime. When I move my database, or choose another copy of the DB that has a lot of records in it, my reports don't fire. I need to be able to Verify the database during runtime. I'm usiung VB6.0 and CrystalReports8.5 I've tried using Crystal's "Verify On Every Print" function, but I haven't had any luck. Here is the code I am using.

MyLocation = "C:mydatabase.mdb"
CRPE321.ReportFileName = "c:aptcom
eports eninfo.rpt"
CRPE321.DataFiles(0) = MyLocation
CRPE321.ParameterFields(0) = "ThisKey;" & Who.Text & ";true"
CRPE321.PrintReport

Also, does anyone know if changing the DataFiles location during runtime also effects the subreports. I don't think it does, but any input would be appreciative.

Need To Understand Data Reports - Heard That Crystal Reports Were Slow
I have two questions:

1.) I was going to take a step forward to learn how to use crystal reports but I heard that on a website they are viciously slow. Is that true or is there a way around that with coding?

2.) I have been using Access reports through Visual Basic 6.0 with the following code - thanks for the tremondous help of everyone on this website:

Code:
appAccess.OpenCurrentDatabase SERVER & "disp-1_be.mdb"
appAccess.DoCmd.Maximize
appAccess.DoCmd.OpenReport "oalog", acPreview
appAccess.Visible = True

The reports work great UNTIL I came accross a situation where the report is based off of the data entry of the user. oalog is a monthly report and in the query it automatically pulls the current month with the following query:

Code:
SELECT oalogallmonths.ctsbranch, Count(oalogallmonths.Amount) AS [Total Of Amount], oalogallmonths.GivebyName, oalogallmonths.United, oalogallmonths.Mayflower, oalogallmonths.Other, oalogallmonths.Tord, oalogallmonths.CURRENTDATE, oalogallmonths.Amount, oalogallmonths.Month1, oalogallmonths.ORDER
FROM months, oalogallmonths
WHERE (((months.monthID)=[oalogallmonths].[Amount]))
GROUP BY oalogallmonths.ctsbranch, oalogallmonths.GivebyName, oalogallmonths.United, oalogallmonths.Mayflower, oalogallmonths.Other, oalogallmonths.Tord, oalogallmonths.CURRENTDATE, oalogallmonths.Amount, oalogallmonths.Month1, oalogallmonths.ORDER
HAVING (((oalogallmonths.Amount)=11;

If you notice the records are pulled HAVING the 11th month in there.

If I want the user to ENTER the month I know that I must change the last line to:

Code:
HAVING (((oalogallmonths.Amount)=[ENTER MONTH]));

But a user might type January or 12/2003, etc...

so I made a combobox named ListMonth of the 12 months.
Then I made the change from:

Code:
HAVING (((oalogallmonths.Amount)=11;
to

Code:
HAVING (((oalogallmonths.Amount)=ListMonth.ListIndex + 1));

The only problem is that I keep getting a message box asking for ListMonth.ListIndex + 1.

My question is in the above code that defines appAccess.DoCmd.OpenReport "oalog"...
is there a way to change the RecordSource of the report to pull from my own query instead of the Access Query?

Thanks,
Stephen

Crystal Reports - Upgraded To 8.5, Now Reports Written In 8.0 Wont't Work!!!
My reports are crashing when I run them on a machine with CR8.5, but they work fine on cr8.0. They crash inside the .DiscardSavedData Routine.

Does anyone know why or what I can do...

I call the report.Printout routine and right after I call the
.DiscardSavedData. The report is still printing out in debug mode.

Please help. Is my syntax wrong. The help file says I can only use Printout and DislcardSavedData in "formatting idle" mode. I don't know what this this???? The .PrintOut routine works but not the discardsaveddata.

Thanks,

Any help is appreciated.

M

How To Use Crystal Reports To Make The Dynamic Reports?(I Can't Use The Design Expert To D
  How to use Crystal Reports to make the dynamic reports?(I can't use the design expert to design the report,because the data source with different fields is unknown in design time.)
     Hello all!
     I use the dynamic generating MS Access table as the Data Source of Crystal Report.
How to use the Crystal Reports to display the data of the dynamic generating MS Access table?
     Thanks All!
                                                    China

Edited by - dehuiworkroom@hotmail.com on 12/17/2003 9:37:59 PM

Change The Database Location In Crystal Reports Sub Reports From VB During Runtime
I've created a Report Viewer that displays Crystal Reports 8.5 reports. I have the DB location in Crystal Reports changed during runtime, but I can't get the location to change in the subreports at runtime as well. Also, by using my method of calling the reports, I can't get VB to pass any parameters to the Main report. Below is the code that I am using. I'm using VB 6.0 and CR 8.5

Dim MyNewKey
MyNewKey = Who.Text

' On Error GoTo KeepGoing

MyLocation = GetStringValue("HKEY_LOCAL_MACHINESoftwareAptCom", "AptCom DB Path")
strReportFile = "c:aptcom
eports eninfo.rpt"

Set CRReport = New CRAXDRT.Report
Set CrxApp = CreateObject("crystalruntime.application")
Set CRReport = CrxApp.OpenReport(strReportFile)
' Set CRReport.ParameterFields(0) = "ThisKey;" & MyNewKey & ";true"

' KeepGoing:

For Each dbTable In CRReport.Database.Tables
dbTable.SetLogOnInfo "", MyLocation, "", ""
dbTable.Location = MyLocation
dbTable.SetDataSource MyLocation
Next dbTable
CRReport.Database.Verify

CRReport.SQLQueryString = strSQL

frmReportViewer.Show
frmReportViewer.CRViewer1.ReportSource = CRReport
frmReportViewer.CRViewer1.ViewReport

Set CRReport = Nothing
Set CrxApp = Nothing
Set CRReport = Nothing

>>>>
I've tried using this method:

MyLocation = "C:mydatabase.mdb"
CRPE321.ReportFileName = "c:aptcom
eports eninfo.rpt"
CRPE321.DataFiles(0) = MyLocation
CRPE321.ParameterFields(0) = "ThisKey;" & Who.Text & ";true"
CRPE321.PrintReport

But, I can't get Crystal Reports to verify the database during runtime. The first way verifies the DB, but won't change the DB location of the subreports or pass parameters to the reports.

Any help would be appriciative.

Crystal Reports- I Need Help Running Reports With A Shared Database.
I am trying to figure out how to use a shared database in crystal reports. I have it set up for my application were I use: App.Path +
"databaseWMdbase.mdb" But in crystal reports it makes you use a drive name. I am trying to use the UNC but when I run it on the computer without the physical database it tells me Database not found... is there a way to set the Location of the database in the form load like you do with ADO? Any help or Ideas would be great.

I Hate Reports. Trash Crystal Reports, Access Instead?
I am creating an app which requires a copius amount of complicated reports. These reports would be an absolute breeze to do in access, simply create a query that does all the work then base the report on that. Instead of wasting time with Crystal Reports, I'd love to be able to create an access query and then run an access report based on that query from within my VB app. Now I have code that allows me to run an access report, but it seems to require that access is open on the users machine at that time. Is there any way I can achieve what I need without opening access each time ?

Export Reports Created Using Crystal Reports 8.5 To MS Excel
i would like to know if there is a way out to export reports created using Crystal reports 8.5 to MS Excel directly with out the user doing it manually, by coding in VB6.0.
If yes please give me the codes.

Crystal Reports Using ActiveX Viewer For URL Linked Reports
Hi,

We have a IIS service that broadcasts a virtual directory of reports so that they can be viewed using the crystal reports ActiveX viewer through an IE browser.

I am now trying to replicate this setup on another server, the IIS service is setup and URL's created for our reports. When they are selected the browser defaults to the Crystal Enterprise logon screen. Where do i change the settings so that the ActiveX viewer is used in the browser to view the report?

Many thanks,

Al

Retrieving Images In Crystal Reports And Data Reports
I am saving the image path in the database and retrieving it for display but the problem is when I want to print the image for that particular record when I am only saving the image path in the database.

If I embed the image in the database it increases the size of the database but can be used in the reports in a bounded image control.

If somebody can help me retrieve the image in a data report/crystal report by using the image path in the database that did be great.

Thanks,
Kamran

Grouping Records In Data Reports / Crystal Reports
Hi

I want to group records in my Data Report based on 2 particular fields. Just see the example below.

Below is the Table Structure and its values

UnitID Part Quantity
1 xx 5
1 xy 10
2 xx 5
2 xy 10

Now I want to result to show the summation of quantities based on the part only.

so the result should be

Part Quantity
xx 10
xy 20

It would be fine if someone can tell me how to do this in Crystal report/ VB data reports

Thanks
Kumaran

Want To Create Reports In Access And According To That Reports I Have To Generate PDF
Through my VB code i am reading an Excel sheet and dumn the data of Excel Sheet in MS Access table.This part is working fine now but the problem is this
according to a field name Vendor no i have to create MS Access report dynamically,what i mean to say that if i have 3 same vendor number so when i am inserting the Excel data in Access table at that time only i have to generate an Access report based at the vendor no and generate a PDF file for that Vendor no.All the procedure is in a loop becuase we have different vendor numbers so when the process of one vendor number completed code should search for the next vendor no and do the same process insert it into Access table,create access reports for that vendor number and make a PDF file for that vendor.Please some one help me out its very urgent.
Thanx in Advance

Anybody Know How To Get Crystal Reports 10 Reports Working In VB Studio 6?
It seems that there are a few posts regarding Crystal Reports 10...few from me. However there are 0 responses dealing with any really developer issues. Has anybody moved to using CR10 or are you people still using 8.5 or another version. Could you tell me what version you guys are using so that I will stop posting issues about CR10

Crystal Reports, Printing Data Reports
how do you filter records in Crystal Reports using a variable? I'm using Crystal Reports ver. 4.6.1 Why does a time field shown as mm/dd/yy when it should be hh:mm? Is there an easy way to print data reports with filtering or conditions in vb?

Problem Accessing Reports In Crystal Reports 9.0 From VB
Hi.  I use the following code in a number of VB apps to execute Crystal Reports.  It has worked fine with CR 7.0 and CR 8.0.  Now, with upgrade to 9.0, code will not work.  Error message is "Unable to load report".

I've played around with some of the references and componenets for 9.0, but haven't had any success.  Anyone encountering same problem?  Any workaround without incorporating the crystal viewer?  Any help would be greatly appreciated.

Thanks.  TM.

-------------------------------------------------
Public Sub PrintCrystalReport(CrystalReport As Object, _
                              Optional ReportName As String, _
                              Optional criteria As String)
On Error GoTo problems
    Dim i As Integer
    Dim n As Integer
    Dim a As Integer
    Dim response As Integer

    With CrystalReport
       .Connect = "DSN=" & strCurrentServer & ";UID = crystalreports;PWD=crystalreports;DSQ=" & strCurrentDatabase
       .ReportFileName = App.Path & "Reports" & ReportName
       For i = 0 To .GetNSubreports - 1
            .SubreportToChange = .GetNthSubreportName(i)
            .Connect = "DSN = " & strCurrentServer & ";UID = crystalreports;PWD =crystalreports;DSQ = " & strCurrentDatabase & ""
       Next
       .SelectionFormula = criteria
       .WindowState = crptMaximized
       response = MsgBox("Would you like this report sent to the printer?", vbYesNo, "Send Report To Printer")
       .PrinterSelect
       If response = vbYes Then
          .Destination = crptToPrinter  'Print to the Screen
       Else
          .Destination = crptToWindow    'Print to the window
       End If
       .Action = 1
    End With
    Exit Sub
problems:
    MsgBox "There was an error trying to print this report.", vbCritical, "CRYSTAL REPORT ERROR"
    MsgBox Err.Description
End Sub