[VB6 en Crystal Reports 8.5] Query aan raport meegeven

[Slagroom]

Hallo mensen,

Ik zit hier te rommelen met Crystal Reports en nu vroeg ik mij af (al veel gezocht maar alles liep op niets uit, programmatjes voor oude versie of die gewoon niet werken) of het mogelijk is om een SELECT mee te geven vanuit een VB programma naar een report viewer van Crystal Reports?

[Verwijderd]

Ja, dat kan.

Als je iets meer info geeft over hoe je met het rapport omgaat (ODBC/OLE/ADO recordset) is het ook nog mogelijk om je op weg te helpen.

[Slagroom]

Ik verbindt mbv ADO. Hier heb je de code om met de database te verbinden:

code:

Private Sub ConnectDB()
    Dim con_str As String

    con_str = "Provider=microsoft.jet.OLEDB.3.51;" & _
              "Data Source=" & _
              App.Path & "\Gegevens.mdb"

    Set dbGegevens = New ADODB.Connection
    With dbGegevens
        .ConnectionString = con_str
        .Open
    End With
End Sub

Hoe kan ik onderandere hiermee een rapport met een SQL Query 'aansturen'?

[Slagroom]

Iemand?

[Verwijderd]

Alweer even geleden maar zoek in de KB van Crystal even naar Active Data.
Als je een nieuw rapport maakt in Crystal kun je als datasource een Active Data Definitions only maken. Deze functioneerd als definitie en placeholder voor een ADO recordset. Je kan dan in VB je selectie maken en deze als recordset aan Crystal doorgeven.
Niet helemaal wat je bedoelt maar het werkte bij mij goed.

[Verwijderd]

Vul een recordset (rsData) met je data en geef die mee aan je rapport. In je rapport zet je je datasource op Active Data (ADO)

code:

    Report.Database.SetDataSource rsData
    Report.ReadRecords

[Slagroom]

Verwijderd schreef op 04 April 2003 @ 10:36:
Vul een recordset (rsData) met je data en geef die mee aan je rapport. In je rapport zet je je datasource op Active Data (ADO)

code:

    Report.Database.SetDataSource rsData
    Report.ReadRecords

Bedankt! Dit werkt!