DataMember Question

Visual Studio117
Dear All



If I have a data class with 2 datamember Recordsets, how

can you use these as normal recordsets after I have

created an instance of the class?



In Class



Private Sub Class_GetDataMember(DataMember As String, Data

As Object)

Select Case DataMember

Case "Primary"

Set Data = adoPrimaryRS

Case "Secondary"

Set Data = adoSecondaryRS

End Select

End Sub



In Form



Dim clsData as New clsData





Thanks again.



Kagsy


-