El Blog de Access de Juan Cots

Entrevistas y Artículos sobre Access

2010-01-22T16:26:00.003+01:00

Aprovechando el nuevo año, inauguro un nuevo espacio, dedicado a Entrevistas y artículos sobre Access en nuestra lengua.

Los grandes opinan sobre este programa. Entrevista al Buho, a Chea, Emilio, Ju@nk, Javier.Mil, Julián-vlc-sp, Taribo, Abraham Valencia y Xavi. ¿cuales son los límites de Access?. ¿Y sus virtudes y defectos?. ¿Ellos utilizan Dao o Ado?. Aprovecha para conocer un poco mejor a las estrellas de los principales foros, si te interesa Access, esto es imprescindible.
Muchas gracias a todos ellos por colaborar en este espacio.
El enlace aquí

Calendario Access - Flash - XML

2009-12-13T15:11:00.005+01:00

En esencia lo que vas a encontrar en este ejemplo es:

Un calendario flash, en un formulario de Access, que escribe los datos en una tabla, que luego crea un archivo xml para que lo lea el archivo flash....un lío ¿no?.

Además como escribimos el archivo xml dinámicamente, también podemos subirlo a Internet de la misma forma y como el calendario base es en flash y lee de ese xml....¿Quiero decir que el calendario puede funcionar online?. Pues.....si, eso mismo.

También incluyo un control de las citas. Al abrir la aplicación, una macro lee la tabla de las citas y si hay alguna en la fecha actual o posterior abre un formulario para mostrarlas, en caso contrario abre directamente el calendario.

Un poquito más despacio...un esquema del ejemplo sería el siguiente:

En este caso he creado una cuenta en un servidor gratuito con la dirección http://www.calendario.net84.net, el ejemplo está configurado con los datos ftp de esa dirección, para trabajar actualizando los datos en el calendario online, basta con que pulses el botón configurar FTP y marcas la opción de trabajar online.

Si miras en Diciembre de 2009 verás una copia real de mis asuntos para ese mes...como verás vaya mesecito me espera...bufffff.

Seguro que con el ejemplo lo entiendes perfectamente.

El enlace al ejemplo aquí

Flash y Access en comunicación

2009-12-03T22:08:00.005+01:00

En este ejemplo, utilizamos un menú basado en una película flash. Esto es principio es sencillo, marcamos la referencia a Shockwawe Flash, insertamos un control ActiveX de mismo nombre en nuestro formulario y le asignamos a su propiedad Movie la ruta donde tenemos guardada la película.
Pero...queremos que los botones del menú funcionen en VBA.

La primera parte se tiene que hacer en el archivo flash , vamos a utilizar la función fscommand(), tiene dos parámetros: comando y argumentos. Pero nosotros nos vamos a apañar con que nos envíe solamente el nombre, ya que si cada botón nos envía un comando, con un nombre distinto, nosotros desde VBA podemos diferenciarlos fácilmente con un simple Select Case. Por ejemplo, desde Flash, nos vamos a Acciones y en el evento al soltar del botón Empleados, ponemos:

on (release) {
fscommand("Empleados");
}

En VBA vamos a recibir ese comando que podemos interceptar con el evento FSCommand del Shockwawe Flash.
A cada botón le asignaremos un nombre de comando diferente que se corresponda con el título de su botón, para que nos sea más fácil de identificar y una vez se envíe, nosotros decidiremos, que acción vamos a realizar en VBA, dependiendo del nombre del comando.
Creo que en el código está clarísimo. Recuerda que para saltarte las restricciones de inicio puedes abrir el ejemplo con la tecla shift presionada.
Para hacerlo un poco más interesante voy a cargar los formularios a los que llamo desde los botones flash, en un mismo subformulario, cambiandole su propiedad SourceObject por código.
Incorporo también la posibilidad de ocultar la ventana de Access, pero usando transparencia, lo cual evita muchos de los problemas de la Api de Ocultar que obliga a los objetos a ser modales. (Sacado de un ejemplo de byronlcl en el foro de Access y VBA del Buho - Gracias por la magnífica aportación byronlcl)
Si eres un manitas en Flash, seguramente puedes hacer cosas chulísimas.
En el archivo rar que adjunto, incluyo la base de datos de ejemplo y el archivo swf con el menú, para que funcione, ambos archivos deben estar en la misma carpeta. Adjunto también el archivo fuente de flash, por si te apetece modificar el menú.

