Access - MOSTRAR REGISTROS RECORDSET EN FORMULARIO

Hola a todos, espero que me podáis ayudar. Tengo un formulario de access en el que a través de un textbox ejecuto diversas consultas sobre una tabla de clientes. En ese form puedo seleccionar varios criterios, nombre, apellidos, teléfono, etc. Con el código VB establezco diversas consultas SQL (SELECT) y me devuelve los resultados en una varible de tipo recordset. Hasta ahi todo bien.

Mi problema es que quiero, que en el caso de encontrar registros, me abra otro formulario en el que se muestren los resultados del recordset al igual que los muestra un formulario sobre los registros de una tabla.

He leído la documentación e hice mil búsquedas en internet pero no consigo aclararme. Agradecido a quien pueda ayudarme. Gracias.

Hola!

No acabo de entender bien tu consulta, sobre todo en lo que hace referencia a la línea "me devuelve los resultados en una variable de tipo recordset".

Sin embargo, te daré una solución un poco general para ver si acierto en mi intuición de lo que debes tener.

Lo que debes hacer es:

- Créate un formulario sobre una tabla o consulta que contenga todos los datos que quieras ver, independientemente de los filtros que puedas aplicar. Supongamos que lo llamas "FResultados"

- Supongamos que los resultados te vienen dados por una SQL del tipo "SELECT * FROM Tabla", y que esta SQL la asignas a una variable String llamada miSql

- Te creas un recordset sobre la variable miSql -Set rst = currentdb.openrecordset(miSql)-

- Compruebas si ese recordset te devuelve registros - rst.recordcount-

- Creas un bloque if, de manera que:

SI (el recordcount>0) ENTONCES
Abres el formulario FResultados en vista diseño y oculto
Le cambias el recordsource por la sql
Cierras guardando los cambios
Abres el formulario FResultados en vista formulario
End SI

Algo parecido a esto:
...
If rst.recordcount>0 then
docmd.openform "FResultados",acDesign,,,,acHidden
Forms!FResultados.recordsource=miSql
docmd.close acform,"FResultados",acSaveYes
docmd.openform "FResultados"
End if
...

Creo que más o menos esto es lo que querías.

Saludos,


http://neckkito.siliconproject.com.ar

Hola Neckkito, en primer lugar, gracias por tomarte la molestia de contestar.

Aunque no me explique bien, has cogido la idea. Resumidamente tengo una tabla "CLIENTES" con sus respectivos campos (nombre, apellidos, telefono, etc). Cree un formulario para realizar búsquedas. Ese formulario tiene varias opciones que se seleccionan con radio buttons (buscar por nombre, buscar por apellidos, buscar por telefonos, etc). El sistema, en funcion de las opciones escogidas, crea una SELECT diferente. Es entonces cuando el usuario introduce la cadena a buscar en un textbox, los resultados obtenidos los almacenaba en un recordset.
Y el problema radicaba ahí, que una vez obtenidos los datos resultantes, no sabia como asignarlos para mostrarlos en un segundo formulario, es decir, que al darle al botón de buscar, me tendría que abrir otro formulario con los resultados fuera un cliente o varios.
Acabo de probar tu codigo y funciona, así que doble gracias, me estaba volviendo loco y las búsquedas de google tampoco me resolvían el problema.
Un saludo!!

Hola de nuevo Neckkito.

Como ya te comente tu código me fue estupendo. Al seleccionar unos criterios en un formulario que utilizo para consultar la BBDD, me abre el formulario "FRresultados" con el recordsource originado en la consulta sql y visualiza los resultados.

Hasta ahora me iba estupendo, pero desde que puse la BBDD en red para que sea utlizada por varios usuarios, tengo un gravísimo problema. Las consultas no se ejecutan adecuadamente y ofrecen resultados erróneos cuando la utilizamos dos o mas usuarios a la vez.

Despues de ponerme de todos los colores presa del pánico , tengo la sensación que el problema radica en el recordsource, que no se actualiza para cada consulta en red.

Por ejemplo si un usuario realiza una consulta, se abre el formulario "FResultados" con un recordsource determinado por la sentencia SQL que proceda (hasta ahi bien) pero al cerrar el formulario creo que ese origen de datos se mantiene grabado en el "FResultados" y vicia las consultas posteriores que realicen otros usuarios.

Me gustaria conocer tu opinión de experto sobre ello, o la de cualquier otro forero que se preste. Como podría solucionarlo.

Gracias por adelantado. Saludos.

PD: La BBDD esta bien configurada en red, la inserción de otros datos funciona correctamente y la tengo "sin bloqueo de registros" y en modo compartido.

Hola!

Cuando, por código (como te comentaba en el mensaje anterior), abres el formulario y le asignas un recordsource, ese recordsource queda guardado como origen del formulario. Y queda así por los siglos de los siglos o hasta que se lo vuelves a cambiar (ya sea a mano o de nuevo por código).

No sé cómo estás utilizando ese formulario, pero si lo quieres también abrir de una manera "normal" cada vez tienes que indicarle cuál es su origen del registro. Si no te abrirá con el último origen de registro (la última sql) con que lo manipulaste.

