Public Property ConnectionString As System.String

public System.string ConnectionString {get; set;}

private void detail1_Format(object sender, System.EventArgs eArgs)
{    
    rptSubBM rpt = new rptSubBM();    
    GrapeCity.ActiveReports.Data.OleDBDataSource subDS = new GrapeCity.ActiveReports.Data.OleDBDataSource();    
    subDS.ConnectionString = ((GrapeCity.ActiveReports.Data.OleDBDataSource)(this.DataSource)).ConnectionString;    
    subDS.SQL = "Select * from products where categoryID = " + m_categoryID;    
    rpt.DataSource = subDS;    
    ctlSubReport.Report = rpt;
}

Private Sub Detail1_Format(ByVal sender As Object, ByVal e As System.EventArgs) Handles Detail1.Format
    Dim rpt As New rptSubBM()
    Dim subDS As New GrapeCity.ActiveReports.Data.OleDBDataSource()    
    subDS.ConnectionString = CType(Me.DataSource, GrapeCity.ActiveReports.Data.OleDBDataSource).ConnectionString    
    subDS.SQL = "Select * from products where categoryID = " + m_categoryID    rpt.DataSource = subDS    
    Me.ctlSubreport.Report = rpt 
End Sub