PDA

Click to See Complete Forum and Search --> : How add Crystal Report Version 11 in VB6?


Winanjaya
Jan 26th, 2007, 03:14 AM
Dear All,

How add Crystal Report Version 11 in VB6?

Thanks & Regards

Winanjaya

Hack
Jan 26th, 2007, 06:51 AM
Moved to reporting

Besoup
Jan 26th, 2007, 07:06 AM
First will need to add the following reference to your program:

Crystal ActiveX Report Viewer Library 11.0

Once you have done that you will have to add the CrystalActiveX Report Veiwer control to your project some where. Then you can use the following code to veiw the report in that control:

Private Sub RunReport()
Dim crxApp As New CRAXDDRT.Application
Dim crxReport As CRAXDDRT.Report
Dim crxDatabaseTables As CRAXDDRT.DatabaseTables
Dim crxDatabaseTable As CRAXDDRT.DatabaseTable
Dim crxDatabase As CRAXDDRT.Database
Dim crxParm As CRAXDDRT.ParameterValues
Dim crxSubReport As CRAXDDRT.Report

Dim ReportName As String

ReportName = "\\SERVER\Other\Reports\PL.rpt" 'Report Path

Set crxReport = crxApp.OpenReport(ReportName)

'crxReport.PrintOut False, 1 'uncomment to printout the report

With crView 'Control Name
.ReportSource = crxReport
.ViewReport
While .IsBusy
DoEvents
Wend
.Zoom "75"
.Visible = True
End With


End Sub

asd9001
Jan 31st, 2007, 03:42 AM
See Thes Post May Help you

http://www.vbforums.com/showthread.php?p=2723481#post2723481