ActiveReport

Zanima me, kako v main report vključiš subreport? V navodili najdem samo to:

Private Sub ActiveReport_ReportStart()
Set srptProducts.Object = New rptTopProducts
Set srptCustomers.Object = New rptTopCustomers
End Sub
Private Sub Detail_Format()
’ Optionally set record source filter
srptProducts.Object.dcRptData.RecordSource = sTop10Products
srptCustomers.Object.dcRptData.RecordSource = sTop10Customers
End Sub
Private Sub ActiveReport_ReportEnd()
On Error Resume Next
Unload srptProducts.Object
Set srptProducts.Object = Nothing
Unload srptCustomers.Object
Set srptCustomers.Object = Nothing
End Sub

Toda kako definiram rtpTopProduscts ter rtpTopCustomer? Sem namreč novinec na tem področju.

Zdravo!

A ma maogoče še kje kdo ActiveReports 1.0 za VB6. Nujno bi ga potreboval.

LP