ayuda con funcion que devuelve un recordset

[debspain]

gracias por responder mariano!
lo de end function ya lo arreglé, ni m había fijado.. pero sigue dando el mismo error. Me extraña que de error aunque no haga nada sobre el recordset despues de abrirlo... esto lo he hecho en visual basic muchas veces y nunca he tenido ningun problema. En cuanto a que me devuelva un array.... necesito tener un recordset, porque lo recorro en diferentes lugares de la web.
como lo ves?