El enlace al ejemplo aquí

Los contactos de Google desde Access

2009-11-11T13:23:00.007+01:00

Hoy 15 de Noviembre de 2009 actualizo este ejemplo, dado que el original presentaba diversos problemas, si ya te lo habías bajado, para compensarte en este incluyo una gestión total de contactos. Obtener todos los contactos de Google, obtenerlos de Outlook, pasarlos de un gestor al otro, copiar, eliminar, crear...etc

En este caso para que puedas probarlo rápidamente he creado una cuenta GMail llamada probandocontactos@gmail.com, para trabajar con tus propios contactos, lo único que debes hacer es cambiar en la tabla Cuentas, este correo y su contraseña por las tuyas.

Si ya conoces alguno de los ejemplos de este blog que utilizan los servicios web de Google, habrás comprobado que para ello utilizo el control msinet.ocx para poder interactuar con el servidor, pero da algunos problemas de registro en ocasiones, por tanto he decidido no utilizarlo más.

En este ejemplo utilizaremos el objeto MSXML2.XMLHTTP, no lo había hecho antes porque no lo conocía, he aprovechado este ejemplo para comprender un poco este objeto y lo cierto es que me ha sorprendido muy gratamente por su relativa sencillez de uso.

Empezamos por declararlo, si activamos la referencia a Microsoft XML, vX, podemos declararlo como objeto MSXML2, en caso contrario podemos hacerlo como Object, pongámonos en este caso, le voy a llamar objHttp por tanto lo declaramos así.
Dim objHttp As Object
Necesitamos crear el objeto, para ello utilizamos:
Set objHttp = CreateObject("MSXML2.XMLHTTP")

Ya podemos acceder a sus métodos y propiedades,podemos utilizar "GET", "POST", "PUT", "DELETE" para enviar nuestras instrucciones al servidor de Google.

Podemos utilizar setRequestHeader para enviar las cabeceras, responsetext, responsebody, responsestream, responsexml para obtener la respuesta del servidor, también podemos utilizar status y statustext para saber si la respuesta es correcta o no.

De una forma básica para obtener la autorización a utilizar los servicios de Google lo haríamos de esta forma:

A la variable de texto strformdata le asignamos, nuestro EMail, nuestro Password, el origen, que puede ser cualquier nombre que deseemos y el servicio al que queremos acceder, en el caso de los contactos "cp".

strformdata = "Email=" & myEmail & "&Passwd=" & myPassword & "&source=" & mySource & "&service=cp"

Establecemos en la variable strUrl la dirección a la que tenemos que conectar para la autentificación.

strURL = "https://www.google.com/accounts/ClientLogin"

Establecemos el método, en este caso "POST" y abrimos el objeto con la url deseada, el parámetro True o False determina si la conexión va ser asíncrona o no.
objHttp.Open "POST", strURL, False

Establecemos las cabeceras que vamos a enviar (este tema viene bien explicado en la API)

objHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objHttp.setRequestHeader "GData-Version", "3.0"

Y por fin enviamos con el contenido de nuestra solicitud de conexión

objHttp.Send (strformdata)

Si en responsetext encontramos BadAuthentication es que la contraseña no vale, en caso contrario podríamos continuar enviando peticiones.

If InStr(objHttp.responsetext, "BadAuthentication") Then
MsgBox "Google ha rechazado la contraseña. Confirma el e-mail y el password y prueba otra vez.", vbCritical, "Error"
Exit Sub
End If

Con pequeñas variaciones este es el método que utiliza el ejemplo que adjunto para crear, modificar o eliminar contactos de Google.

El enlace al ejemplo aquí

Buscar en el grupo de Microsoft Access de Google

2009-11-01T19:51:00.004+01:00

De un tiempo a esta parte, al buscar en el grupo de Microsoft Access de Google vemos que no nos encuentra practicamente nada.

Posiblemente ha cambiado su política en materia de búsquedas en los grupos y ahora solo devuelve datos recientes, no obstante, por fortuna, los datos siguen existiendo, pero para ello la búsqueda hay que hacerla desde la página principal de Grupos e indicando en la cadena de búsqueda el grupo para el que queremos obtener resultados.

Un poco complicado, cuando además casi siempre necesitamos hacer variaciones de la cadena de búsqueda para poder encontrar los datos deseados.

