Visual Basic - recordset

hola Estoy teniendo un inconveniente al intentar traer los registros.
ya realize la conexion, y al darle activeconection al recordset me lo toma
pero no me aparece conexion. El codigo de la Funcion es.

Public Function ObtenerRegistros(ByVal cmdline As String) As Boolean

On Error GoTo ErrConexion:


cmd.CommandText = cmdline
cmd.Execute

rs.ActiveConnection = conn

If RevisaRecordset = True Then



End If


ErrConexion:

Err.Clear

End Function

Private Function RevisaRecordset() As Boolean

On Error GoTo ErrRs

If rs.State = 1 Then

If rs.EOF And rs.BOF Then
RevisaRecordset = False
Else
RevisaRecordset = True
End If
Else

RevisaRecordset = False

End If

ErrRs:

Err.Clear

RevisaRecordset = False

End Function

lo que estoy haciendo es decirle que si encuentra datos me perimita acceder.
pero al moento de consulta de filas (EOF BOF) me arroja un error que dice

Operacion no permitida si el objeto esta cerrado

me podrian decir que estoy haciendo mal

De antemano muchas gracias.....

Hola,

Donde abres el recordset ;)

yo no lo he visto,

Suerte,

SMK

pues es alli donde tengo la duda.

Estoy intentando conectarme qui
rs.ActiveConnection = conn

gracias