I am trying to set what is in a subform (from a query), to a recordset and am useing the following...

Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim qry As String

Set cnn = CurrentProject.Connection
Set rs = Me.sfrmOpenTransactions.Form.RecordsetClone

I'm getting a type mismatch error... what is wrong