La idea de este ejemplo es hacernos nuestro propio formulario de búsqueda de tal forma que escribiendo solo lo que deseamos buscar, la aplicación se encarge de componer la cadena de forma adecuada.

Pero claro, tener que buscar el archivo Access que tenemos para buscar en Google, abrirlo...etc...es casi tan laborioso como lo anterior.

Lo ideal por tanto sería tener este formulario como complemento de Access, de tal forma que lo tengamos disponible desde cualquier base de datos en la que estemos trabajando, pues casi siempre es en ese momento cuando necesitamos buscar algo en el grupo de noticias.

En el ejemplo que adjunto, incluyo dos mdb, una con el archivo que he estado comentando en formato mdb, para ver como está construido. La segunda es un magnífico ejemplo de Paco García Aguado (el Buho) que posibilita instalar fácilmente como complemento una versión de dicho archivo en formato MDE (que ya está incorporado en una tabla como campo OLE). Lo único que he tocado de la aplicación de Paco ha sido adaptarlo para que funcione también para Access 2007 (Paco lo tenía de la versión 2000 a la 2003).

Después de instalarlo lo tendremos disponible desde cualquier base de datos con la que estemos trabajando con solo acudir al Administrador de Complementos.

Espero que te guste este ejemplo.

El enlace al ejemplo aquí

Controlando el Calendario Google desde Access

2009-10-23T16:38:00.004+02:00

Muchos me preguntabaís si además de poder enviar eventos al calendario de Google que ya veíamos en un post anterior, también era posible eliminarlos.

Desde este ejemplo vamos a ver como se pueden efectivamente eliminar eventos desde Access, pero vamos a ir un poco más allá y vamos a ver también como recuperar eventos, todos, algunos, filtrado por un texto, entre fechas...
También vamos a ver como modificar un evento ya enviado.

Si alguno de vosotros habéis intentado sin éxito conseguir estos resultados o después de ver este ejemplo sigue sin quedaros claro, os diré que los únicos problemas con que me he encontrado son el tema de lectura/escritura que explico en el código del ejemplo y algunas diferencias en la forma de devolver los datos por parte de Google.

Este ejemplo no está excesivamente probado, por lo que si te encuentras con incovenientes me gustaría conocerlos.

Como otros de mis ejemplos utiliza el control msinet.ocx, si te ocasiona problemas, prueba a instalarlo desde aquí. Instala msinet.ocx

El enlace al ejemplo aquí

Utilizar la API de Bing desde Access

2009-10-18T01:42:00.006+02:00

La verdad es que con Bing estaba yo un poco despistado, José Bengoechea (no te pierdas su web) me puso sobre la pista de este tema (Gracias Chea).

Con la Api de Bing se puede acceder a varios servicios web de Microsoft. Puedes encontrar la información detallada en http://www.bing.com/developers .

Con este ejemplo vamos a intentar asignar a un control Picture normal y corriente, una imagen de Internet, con el valor añadido de seleccionar las imagenes obtenidas a partir de una palabra clave desde un formulario.

El efecto sería el mismo que si la seleccionaramos desde nuestro disco duro.

El enlace al ejemplo aquí

Un traductor en Access

2009-10-11T23:22:00.006+02:00

Nota importante: Hoy 23 de Noviembre de 2009 actualizo este ejemplo dado que Google ha cambiado su web de traducción, y posiblemente si te descargarte el ejemplo anteriormente no te funcione.

Aprovechando el motor de traducción de Google, podemos conseguir dotar a nuestras aplicaciones de un potente traductor.

El procedimiento básicamente consiste en descargar en disco una web, a la que previamente le hemos manipulado la cadena de llamada, para obtener de la misma la traducción del texto deseado.
Una vez lo tenemos en disco, buscamos dentro del archivo, el texto ya traducido y lo mostramos en el cuadro de destino.
El resultado es rapidísmo y espectacular
Me he encontrado con algunas dificultades con la codificación utf-8, y aunque supongo que habrá soluciones más completas, lo he arreglado para la mayoría de las traducciones usando Replace para sustituir los caracteres extraños.
Por el momento he incluido traducciones en ambas direcciones al Inglés, Francés, Portugués, Alemán y Holandés. Se pueden añadir más idiomas.

El enlace al ejemplo aquí

