Hi all,
Can i link Crystal report10 with VB6? Is this new version of crystal report solve these problems:
1.when i want to print a report which is in Persian(Farsi)it omitt the last alphabets of the words in crystal report7.0
2.when i use a complex code which has number,alphabet and (/,?.!,etc)together it disarrange the code(in crystal report7.0)
Thanks for answering me as soon as possible,
Regards,
Leva

Here is a solid answer DRock that i took from another forum

Project > Components, add a reference to the Crystal Reports ActiveX
Designer Run Time Library (CRAXDRT.DLL)

From Project > Components, choos the Crystal ActiveX Report Viewer
library 10.0 (crviewer.dll)

Create a form with a CR Viewer object on it. Resize as needed.

Here's the absolute minimum code neede to run a report

Dim crxApp As CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report

Set crxApp = New CRAXDRT.Application
Set crxRpt = crxApp.OpenReport("C:\MyReport.rpt")

'To View the report
CRViewer.ReportSource = crxRpt
CRViewer.ViewReport

'To print the report straight to the printer, prompting _
the user for the # of pages
crxRpt.PrintOut False

I have the following code to pass parameter field from vb6 to the crystal report developed in CR10 but I get an error message

"details: 01000:[microsoft][odbc driver manager] the driver doesn't support the version of ODBC behavior that the application requested(see SQLsetEnvAttr)."

Can anyone tell me how to solve this?

VB Code:

    Private Appl As New CRAXDRT.Application
    Private Report As New CRAXDRT.Report

Private Sub Command1_Click()
  Set Report = Appl.OpenReport("C:\Documents and Settings\prashanth_d01\Desktop\project1\Prjt3.rpt" )
        Report.EnableParameterPrompting = True
        Report.DiscardSavedData
        Report.ParameterFields(1).ClearCurrentValueAndRang e
        Report.ParameterFields(1).AddCurrentValue "0"
        Report.ParameterFields(2).ClearCurrentValueAndRang e
        Report.ParameterFields(2).AddCurrentValue "0"
        Report.ParameterFields(3).ClearCurrentValueAndRang e
        Report.ParameterFields(3).AddCurrentValue "0"
    With CrystalActiveXReportViewer1
        .ReportSource = Report
        .RefreshEx True
        .Refresh
        .ViewReport
   End With
        Appl.CanClose
        Set Appl = Nothing
End Sub

Tnx Bro!
Workz Fine for me using MS Access Database

How bout using SQL Server 2005?
Here's Your Code (ahmed_hammam70)

Dim Appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Set Report = Appl.OpenReport(App.Path & "\Reports\Report1.rpt")
Report.DiscardSavedData
CRViewer1.ReportSource = Report
CRViewer1.ViewReport

...It sends me an error message
Login Failed for 'sa'
.. I suspect it requires password

Set the Database Logon Info and check.

(If CR is needed with SQL 2005, then i recommend you to use .net (VB/C#) which
comes with CR as part of it and you can really use those fuctionality very well)

Hope this helps

With Regards,
Raghavendra Mudugal

With Regards,
Raghavendra Mudugal

Tnx...
Raghavendra
but im Just trying to upgrade MSAccess->SQLserver 2005 and CR7->CR10 my with my old progz(in VB6)
Anyones got an idea?

If you are planned for upgradation then, put one more item in your list
VB6->VB.NET
Because CR10, they actually say it was for .NET, If you want to use CR with VB6,
CR7 or CR8 is fine, and intercepts for CR10, I guess needs CLR.

http://support.businessobjects.com/c...win_en_sp4.pdf

Anyway,


for the error "Login Failed for 'sa'", for the report which you want to show,
the Report Document object has a method SetDatabaseLogon (uid, pwd, servername,
and dbname). try checking this, might fix your problem.

Hope this Helps,


With Regards,
Raghavendra Mudugal

Hey big tnx...
u guys help me a lot!!!
ive already upgraded to vb2005, vb6->vb2005 much simpler than
vb6->vb.net and faster...tnx anyway

anyway heres the soln i made for those who still having probz

Dim Appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Set Report = Appl.OpenReport(App.Path & "\Reports\report1.rpt")
With Report.Database.Tables(1)
.ConnectionProperties("User ID").Value = "sa"
.ConnectionProperties("Password").Value = "pass"
.ConnectionProperties("Initial Catalog").Value = "MyDatabase"
.ConnectionProperties("Data Source").Value = "MyServer"
End With
Report.DiscardSavedData
CRViewer1.ReportSource = Report
CRViewer1.ViewReport

I have a VB6.0 application that calls reports developed in CR4.6. my new requirement is to get all these reports to CR10 and view from VB6.0. I just opened the rpt files saved them in CR10 and tried to view it using a simple code below

    Private Appl As New CRAXDRT.Application
    Private Report As New CRAXDRT.Report
    Set Report = Appl.OpenReport("C:\Documents and Settings\prashanth_d01\Desktop\project1\csisbcsa.r pt")

Report.Application.LogOnServer "P2SODBC.DLL", "mntst2.world", , "MN06U", "GANESH"

        With CrystalActiveXReportViewer1
          .ReportSource = Report
          .viewreport
        End With

This one returns me the below error
"IM006:[microsoft][odbc driver manager] driver's sqlsetconnectattr failed"
However evevrything goes fine if i develop a new report on CR10 and run the above code. It cribs only when i try to save reports developed in 4.6 to CR10 and then try to view it.
Crystal reports gurus plz help!!

Hello Prashu,

I too had same same problem while converting to CR4.6 to CR8.5.
But I opened the report in CR8.5 and re-reffered the ODBC database link
and refreshed the reports and saved the report with same name in diff location.

By doing this it fixed the problem.

If the above will not fix your problem then, check this link
http://support.businessobjects.com/c...v_dbissues.pdf

and go to the page 4. These are some kbarticles of CR, hope that will def helps you to fix your CR problem.

And make sure when you refresh the report, you are seeing the report data in the
preview window of the CR editor.

Hope this helps


With Regards,
Raghavendra Mudugal