Solved

Crystal Reports Problem... Urgent

Posted on 2002-04-24
8
234 Views
Last Modified: 2010-05-02
Hi

I have some problem in connecting viewing the report designed in crystal reports 8 from visual basic 6.

I have created a report in crystal report 8 connecting to database from crystal reports itself and i am successful in completing the report

now i want to call that report from visual basic 6, but i unable to do that. i want to give my own database connection string and query, taking that connection and query it has to display the report.

can anyone help me in solving this problem.

pls let me also know which reference i have to add in the visual basic 6.0

Thanks in advance
Hari.
0
Comment
Question by:sharibabu
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
8 Comments
 
LVL 1

Expert Comment

by:Chess
ID: 6965588
Hari,
You need something like this:

Dim i As Integer
Dim sreport_name As String
Dim sreport_fund_num       As String
Dim sreport_processingdate As String
Dim sprocess_type   As String
Dim crapplication  As New CRAXDRT.Application
Dim crreport       As CRAXDRT.Report

sprocess_type = "REPORT"
    sreport_name = "IMPEXTRUndSec.rpt"
   
    sreport_name = App.Path & "\REPORTS\" & sreport_name
   
   
    Set crreport = crapplication.OpenReport(sreport_name)
     For i = 1 To crreport.Database.Tables.Count
        crreport.Database.Tables(1).SetLogOnInfo gServerName, gDbName, gLogin, gPassword
        crreport.Database.Tables(1).Location = gDbName & ".dbo." & "sp_get_remote_trades_und_sec"
       'MsgBox crreport.Database.Tables(1).TestConnectivity
     Next i
    crreport.ParameterFields(1).AddCurrentValue (sreport_fund_num)
    crreport.ParameterFields(2).AddCurrentValue (CDate(sreport_processingdate))
    frmReport.rptViewer.ReportSource = crreport

        frmReport.rptViewer.ViewReport
       frmReport.Show

Hope this helps.
Chess
0
 
LVL 3

Accepted Solution

by:
n_narayanan earned 50 total points
ID: 6965601
You have to add a crystall reports component from
Project / Components menu.



    rptControl.Connect = "odbc;dsn=CoreFa;uid=pent;pwd=pentadmin"
    rptControl.ReportFileName = App.Path & "\Reports\" & ReportName
        rptControl.Action = 1

Where rptcontrol is the Crystal Reports Conrol Name.

Create a DSN called CoreFa (u can change this) and store the database settings.

Cheers

Narayanan.
0
 
LVL 3

Expert Comment

by:n_narayanan
ID: 6965605
If you want to supply a where clause then,

rptControl.SelectionFormula = whereclause
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 2

Expert Comment

by:corvanderlinden
ID: 6965638
Private mCRXApplication  As CRAXDRT.Application
Private mCRXReport       As CRAXDRT.Report

Set mCRXApplication =
CreateObject("CrystalRuntime.Application")

Set mCRXReport = mCRXApplication.OpenReport(ReportName)

Pass the recordset to the report engine to use as the datasource
mCRXReport.Database.SetDataSource rs

This recordset must be exactly the same as the one you used in the standalone report
0
 
LVL 2

Expert Comment

by:corvanderlinden
ID: 6965645
Reference:
Crystal reports 8.5 ActiveX Designer Runtime Library
Crystal report Viewer Control
0
 
LVL 100

Expert Comment

by:mlmcc
ID: 6966143
0
 
LVL 49

Expert Comment

by:DanRollins
ID: 7670171
Hi sharibabu,
It appears that you have forgotten this question. I will ask Community Support to close it unless you finalize it within 7 days. I will ask a Community Support Moderator to:

    Accept n_narayanan's comment(s) as an answer.

sharibabu, if you think your question was not answered at all or if you need help, just post a new comment here; Community Support will help you.  DO NOT accept this comment as an answer.

EXPERTS: If you disagree with that recommendation, please post an explanatory comment.
==========
DanRollins -- EE database cleanup volunteer
0
 
LVL 1

Expert Comment

by:Computer101
ID: 8092513
Comment from expert accepted as answer

Computer101
E-E Admin
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction I needed to skip over some file processing within a For...Next loop in some old production code and wished that VB (classic) had a statement that would drop down to the end of the current iteration, bypassing the statements that were c…
You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question