Un lector de noticias rss en Access

2009-09-13T12:45:00.003+02:00

¿Es posible realizar un lector de noticias online en Access?
Yo creo que sí.

Voy a utilizar al periódico El País como fuente. Además vamos a ir un poco más allá y vamos a eliminar la publicidad y todo lo superfluo para poder leer las noticias lo más rápidamente posible. Espero que al País no le importe. ;)
Vamos a utilizar importación xml, escribir y leer de ficheros en disco, el evento timer para actualizar las noticias....
Seguro que encuentras interesante este ejemplo
El enlace al ejemplo aquí

Vincular remotamente por VPN con GBridge

2009-09-11T21:54:00.018+02:00

Aunque hay muchas herramientas similares para alcanzar el propósito de este artículo, a mi me ha sorprendido la sencillez y versatilidad de GBridge, además de ser una aplicación freeware.
No voy a entrar aquí a explicar todas las posibilidades de este programa...compartir archivos, escritorio remoto, sincronización de carpetas, copia de seguridad...etc, me voy a centrar en como vincular las tablas de un ordenador remoto a nuestro ordenador local para poder trabajar online con nuestra aplicación access favorita.
GBridge utiliza los servidores GTalk de Google por ello para utilizarlo lo único que vamos a necesitar es disponer de una cuenta de Google.
Si ya la tenemos descargamos e instalamos GBridge desde aquí

Vamos a comenzar por instalarlo en el ordenador que va a hacer las funciones de servidor de nuestra aplicación. la instalación es muy sencilla ya que no requiere de nuestra participación.
Al abrir por primera vez nos mostrará esta pantalla
Lo único que tenemos que hacer es poner el nombre de usuario y password de nuestra cuenta Google, nos apuntamos el nombre de Hostname porque luego lo usaremos desde el cliente.

Hacemos click en Log On y ya estamos dentro.
Vamos a preparar el programa para que acepte llamadas por la VPN desde nuestro ordenador. Solo tenemos que hacer 3 cosas.
1.-Desde la opción SecureShares añadir la carpeta donde estén las tablas.

2.-Pulsamos sobre la opción de menú Options y luego sobre Advanced options,
se nos mostrará la siguiente pantalla

marcamos la opción que he señalado en rojo...Windows Share Folder
3.- Hacemos click en la opción de menú DestokpShare y luego en Configure GBridge DestokpShare (VNC)...

Se nos mostrará otra pantalla, seleccionamos la opción Allow after verify DestokpShare password (use built-in VNC server)y ponemos un password en la parte inferior

Ahora nos vamos al ordenador cliente. Instalamos GBridge y una vez instalado ponemos nuestro nombre de usuario y password Google. GBridge se encarga ya de todo lo demás.

Ahora vamos a componer la ruta de nuestras tablas vinculadas, será de la siguiente forma:
Nombre de HostName (lo hemos apuntado antes), Nuestro nombre de usuario Google, Gbridge.Net, el nombre de la carpeta y el del archivo y debe estar de la siguiente forma:
\\pq28.juanfcots.gbridge.net\nombrecarpeta\nombrearchivo.mdb

Abrimos Access y nos vamos a la opción de Vincular tablas...la imagen de Access que muestro es de la versión 2007 pero debería funcionar con cualquier versión. marcamos la opción de Vincular y le ponemos la ruta que acabamos de componer

Aceptamos la vinculación y si todo ha ido bien, tenemos nuestra aplicación online para introducir o modificar registros.
Espero que os sirva tanto como me sirve a mi.

A vueltas con el Calendario Laboral

2009-09-06T15:27:00.005+02:00

Muchos me habéis preguntado acerca de la posibilidad de interactuar con el calendario laboral desde cuadros de texto de tipo fecha.

En este ejemplo vamos a poder pasarle las fechas que deseemos desde la ubicación que necesitemos.
He aprovechado para hacer una demostración de como guardar las fechas que presionemos (o las que enviemos) en una tabla, esto nos permite por ejemplo una mayor facilidad a la hora de hacer informes, en este ejemplo todas las fechas se guardan en una tabla que yo he llamado Temporal, luego con origen de datos en esa tabla creo un informe por mes y empleado.
Espero que te sirva.
El enlace al ejemplo aquí

¿Problemas con el msinet.ocx?

2009-08-19T14:28:00.004+02:00

