Skip to Content
Former Member
Mar 31, 2009 at 07:40 AM

Logon failed in Crystal Report Viewer - VB6



Report viewer is showing logon failed, pelase help me, i can able to view the data from rs1(recorset).

please help me to fix this issue, i need to pass the sql query to my pre designed Crystal report which has all the field as same as SQL query.

Please suggest me if any other alternate way to do this , my code is below.

Environment : Crystal Report 10, Visual Basic 6

cr_preview -> CrystalActiveXReportViewer

RepName -> Fiename and path of the Crystal report is designed from Crystal Report Designer.

Function show_rep(Sql As String, RepName As String)
Dim crystal As CRAXDRT.Application
Dim report As New
Dim rs1 As New ADODB.Recordset

    If rs1.State Then rs1.Close
    rs1.Open Sql, cn, adOpenStatic, adLockReadOnly
    Set crystal = New CRAXDRT.Application
    Set report = crystal.OpenReport(RepName)
    report.Database.SetDataSource rs1
    cr_preview.ReportSource = report
    cr_preview.Visible = True
    Do While cr_preview.IsBusy
    cr_preview.Zoom 100
    If rs1.State Then rs1.Close
    Set rs1 = Nothing
Set crystal = Nothing
Set report = Nothing
End Function