How add Crystal Report Version 11 in VB6?

Dear All,

How add Crystal Report Version 11 in VB6?

Thanks & Regards

Winanjaya

Moved to reporting

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:

VB Code:

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

See Thes Post May Help you

http://www.vbforums.com/showthread.p...81#post2723481