Como varios de los ejemplos de este blog utilizan el control msinet.ocx, y da algunos problemas de licencia en su uso con Microsoft Access, en el ejemplo de este blog Google Docs Uploader he preparado un ejecutable que registra y licencia dicho control. Instalalo y te funcionarán todos los ejemplos sin ningún problema.

Puedes instalarlo desde aquí

Google Docs Total

2009-08-16T20:59:00.005+02:00

Como continuación al ejemplo anterior vamos a completarlo un poco.
Seguimos utilizando el protocolo de la Api y un control Msinet.ocx

Recuerda:
Primer paso.- Necesitamos una cuenta Docs de Google. Si ya tenemos una, podemos continuar, en caso contrario nos vamos a http://docs.google.com y creamos uno nuevo.
Segundo Paso.- este ejemplo utiliza un control llamado Microsoft Internet Transfer Control (Msinet.ocx) que es posible que te de problemas al registrar y por tanto te de un error el ejemplo nada más abrir. Instala primero el ejemplo Google Docs Uploader para que te registre y licencie ese control, después este ejemplo te funcionará perfectamente.
Con este ejemplo vamos a poder:
Recuperar el total de archivos que tenemos
Recuperar el total de carpetas
Ver solo los documentos
Ver solo las hojas de cálculo
Ver solo las presentaciones
Crear Nuevo archivo (Documento, hoja de cálculo o presentación)
Crear Nueva carpeta
Arrastrar y soltar archivo virtual a carpeta
Subir archivos de nuestro equipo mediante arrastrar y soltar o mediante multiselección
Eliminar archivo
Hacer búsquedas por título o por contenido
Exportar nuestros archivos de Google a multitud de formatos diferentes
Crear un archivo a partir de un cuadro de texto (memo)
Espero que te sea de utilidad

El enlace al ejemplo aquí

Google Docs Uploader Vba Access

2009-08-15T11:29:00.006+02:00

Como ya sabéis no existen librerías de la Api de Google para VBA, pero, parafraseando al gran Juan M Afan de Ribera, vamos a demostrar que "Access también existe".

Utilizando el protocolo de la Api y un control Msinet.ocx vamos a poder subir archivos a nuestra cuenta de Google Docs.
Por el momento los archivos permitidos para subir son: doc, docx, xls, txt, htm, htlm
Primer paso.- Necesitamos una cuenta Docs de Google. Si ya tenemos una, podemos continuar, en caso contrario nos vamos a http://docs.google.com y creamos uno nuevo.
Como este ejemplo utiliza un control msinet que es complicado de licenciar he sustituido el archivo rar habitual por un archivo exe, que se va a encargar de registrar y licenciar este control. Instalará el archivo en tu ruta de Archivos de programa\Google Docs Uploader VBA...como siempre en formato mdb abierto.
En el ejemplo he ocultado la ventana madre de Access, por lo que si quieres entrar en el diseño deberás abrirlo con la tecla Shift apretada.

El enlace al ejemplo aquí

Búsqueda Global

2009-07-24T10:03:00.004+02:00

Seguro que alguna vez has necesitado buscar algo en tus tablas que no sabías exactamente donde podía estar.

Este ejemplo trata de eso, de buscar en el contenido de todas tus tablas, después haciendo doble click sobre los resultados acceder al registro concreto que buscamos

El enlace al ejemplo aquí

Ejemplos varios

2009-07-21T14:06:00.011+02:00

He recopilado una parte de pequeños ejemplos que en mis participaciones en los foros he ido aportando como respuesta a dudas puntuales.
Ten en cuanta que no son más que bosquejos destinados a resolver alguna duda puntual
Como elegir una imagen del disco duro y abrirla
Activar, Desactivar, hacer visible e invisible
Control de accesos
Aleatorios
Autonumerico
Autorreleno con la cedula
Borrar campos
Búsqueda
Ejemplo de caja diaria con saldos
Citas.mdb
Cuadro combinado que rellena datos
Cuadro combinado que filtra a otro
Control de modificaciones
Copiar archivo en carpeta aplicación
Documentos relacionados
Envio de correo con Send Object
Informe entre fechas
Abrir formulario desde cuadro combinado
Ejemplo para encadenar datos en consulta
Notas
Notas2
Ordenando
Filtrar combos
Pedidos
Contar registros en subformulario
Usuarios en mi bbdd
Vinculando mas de una tabla
Datos de campos en informe

