or

Dim subRpt1 As ReportServer.subrptContacts = New ReportServer.subrptContacts
srContacts.ReportSource = subRpt1 Dim subRpt2 As ReportServer.subrptCFR = New ReportServer.subrptCFR srCFRs.ReportSource = subRpt2
sqlContacts.ConnectionString = strConn sqlContacts.SelectCommandType = SqlDataSourceCommandType.StoredProcedure sqlContacts.SelectCommand = "get_contacts"sqlContacts.Parameters.Add("@p_activity_id") sqlContacts.Parameters("@p_activity_id").Value = USER2 Me.DataSource = sqlContacts
subRpt2:
sqlCFRs.ConnectionString = strConn sqlCFRs.SelectCommandType = SqlDataSourceCommandType.StoredProcedure sqlCFRs.SelectCommand = "get_cfrs"sqlCFRs.Parameters.Add("@p_activity_id") sqlCFRs.Parameters("@p_activity_id").Value = USER2 Me.DataSource = sqlCFRs Why is the second subreport not using the dataset I am assigning???