Error en un recordset

[shashas]

Hola a todos.

Verán mi problema está en que me sale el siguiente error

"No se estableció ningún texto de comando para el objeto de comando"

el consultar en la BBDD.

Tengo un módulo de conexión con el siguiente código.

Public Function Connexion()
Dim Conn As Connection
Set Conn = New Connection
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\BBDD.mdb;Persist Security Info=False"
Conn.CursorLocation = adUseClient
Conn.Open
Connexio = Conn
Conn.Close
End Function

Y desde el formulario hago lo siguiente:

Public Sub Form_Load()
Set rs = New Recordset
rs.ActiveConnection = Connexion.Connexion
rs.Open Options:=adCmdText
End Sub

Me falla en la línea del rs.Open.

Ya no sé dónde mirar.

Muchas gracias de antemano