Crear KML desde Access

2009-07-12T20:49:00.007+02:00

Me puso sobre la pista de este tema mi amigo de los foros Oirti, que ha colaborado conmigo en este ejemplo.

Yo no tenía mucha idea de esto, así que me puse a investigar un poco. El objetivo era poder representar los datos de longitud/latitud de una tabla en un mapa de Google Earth. ¿Para que podría esto servirme?. Pues por ejemplo podemos representar en el mapa con iconos y cuadros descriptivos, todos nuestros clientes, los hoteles de un viaje...etc
Me di cuenta que en realidad lo único que tenía que hacer era escribir un archivo de texto con extensión KML, que es el que se usa para representar datos en diversos tipos de mapas.
Poco a poco fueron apareciendo los resultados y a su vez fuimos volviendo el proyecto un poco más ambicioso. Por ejemplo, ¿como podía obtener fácilmente los datos de latitud/longitud para una dirección deseada?. Lo más sencillo fue crearme mi propia sistema que lo hiciera (incluido en el ejemplo). Después me di cuenta que KML dispone de una etiqueta que se llama "address" que para representar datos en puntos que dispongan de una dirección conocida, hacía innecesario el uso de coordenadas.
También me pareció interesante poder, desde Access, preparar los puntos de dirección, pudiendo crear subcarpetas, editar los iconos, las etiquetas, poner un cuadro descriptivo...trabajar con los colores (esto tuvo cierta complejidad dado que KML trabaja con un sistema propio que representa los colores con 8 dígitos, siendo los dos primeros dígitos para el valor de transparencia y los seis siguientes su valor hexadecimal pero en un orden distito a como lo sería en html), para poder usar los cuadros de diálogo de color desde Access no tuve más remedio que pasar primero los colores a RGB y luego a Hexadecimal, pero al final el resultado creo que es francamente bueno

Aporto dos ejemplos en ambos es neccesario mantener los tres archivos contenidos en el rar en la misma carpeta al descomprimir.
El primero solo necesita de las direcciones para funcionar
Enlace al ejemplo

El segundo se basa en coordenadas por tanto se necesita la latitud y longitud de cada punto (aquí se incluye el ejemplo para obtener coordenadas)
El enlace al ejemplo aquí

Calcular rutas con Google Maps

2009-04-27T20:47:00.004+02:00

La verdad es que usar la API de Google desde VBA es bastante complicado y además hay muy poca documentación al respecto.

No obstante me preguntaban en un foro la posibilidad de calcular una ruta partiendo de una dirección de origen y otra de destino.
Pues con un poco de imaginación...es posible.

El día 02 de Mayo, amplío el ejemplo, con la opción de animar la ruta (yo creo que se obtiene un resultado espectacular)

Al ejemplo que adjunto le acompañan varios archivos, el único requisito para que funcione el ejemplo es que dichos archivos se encuentre en la misma carpeta de la base de datos.

El enlace al ejemplo aquí

Curso de iniciación a VBA

2009-04-12T13:27:00.004+02:00

Hay muchas personas que participan en los foros de Access y cuando les respondes utilizando algo de código enseguida te responden que no tienen ni idea.

Pues la idea es perder el miedo a la programación, por el momento os ofrezco estos tres primeros capítulos que podéis completar en manos de una hora y os hará perder el miedo, veréis que utilizar un poco de código os facilitará la tarea enormemente y además es muy sencillo.
El enlace al curso aquí

Nuevo Blog de Access

2009-04-03T23:25:00.007+02:00

Tengo el placer de anunciaros que Victor Peña, amigo mío de los foros de Access, ha inaugurado su blog de temas relativos a este programa, con tutoriales y ejemplos
Con toda seguridad en poco tiempo será una auténtica referencia para los que os iniciais en la programación.
Un fuerte abrazo Victor y Felicidades por tu iniciativa

La dirección del blog es: http://victoraccess.blogspot.com/

Botones en Formulario

2009-01-22T17:24:00.000+01:00

A todos nos pasa que empezamos a diseñar nuestros formularios y llega un momento que todos decidimos incluirle botones de navegación, botón de Salir, botón de Eliminar registro...etc

Esa labor en muchas ocasiones puede resultar tediosa y si por alguna de aquellas decidimos cambiar la imagen de nuestros formularios puede resultar desalentadora.