Imaginemos que ese formulario se abre e, inicialmente, su origen del registro debería estar sobre la tabla "TDatos". Entonces, y suponiendo que tienes un formulario menú con un botón para abrirlo, en el código de ese botón deberías hacer cada vez una actualización del origen del registro. Es decir, una cosa así:

...
Private Sub...
docmd.openform "FResultados",acDesign,,,,acHidden
Forms!FResultados.recordsource="TDatos"
docmd.close acform,"FResultados",acSaveYes
docmd.openform "FResultados"
End sub
...

A ver si con lo comentado puedes encontrar alguna solución.

Saludos,

Neckkito

Ante todo gracias por contestar.

Me acabas de confirmar lo que sospechaba, el origen de mi problema el el recordsource que se queda grabado (aunque cuando la BBDD la utilizo yo me funciona a la perfeccion, pero bueno).

El formulario del que hablo, se llama "VISUALIZA CLIENTE" y solo lo utilizo para visualizar en detalle los datos de un cliente. Imagina un formulario de consultas para buscar cliente por nombre, telefono, direccion, etc y le damos a un boton para buscar. Es entonces cuando se abre el formulario"visualizacliente" con el recordset asignado a traves de la consulta SQL). Si yo hago una consulta, me la devuelve bien y me la muestra pero luego se queda guardada por lo que si otro usuario realiza una consulta distinta, ya le da error por que el recordsource esta asignado sobre la consulta que realice yo con anterioridad.

Entiendo entonces que la solucion podría venir por "vaciar" (digo vaciar porque ese formulario solo lo utilizo para visualizar en detalle un cliente, no me interesa para nada mas) el recordsource cada vez que se realice una consulta?

Saludos.

Hola!

Te hablo teóricamente:

Tú realizas una consulta sobre el cliente y se te abre el formulario. Eso implica que has "grabado" la sql1 (llamémosla así) sobre ese formulario. Cuando cierras el formulario sql1 queda "adscrita" al form.

Si otro usuario realiza otra consulta sobre el cliente siguiendo la misma sistemática, teóricamente, generaría la sql2, le cambiaría el origen del registro al formulario y lo abriría en vista formulario. No debería dar ningún error porque ahora al formulario le hemos cambiado el origen del registro y el que tiene adscrito es la sql2, no la sql1.

Daría error en el hipotético caso de que dos o más usuarios intentaran modificar el origen del registro al mismo tiempo, con lo que Access se haría "la picha un lío". Probablemente el primero en operar sería el que se llevaría "el gato al agua", saliéndole el error al segundo.

También, si tienes el formulario abierto, se bloquearía la edición del formulario, con lo que no se puede modificar el origen del registro con el consiguiente error para aquel que lo intentara.

Si tuvieras la BD dividida, como cada usuario tiene su front-end, no deberías tener este error, porque cada usuario utilizaría su propio formulario.

Saludos,

Neckkito

El caso es que si que la dividi pero el problema no se soluciono. Mañana hare pruebas a ver si resulta. Gracias por tu tiempo

Hola!

Si tienes la BD dividida el error que comentas no debería aparecerte. Ten en cuenta que si cada uno tiene su front-end el usuario A podría tener 5 formularios y el usuario B podría tener 15. En una BD dividida lo único que se comparten son las tablas.

La verdad es que no sabría decirte... Lo primero que haría yo sería compactar los front-end para evitar que se haya quedado algo "pillado" en Access, y para asegurarme que no es un problema de código lo depuraría en el VBE.

Espero que consigas solucionarlo.

Saludos,

Neckkito

Gracias lo probare a ver si hay suerte!

Bueno, ya esta solucionado.

El error efectiva e indudablemente venía originado al compartir la base de datos, pues el formulario graba el recordsource de la primera consulta viciando las siguientes.

Por si a alguien le pasa lo mismo, la solucion consiste en dividir la base de datos utilizando el asistente, por lo que genera dos archivos, uno con las tablas (que se deben compartir en la red) y otro con los formularios. Al principio también me daba error porque como soy un poco cafre, hacía un acceso directo del archivo de formularios a todos los ordenadores, con lo cual, seguíamos compartiendo los mismos formularios, en vez de copiar el archivo que genera access con los formularios, en cada ordenador.

Muchísimas gracias por tu ayuda, me has salvado!
Saludos!

Me alegro mucho. Ahora, ¡a disfrutar del Access! (Je, je, je...)

Saludos,

Neckkito

yo tengo más o menos el mismo problema, me puedes ayudar, la búsqueda me manda los registros encontrados, pero al momento de pinchar sobre cualquier registro solo me manda el primero. mi código es.


el codigo lo baje de internet y lo adapte a mis necesidades.

espero que me puedas ayudar. Gracias!!!

No tengo muy claro qué es lo que necesitas, pero prueba esto:

....
'Tu código hasta End If, y a partir de ahí:


Si te funciona, del código original puedes borrar la línea:


Y como veo que el código utiliza etiquetas, también puedes borrar cualquier referencia que sea haga a rst, si es que existe (por ejemplo, rst.close, Set rst=nothing...)

Hay algunas deficiencias de sintaxis en el código que estás utilizando, pero como no lo has puesto completo pues lo dicho, si te funciona, mejor no meneallo.

Saludos.

Neckkito