Access - Buscar un valor

Buenas.

Tengo un informe basado en una tabla con un botón de imprimir y otro de salir.
Qué código empleo, para que al pulsar en el botón de salir, me busque los valores que no tienen nada en un campo de cadena de la tabla?, y los registros que encuentre los borre?

Gracias y un saludo.

Hola!

Ahí va:

...
Private Sub...
docmd.setwarnings false
docmd.runsql("DELETE FROM NombreTabla WHERE isnull(nombrecampo)")
docmd.setwarnings true
End sub
....

Saludos,


http://neckkito.siliconproject.com.ar

Muchas gracias Neckkito, ha salido a la primera.

El problema es que me confundí y los registro corresponden a un formulario cuyo "Origen del registro" es:

SELECT Oficio.*, Maestro.NUMDNI AS NUMDNI_Maestro, Maestro.NOMEMPRESA AS NUMEMPRESA_Maestro, Localidad.CODIGO_LOC

por lo que al ejecutar tu código (que funciona a las mil maravillas), cuando abro el formulario de oficios me aparecen los registros que he borrado y en algunos campos está escrito #eliminado#.

Cómo puedo solucionar el problema?

Gracias y perdona las molestias.

Hola!

El problema se te produce por el refresco de los datos. Es difícil decirte exactamente cómo debes operar porque no sé como tienes estructurado tu sistema.

Te pongo un ejemplo: tenemos un formulario continuo (varios elementos) con un botón que elimina registros que cumplan una condición. Ejecutamos el código que te indiqué y en el formulario continuo te aparecerá #Eliminado para aquellos registros que han sido borrados.

En este caso, ni siquiera un me.refresh funciona porque el formulario no "vuelve a leer" los datos de la tabla.

Una solución sería forzar el "releído" de datos, así:

...
Private Sub...
docmd.setwarnings false
docmd.runsql("DELETE FROM NombreTabla WHERE isnull(nombrecampo)")
docmd.setwarnings true
me.requery
End sub
....

Otra solución, si lo anterior no funciona bien, sería recargar el formulario, cerrándolo y volviéndolo a abrir, así:

...
Private Sub...
docmd.setwarnings false
docmd.runsql("DELETE FROM NombreTabla WHERE isnull(nombrecampo)")
docmd.setwarnings true
docmd.close acform, me.name
docmd.openform "NombreForm"
End sub
...

Con esto el form ya lee los datos de la tabla y, lógicamente, no te muestra los eliminados, pues ya no existen.

A ver si con estas pistas puedes encontrar una solución.

Saludos,

Neckkito

Gracias Neckkito, voy a probarlo y te comento.

No se que haría sin este foro y alguno de ustedes.

Un saludo.

Muchas gracias Neckkito.
Perfecto, solo con poner la línea "me.requery" ha bastado.

Un saludo.

Una preguntita: Tengo que hacer escritos a clientes de esta base de datos de acces que estoy haciendo (con vuestra ayuda). Cómo me aconsejarías llevar a cabo el proceso?. Yo antes tenía esto mismo en Lotus Approach, y a través de un formulario imprimía los escritos. Pero si los escritos necesitaban algún cambio, no servía el formulario.

Hola!

Sin saber exactamente qué quieres hacer es difícil darte una solución. Hay varias maneras:

- Para escritos estándar utiliza un informe, donde cada página sea un registro (una página - un destinatario). Basas ese informe sobre una consulta que te devuelva los destinatarios que quieres y listo.

- Puedes utilizar el sistema de combinar correspondencia con Word. Puedes buscar en Internet y en la propia ayuda del Word cómo funciona.

- Para algo más "especial" puedes utilizar marcadores en Word y pasar la información a marcadores. Más o menos sería lo que hace este ejemplo: http://goo.gl/iFzBiP

Y si hay algún sistema más, pues o no me viene a la cabeza o lo desconozco.

Saludos,

Neckkito

Muchas gracias Neckkito.
Probaré las tres opciones para ver cual me interesa más. Aunque creo que la última opción es la que más de acerca a lo que quiero. El problema es que estudiando el código, y con mis conocimientos. parece un poco complejo.

Un saludo.

Hola!

Lo único que puedo recomendarte es una relación inversa: cuanto más complejo te parezca el código más poco a poco lo tienes que analizar e implementar.

Si le "pillas el tranquillo" no es tan difícil

Saludos,

Neckkito.

Gracias, ya te comentaré.

Un saludo.