Sería ideal tener un código común para todos esos botones y que simplemente con copiar y pegar los botones de un formulario a otro, todos ellos funcionaran.

Pues este ejemplo va justamente de eso. De poder copiar y pegar los botones de un formulario a otro y con un código mínimo que funcionen.

Lo único que hay que hacer en cada formulario es poner en el Evento "Al activar registro": BotonesNavegacion Me

Y todos los botones empezarán a funcionar.

En este ejemplo yo he puesto los siguientes botones:

Primero, Siguiente, Anterior, Ultimo, Nuevo, Eliminar, Salir, QuitaFiltro

A los botones Siguiente y Anterior además les he añadido un poco de código para que en su propiedad Caption nos vaya mostrando en que registro nos encontramos y de cuantos, también que se desactiven al llegar al primer o último registro.

El botón QuitaFiltro lo he puesto porque necesita referencia del formulario a diferencia de los demás que solo con DoCmd basta, y de esta forma si necesitas añadir cualquier otro botón que necesite algo parecido puedes tener una guía.
Al botón eliminar le he quitado el aviso propio de Access y le he puesto uno personalizado, lo cual evita también que nos de error si deseamos cancelar la eliminación.

El enlace al ejemplo aquí

Calendario Laboral

2008-12-16T18:10:00.004+01:00

Basado en el famoso "Calendario Olaz", he preparado esta versión de un Calendario Laboral, que seguro que a más de uno le va a venir muy bien.

El enlace al ejemplo aquí

El Domingo 6 de septiembre de 2009 publico una nueva versión mucho más completa.

El enlace al ejemplo aquí

Un navegador en Access

2008-12-15T22:49:00.006+01:00

Me hacían una pregunta en el foro acerca de visualizar archivos PDF desde Access y yo sugerí la posibilidad de hacerlo a través de un control WebBrowser en el formulario, una cosa me llevó a otra y al final acabé desarrollando un navegador completísimo.
Tiene un sistema de Cache/Historial propio, que se puede consultar y borrar, un sistema para agregar Favoritos, las dos cosas están basadas en controles Treview.
Oculta la ventana madre de Access para una mejor experiencia de navegación.
Permite navegar por el PC.
Tiene botones para ir a nuestra página de Inicio, para ir adelante y atrás, para Imprimir, para configurar la página, para previsualizarla, para seleccionar todo, para copiar...
Tiene una barra de progreso para controlar la carga de las páginas.
Controla las dimensiones para ajustarse lo mejor posible.
Seguro que encuentras alguna cosa que te es de utilidad.
El enlace al ejemplo aquí

Tras algún comentario acerca de la posibilidad de hacerlo con pestañas, se me ocurrió aprovechar la nueva funcionalidad de Access 2007 con las pestañas.
El resultado es el ejemplo que acompaño (solo válido para Access2007). El código es practicamente el mismo solo que añadimos un módulo para poder crear nuevas instancias de nuestro navegador, instanciando nuevos formularios.
El enlace al ejemplo aquí

Al no estar en la lista

2008-12-07T01:20:00.002+01:00

La situación es la siguiente, tenemos un cuadro combinado y en el momento más inoportuno, tenemos que dar de alta un empleado o un cliente nuevos.

Y además el sistema nos muestra ese molesto mensaje de "El elemento seleccionado no se encuentra en la lista..."

Este ejemplo trata de solucionar este tema. ¿Como?

Primero comprobamos si el elemento que queremos añadir se encuentra en la lista, si no lo está, entonces ofrecemos la posibilidad de insertarlo, separando las columnas con una coma.

Una vez ponemos el elemento separado por comas, insertamos el registro directamente en la tabla , ofreciendo la posibilidad de editar el registro desde su formulario o simplemente insertar.

Seguro que con el ejemplo, con su código comentado, queda mucho más claro

El enlace al ejemplo aquí

Web de Excel

2008-11-27T09:52:00.003+01:00

Ayer me enteré que mi amigo de los foros, Abraham Valencia, abrió su página dedicada a Microsoft Excel.

Si quieres ver las cosas (algunas asombrosas) que se pueden hacer desde este programa, o te interesa la programación en general, no dejes de visitarla.

Un abrazo Abraham

http://www.geocities.com/abraham_excel/