Results 1 to 8 of 8

Thread: [RESOLVED] vb6 crystal reports

Hybrid View

  1. #1

    Thread Starter
    Frenzied Member
    Join Date
    May 2003
    Location
    Sydney
    Posts
    1,123

    Resolved [RESOLVED] vb6 crystal reports

    OK, i was trying to do a report in crystal reports. mind u all, i've never done reporting thru any data reports except for thru excel.

    now it turns out that i have absolutely no idea on creating reports without using a data environment.

    i am using ado connection. i have the recordset ready. i do have the report ready too. just that i dont know how to bind the recordset to the fields in the report.
    VB Code:
    1. CrystalReport1.Database.SetDataSource dbRS
    says error 9, subscript out of range.

    does anybody have a step by step tutorial on this? this is urgent and i am ready to sleep. sorry, not even have time for a search right now.

    thank you.

  2. #2

  3. #3
    Ex-Super Mod RobDog888's Avatar
    Join Date
    Apr 2001
    Location
    LA, Calif. Raiders #1 AKA:Gangsta Yoda™
    Posts
    60,709

    Re: vb6 crystal reports

    Here is an example of using the CR Viewer control but it shos how to bind your recordset as you were missing some parameters.

    Also, you need to set up a ADO connection in the CR IDE for your report. This is how you would bind the textboxes to your fileds, do aggregrate funtions, etc.

    VB Code:
    1. Option Explicit
    2. 'Add reference to Crystal Reports x.x ActiveX Designer RunTime Library
    3. 'Add reference to Crystal Reports Viewer Control
    4. 'Add reference to Microsoft ActiveX Data Objects 2.x Library
    5. 'oCnn = current open ADO connection object
    6. Private Sub Command1_Click()
    7.  
    8.     Dim oApp As CRAXDRT.Application
    9.     Dim oReport As CRAXDRT.Report
    10.     Dim oRs As ADODB.Recordset
    11.     Dim sSQL As String
    12.  
    13.     sSQL = "SELECT * FROM Table1"
    14.     Set oRs = New ADODB.Recordset
    15.     Set oRs = oCnn.Execute(sSQL)
    16.     Set oApp = New CRAXDRT.Application
    17.     Set oReport = oApp.OpenReport(App.Path & "\MyReport.rpt", 1)
    18.     oReport.Database.SetDataSource oRs, 3, 1
    19.     crvMyCRViewer.ReportSource = oReport
    20.     crvMyCRViewer.ViewReport
    21.  
    22. End Sub
    VB/Office Guru™ (AKA: Gangsta Yoda®)
    I dont answer coding questions via PM. Please post a thread in the appropriate forum.

    Microsoft MVP 2006-2011
    Office Development FAQ (C#, VB.NET, VB 6, VBA)
    Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
    If a post has helped you then Please Rate it!
    Reps & Rating PostsVS.NET on Vista Multiple .NET Framework Versions Office Primary Interop AssembliesVB/Office Guru™ Word SpellChecker™.NETVB/Office Guru™ Word SpellChecker™ VB6VB.NET Attributes Ex.Outlook Global Address ListAPI Viewer utility.NET API Viewer Utility
    System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6

  4. #4

  5. #5
    Ex-Super Mod RobDog888's Avatar
    Join Date
    Apr 2001
    Location
    LA, Calif. Raiders #1 AKA:Gangsta Yoda™
    Posts
    60,709

    Re: vb6 crystal reports

    Yes, my example is based off of my version - 8.5 developer. But I mostly wanted to show how to set the .SetDataSource correctly. Wasnt even sure if he is using a preview or not. Just a bonus.
    VB/Office Guru™ (AKA: Gangsta Yoda®)
    I dont answer coding questions via PM. Please post a thread in the appropriate forum.

    Microsoft MVP 2006-2011
    Office Development FAQ (C#, VB.NET, VB 6, VBA)
    Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
    If a post has helped you then Please Rate it!
    Reps & Rating PostsVS.NET on Vista Multiple .NET Framework Versions Office Primary Interop AssembliesVB/Office Guru™ Word SpellChecker™.NETVB/Office Guru™ Word SpellChecker™ VB6VB.NET Attributes Ex.Outlook Global Address ListAPI Viewer utility.NET API Viewer Utility
    System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6

  6. #6

  7. #7
    Addicted Member
    Join Date
    Nov 2005
    Posts
    153

    Re: vb6 crystal reports

    This tut for Crystal Reports 9 . Maybe it will help

    http://www.vbmysql.com/articles/crys...alvbmysql.html
    This is The Prophet MOHAMMAD!
    =======================
    My SuperMen:
    RhinoBull, gigemboy, jmcilhinney, |2eM!x, Edneeis and Hack

  8. #8

    Thread Starter
    Frenzied Member
    Join Date
    May 2003
    Location
    Sydney
    Posts
    1,123

    Re: vb6 crystal reports

    thanx to everybody who posted. i finally did make it work. it was a bit tricky but i did get it to work.

    i am using cr9. i used robdog's code. not from here but i found it in one of his sigs.

    i did use the cr9 help files to create the initial report first. then used robdog's code. but i did use a
    VB Code:
    1. crViewer.DiscardSavedData
    so that the report didnot show any previously saved data.

    and again thanx to all.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width