Guillermo Alfonso Bernal

Tengo un formulario que carga la URL de la imagen, la idea es que con botón que diga mirar esa imagen Me lo mostrara en el visor de windows y tengo el siguiente código que no me lo muestra en el visor no se que esta mal : Private Sub...

Tengo un formulario que guarda los escáner y luego lo descargue. Se que no se debe guardar imágenes en las bases de datos por la situación del peso, por lo tanto La idea es tener un botón "Examinar" que su función es que me abra el cuadro de dialogo...

Estoy practicando con permisos de usuarios y tengo el siguiente código que verifica si tiene el permiso de lo contrario el botón se a paga Dim userlevel As Integer userlevel = DLookup("Generarpdf", "usuarios", "usuario = '" &...

Me gustaría saber si es posible exportar una consulta con criterio a un excel muestro el siguiente ejercicio : Tengo una botón que ejecuta una consulta por criterio de fecha: la respuesta es exitosa Mi pregunta si es posible al dar clic en el botón...

He mirado temas parecidos pero no he comprendido bien como insertar una fecha especifica desde un formulario a una consulta generada con criterios de buscar por fecha me podrían colaborar. Tengo el siguiente formulario de ejemplo. Y este es la...

Estoy realizando la impresión de un informe determinado, en si estoy llamando la opción de seleccionar la impresora pero me gustaría que solo me imprima el informe actual así la opción todos este marcada. On Error GoTo sol_err DoCmd.OpenReport...

Tengo el siguiente código en donde quiero almacenar un dato en una variable asignada pero genera error 438: Private Sub SalidaSegura_Click() Dim StrSQL As String Me.UserActivo = NameUno /* Error 438 que indica access*/ Concep = "Salidad segura del...

En mi proyecto me piden que debo realizar una bitácora de los usuarios que ingresan userlevel = DLookup("Admin", "usuarios", "usuario = '" & Me.txtusuario.Value & "'") If userlevel = -1 Then LogedUser = NameUno DoCmd. Close acForm, "Logeo" DoCmd....

Tengo el siguiente código que realiza una validación de usuario: If (IsNull(DLookup("[usuario]", "usuarios", "[usuario]='" & Me.txtusuario.Value & _ "'And pass ='" & Me.txtpass & "'"))) Then MsgBox "Usuario Y/O Contraseña incorrectos" Else userlevel...

Es posible realizar un evento hover de html al pasar el mouse para que el botón cambie de color o tamaño pero en este caso en access