Hola YAcosta antes que nada gracias por contestar tienes razón
Dim Sbol As String
Dim sPath As String
RM1.Filename = DBPath
sPath ="C:\RECETAS" '<================================= aqui
sbol= "SELECT ID, NOMBRE, FECHA FROM RECETA ORDER BY ID
Rm1.filename = DBPath
RM1.SetDatasetSQL("RECETA", sbol)
RM1.Execute
no se por que no lo puse ups

pero que crees no es eso me sigue marcando el mismo error, siento que es raro lo que pasa por que cuando diseño reporto y agrego la cadena sql y genero vista previa desde el propio diseñador se ejecuta perfecto pero si hago la llamada al reporte desde vb6, me marca error no se asigando el controlador y es raro por que en el diseñador me marca conexion correcta, por eso ahora mi insistencia de poder hacer la conexion desde vb6 pero marca tambien error conjunto de datos no encontrado,

fijate que he hecho los mismos pasos de generar la conexion desde el diseñador de reportes y llamarlo desde access y asi no tengo mayor problema corre perfecto, el detalle que emigre a firebird

, no se cual sea el error ya llevo 3 días y no he podido hacerlo, agradezco mucho tu interes y apoyo, espero que al igual que tu alguna persona que le haya pasado algo parecido o tenga alguna opinon o sugerencia me pueda apoyar se los voy agradecer gracias.
saludos desde México