Archivo por categoría 'General'
Domingo, 04 de marzo 2012 |
En este ejemplo, yo te mostraré cómo hacer una búsqueda de varias palabras, en un campo de un formulario.
El código utilizado en este ejemplo es útil para realizar búsquedas más avanzadas.
1 Para crear la tabla
- Crear la mesa "tbldados" con los siguientes campos: id (Autonumérico) / Datos (texto)
2 Crear el formulario "Form1"
- Crear el formulario con el asistente y elegir los tbldados como una fuente de datos, seleccione "Tabla" en el esquema de la forma.
- A continuación, vaya a la de diseño de formularios y crear un campo de texto independiente, en el pie de formulario, llamado txtpesquisa.
- Crear un botón en la propiedad y poner el siguiente código:
'************************************************* *************
"Preparado por José Martins
'Sitio: www.accessexemplos.com
"Fecha: 09/22/2011
"NOTA: No quite esta cabecera. Respetar el autor del código.
'************************************************* **************
On Error GoTo Err_Comando8_Click
Dim palabras () As String
Dim x As Integer
Dim strSQL As Cadena
StrWhere dévil como secuencia
palabras = split (Me.txtpesquisa, "")
Para x = 0 To UBound (Palabras)
strWhere strWhere = & "Datos como '*" & palabras (x) & "*" o "
X Siguiente
strWhere = Left $ (strWhere, Len (strWhere) - 3)
strSQL = "SELECT * FROM tbldados donde" y strWhere & "ORDER BY [de datos]"
Me.RecordSource = strSQL
Exit_Comando8_Click:
Exit Sub
Err_Comando8_Click:
MsgBox Err.Description
Montevideo Exit_Comando8_Click
Lo que hace el código, básicamente, consiste en crear una matriz compuesta de las palabras en txtpesquisa que se detectan a través de los espacios. Después de un ciclo se ha creado para buscar todas las palabras introducidas en txtpesquisa.
Prueba de tercera
- Introduzca los datos y luego escribir la palabra o palabras que encontramos en el cuadro de texto (txtpesquisa), haga clic en el botón y para comprobar los resultados.
A continuación se muestra el enlace al ejemplo dowenlod: varias palabras Buscar
Publicado en Uncategorized | No Comments »
Sábado, 06 de agosto 2011 |
Hoy he añadido el botón de Google Plus 1. Esta es otra manera de hacer publicidad de los postes. Si usted no ha invitado a Google Earth Plus deja un comentario con tu dirección de correo electrónico para enviar la invitación.
Publicado en Uncategorized | 13 Comments »
Miércoles, 13 de julio 2011 |
Esta es una base de datos muy simple que sirve para controlar los gastos de la vida diaria.
Menú Principal
En la imagen se puede ver el menú principal es muy sencilla y funcional. En la parte superior podemos ver el año en el que trabajamos.
Año de trabajo
Para cambiar el trabajo del año, haga clic en el botón para elegir la forma año y abierta (Fig. 2), al escribir el año que queremos.
Gasto
El gasto en la forma botón de apertura (Fig. 3) para la entrada de datos. Junto a la categoría de que tenemos un '+' para añadir categorías y las subcategorías tienen un lado del botón '+' para añadir las subcategorías (haciendo clic en las subcategorías si usted no ha elegido cetegoria da error y le pedirá que seleccione la categoría . Si ha seleccionado la categoría que abre las categorías de representación en la categoría seleccionada).
En el campo se puede elegir un proveedor de la lista y si no es que le preguntará si desea agregar.
Categorías
Este formulario (figura 4) se utiliza para administrar (insertar / modificar / borrar / búsqueda) categorías y sus subcategorías.
Proveedores
Este formulario se utiliza para administrar (insertar / modificar / borrar / búsqueda) los nombres de los proveedores.
Informes
Al hacer clic en este botón se abre el menú (imagen 5) informa donde podemos elegir cuatro tipos de informes:
- Los costos del año en curso (Fig. 6) muestra un informe con la categoría, subcategoría y el valor total por mes del año, con el que trabajamos. También se muestra el total de gastos mensuales y el total por subcategoría.
Este informe incluye un gráfico para la subcategoría que muestra la evolución mensual de cada subcategoría. Este gráfico no es de los míos, el módulo correspondiente tiene la información del autor, incluyendo:
'Autor: Philippe Bonnardel (basado en una idea de Edward Tufte)
- Los costos por año (Cuadro 7): muestra un formulario con los gastos por categoría, en un año determinado. Podemos elegir el año de gasto, a condición de que no es un gasto registrado en ese año para ver el gráfico. Al hacer doble clic en la categoría abre el informe anual de las subcategorías que tiene el mismo formato. Al hacer doble clic se abre el detalle en la subcategoría (Fig. 8) los costes incurridos en esta subcategoría.
Detalle
- Gastos por mes: igual a los gastos por año, pero aquí podemos elegir el año y el mes que desee.
- Gastos por parte del proveedor se muestra un formulario con el costo por proveedor en un año determinado, y su gráfica. En este informe sólo se puede elegir el año que desea ver.
Comparación anual
Muestra la evolución del gasto durante los últimos 10 años. Muestra los valores de años y muestra un gráfico.
Espero los comentarios de esta base de datos, sin embargo voy a agregar funcionalidad al ejemplo de como la capacidad de imprimir los informes.
Descargar el ejemplo: GASTOS
Publicado en Uncategorized | 12 Comments »
Sábado, 26 de marzo 2011 |
Esta actualización de los cambios de ventas fueron los siguientes:
Poner la imagen de la compañía en el informe, que no se muestra.
La remodelación de la parte de impresión de la venta y la colocación del "producto" que no estaba en la impresión.
Colocación de la IV mesa y totales.
Creación de las ventas diarias del formulario listado en el que podemos ver todas las ventas en el día y un listado por tipo de pago.
Cambiar el código para insertar la imagen del logotipo de la empresa. Debido a que la imagen está vinculada a la 'localfoto' que es la ruta en el disco donde la imagen si la imagen no está en el sitio daba error y no se abra el formulario "datos de la empresa". Así que puse una rutina que comprueba error y si es así se oculta la imagen y sale de la función de no dar error. Básicamente volver al estado inicial como si no tenía imagen.
Cambio en el formulario e imprimir el informe de la venta.
Proveedores - el formulario fue creado para los proveedores. Cuando entren en una nueva compra y el proveedor no existe, le preguntará si desea agregar. Si es así, abra el formulario "Proveedores" para introducir los datos.
Compras - Si los artículos no existen, le pregunta si desea insertar.
Descargar: Sistema de Ventas
Gracias a probar y comentar, para mejorar el sistema.
Publicado en Uncategorized | 10 Comments »
Sábado, 12 de marzo 2011 |
En el caso de los animales del refugio y como sistema de ventas tiene un formulario donde podemos poner una foto. Después de usar este código que he encontrado que a medida que la imagen está vinculada a la 'localfoto' que es la ruta en el disco donde la imagen si la imagen no está en el sitio daba error y no abrir el formulario. Así que puse una rutina que comprueba error y si es así se oculta la imagen y sale de la función de no dar error. Básicamente volver al estado inicial como si no tenía imagen.
En el próximo post voy a poner la próxima actualización del sistema de ventas donde podemos ver el código de trabajo. Sin embargo, podemos hacer una prueba que consiste en poner el sistema de ventas en una carpeta diferente y ver qué pasa cuando abrimos la forma de datos de la empresa.
El código se actualiza como sigue:
'Www.accessexemplos.com
"José Martins
'2011-02-28
On Error GoTo Err_mostraimagem
If IsNull (Me.Localfoto) = False Then
Me.FOTO.Picture = Me.Localfoto
FOTO.Visible = True
SEMFOTO.Visible = False
Más
Me.FOTO.Picture = ""
SEMFOTO.Visible = True
FOTO.Visible = False
End If
Exit_mostraimagem:
Exit Sub
Err_mostraimagem:
Seleccione Err.Number Case
Caso 2220 "¿No ves la imagen
FOTO.Visible = False
SEMFOTO.Visible = True
Reanudar Exit_mostraimagem:
Otro error Else Case '.
MsgBox Err.Number & "" Err.Description &
Reanudar Exit_mostraimagem:
End Select
Publicado en Uncategorized | No Comments »
Sábado, 12 de marzo 2011 |
Para que un usuario cuando se introducen datos siempre escribo en mayúsculas sólo hay que poner el siguiente código en las propiedades del campo en el caso de 'al pulsar' (OnKeyPress):
KeyAscii = Asc (UCase (Chr (KeyAscii)))
donde KeyAscii recibirá un código ASCII nuevo
chr = muestra el código de caracteres ASCII
La función 'asc': Devuelve un entero que representa el código (ASCII) de carácter que corresponde a la primera letra de una cadena.
Función UCase: convierte una cadena a mayúsculas.
Función Chr: muestra el carácter del código ASCII
Para convertir a minúsculas sólo cambiar LCase UCase por:
KeyAscii = Asc (LCase (Chr (KeyAscii)))
Publicado en Uncategorized | No Comments »
Sábado, 30 de octubre 2010 |
Me he dado cuenta de que algunos lectores enviar el mismo mensaje varias veces, porque piensan que el primero no se ha enviado correctamente.
Si es la primera vez que un comentario, este mensaje tiene que ser aprobado, que también aprueba como aptos para comentar.
Esta es una protección contra el spam, los mensajes no parecen tener nada que ver con el blog.
Así que después de enviar el primer mensaje, sólo tenemos que esperar hasta que se apruebe y, posteriormente, los mensajes siguientes aparecen ahora de forma automática.
Todavía a oscuras 252 mensajes de spam ...
Publicado en Uncategorized | 8 Comments »
Sábado, 23 de octubre 2010 |
Como se dijo en el mensaje anterior, he cambiado la ubicación donde los archivos para descargar.
A partir de ahora alojados en el servicio de BOX.NET , donde por lo menos ya no tienen que esperar a que la descarga y no tiene publicidad.
Usted todavía tiene que actualizar algunos enlaces, que será la próxima semana completos. También poner un enlace en el menú de los blogs "downloads", que se conecta a la carpeta en BOX.NET donde todos los archivos disponibles para descargar.
Cualquier pregunta o encontrar ese archivo cambiado, gracias a informarme.
Publicado en Uncategorized | 2 Comments »
Miércoles, 19 de agosto 2009 |
Hoy voy a mostrar cómo crear una barra de menú, paso a paso, para dar una. Más profesional y sólo dan acceso a las opciones que son realmente importantes para el usuario final de un proyecto de Access
Al final tendremos una barra de menú que se parece a la imagen de abajo.
1 - Vaya al menú Herramientas y seleccione "Personalizar". Aparece el siguiente menú:
2 - Elija "Barras de herramientas" en la pestaña y elegir "Nuevo" e introduzca el nombre que queremos darle a la barra de herramientas, elegí "menú". Haga clic en Aceptar y aparecerá en la barra de herramientas que va a funcionar, que por ahora no tiene opciones.
3 - Con la barra de herramientas seleccionado, haga clic en 'Propiedades' y aparece el siguiente menú:
4 - Cambiar el 'tipo' a 'Barra de Herramientas "y luego haga clic en Cerrar.
5 - Haga clic en los 'comandos' y la lista de la izquierda que dice 'categorías' elegir 'el nuevo menú ", que debe estar en la última posición. A continuación, haga clic en el recuadro de 'comandos' de la derecha y de arriba "nuevo menú" arrastrar en nuestra barra de menú, por ejemplo la imagen de abajo.
'Nuevo menú' arrastrar hacia arriba en nuestra barra de menú, los tiempos requeridos por el número de menús que necesitamos en este ejemplo voy a arrastrar tres veces para hacer dos menús y submenús. Para hacer un submenú basta con arrastrar 'nuevo menú en un menú. Nota: El número de menús se puede cambiar más adelante, usted puede agregar o disminuir como sea necesario.
6 - Al hacer clic en el botón derecho del ratón en la parte superior de la "nueva carta" de nuestra barra de herramientas y cambiar el nombre si lo desea. En el ejemplo que elegí 'Clientes' de la 1 ª y de los proveedores para la segunda.
7 - Ahora vamos a poner los menús en las formas que tenemos la intención de abrir. Haga clic en los 'comandos' y elegir la categoría de "todas las formas 'y en la parte derecha se muestran todas las formas existentes en el proyecto actual. Haga clic en la forma que desee y arrastre la barra de herramientas. En el ejemplo que elegí diversas formas e informes, y también la opción Salir (para cerrar el acceso). En esta etapa podemos elegir lo que queremos abrir nuestra barra de herramientas solo tienes que elegir lo que queremos en las categorías (tablas, formularios, informes, consultas, menús de acceso de acción que aparecen como la barra de menú por defecto, etc.)
8 - Después de elegir todo lo que queremos tener en nuestra barra de menús puede hacer clic en cada uno de ellos con el botón derecho del ratón para ver las propiedades que pueden cambiar. Ver la imagen de abajo.
"Reset" - sirve para poner un artículo fue originalmente antes de cambiar el nombre de la imagen, etc.
'Eliminar' - eliminar un elemento de menú
'Nombre' - para cambiar el nombre del elemento de menú. Aquí también podemos configurar el acceso directo a ese elemento con el símbolo de unión antes de la letra que desea utilizar como acceso directo. Por ejemplo, la opción de salida por defecto es ya bien & Salir en el menú aparece 'r' la letra subrayada que nos dice que cuando se utiliza la tecla ALT + r se ejecuta la opción de menú Salir. En el ejemplo que eligió para abrir los clientes y de clientes, con el atajo Alt + C.
"Copiar / pegar / reset / editar / cambiar la imagen del botón" - estos comandos se utilizan para trabajar exactamente la imagen que queremos ver al lado de cada elemento. Podemos copiar y pegar la imagen que se utilizará en otro tema, restaurar la imagen original, editar la imagen y crea un editor de iconos (píxel por píxel) o elegir una imagen disponible en el menú de cambio.
Entonces también podemos elegir el aspecto del tema, es decir, si queremos sólo texto o texto e imagen.
'Iniciar un grupo "- sirve para separar los elementos por una barra horizontal, o crear grupos de elementos.
"Concesión de enlace" - para asignar un enlace a una URL o cualquier otro objeto en la base de datos.
'Propiedades' - muestra todas las propiedades del elemento.
9 - Ahora que tenemos la barra de menú que tenemos listo para poner en su lugar. Para ello haga clic en el botón de cierre y arrastrar nuestro menú de la parte superior de la pantalla hasta que se pega al lugar donde la barra es el acceso por defecto.
10 - Para iniciar la barra para abrir la base de datos tiene que dar la instrucción para abrir al iniciar Access. Vamos a 'Herramientas' y 'Start' y 'Barra de menú "elegir el nombre de nuestro menú en" menú "este ejemplo.
11 - Para cambiar las imágenes de cada uno de los elementos de menú que podemos utilizar otra forma de hacerlo es insertar una imagen en la misma forma y una copia del elemento. Esto es:
- Crear un formulario en la forma de la estructura
- Vaya al menú Insertar y seleccione la imagen
- Elija cualquier imagen y pulsa enter
- Seleccione la imagen y con el botón derecho del ratón seleccione Copiar
- Vaya al menú Herramientas y elija la opción de personalizar
- Haga clic en el botón derecho del ratón sobre el elemento que desee cambiar la imagen y elige la imagen del botón Pegar.
- Haga clic en Cerrar y cierre de acceso
- Iniciar la base de datos para ver el resultado
NOTA IMPORTANTE: Cuando se cambia la barra de menús, el menú desaparecerá en la base de datos Access, que se hace. Para realizar cambios en él es necesario para iniciar la base de datos de la tecla SHIFT.
Mi menú se parece a esto:
Descargar: barra de menús
Publicado en Uncategorized | 9 Comments »
Miércoles, 20 de mayo 2009 |
Podemos prevenir un informe abierto si no hay datos para mostrar, y para ello se utilizan dos formas, dependiendo de la versión de Access:
1 - Todas las versiones de Access
Coloque el código de abajo en las propiedades del informe, "que facilite" el evento
Utilice el evento de Habilitación (Activar) Informe:
Private Sub Report_Activate ()
Si DCont ("*", Me.RecordSource) = 0 entonces
MsgBox "No hay registros para mostrar" vbDefaultButton1, "Error!"
AcReport DoCmd.Close ", nombre del informe"
End If
End Sub
2 - Desde la versión 7 (Access 95), se añadió el caso de 'si no hay datos', entonces podemos urilizar el siguiente código:
Private Sub Report_NoData (Cancel As Integer)
MsgBox "No hay datos en el informe.", VbInformation, "Error!"
Cancelar = True
End Sub
Para ver correr descargar el ejemplo: impedir que el informe de apertura
Publicado en Uncategorized | 13 Comments »
