VB Code:
  1. If chkExport.Value = 1 Then

  2.         ExportToExcel rsRecordSet

  3.     ElseIf RptName2.Text = "Installation List" Then

  4.        dr1.DataMember = rsRecordSet.DataMember

  5.        dr1.Show

  6.     ElseIf RptName2.Text = "Sales List" Then

  7.        dr2.DataMember = rsRecordSet.DataMember

  8.        dr2.Show

  9.     End If

is there a way to create a datareport object like so?
Dim rtp as new datareport
set rpt = dr1

when doing this i cannot show the report. i must use dr1.show. dr1 is a datareport.