Problema con Access al llevar mi base de datos a otro equipo
Publicado por Otto (3 intervenciones) el 11/02/2020 17:45:47
Buenas Tardes.
Solicito la ayuda del grupo sobre el siguiente mensaje de Access.
Comento que solamente ocurre al intentar pasar la base de datos a otro equipo. En mi Laptop funciona perfectamente. Es una Base de datos sencilla para manejo de inventario con posibilidades de llevar otros módulos adicionales.
Trabajo en mi laptop con Windows 10 t Office 2019 y he tratado de pasar esta Base de datos a distintas versiones de Access pero nada. (2007, 2010, 2013 y la ultima prueba fue en 2016).
El error dice textualmente lo siguiente:
La expresión 'Al hacer clic' que ha especificado como valor de la propiedad de evento produjo el error Ocurrió un problema mientras SAI-CargoH&G se comunicaba con el servidor OLE
*La expresión no da como resultado el nombre de una macro, de una función definida por el usuario o [Procedimiento de evento]
*Hubo un error al evaluar la función, evento o macro.
Este error se produce cuando un evento no se ha podido ejecutar debido a que no se puede evaluar la ubicación de la lógica del evento. Por ejemplo, si la propiedad OnOpen de un formulario se establece en =[Campo], este error se produce porque se espera que se ejecute un nombre de evento o macro al producirse el evento.
Ahora bien, es un formulario con código VBA, donde lo que está programado es lo siguiente:
Agradezco mucho si alguien en este foro me puede ayudar.
Solicito la ayuda del grupo sobre el siguiente mensaje de Access.
Comento que solamente ocurre al intentar pasar la base de datos a otro equipo. En mi Laptop funciona perfectamente. Es una Base de datos sencilla para manejo de inventario con posibilidades de llevar otros módulos adicionales.
Trabajo en mi laptop con Windows 10 t Office 2019 y he tratado de pasar esta Base de datos a distintas versiones de Access pero nada. (2007, 2010, 2013 y la ultima prueba fue en 2016).
El error dice textualmente lo siguiente:
La expresión 'Al hacer clic' que ha especificado como valor de la propiedad de evento produjo el error Ocurrió un problema mientras SAI-CargoH&G se comunicaba con el servidor OLE
*La expresión no da como resultado el nombre de una macro, de una función definida por el usuario o [Procedimiento de evento]
*Hubo un error al evaluar la función, evento o macro.
Este error se produce cuando un evento no se ha podido ejecutar debido a que no se puede evaluar la ubicación de la lógica del evento. Por ejemplo, si la propiedad OnOpen de un formulario se establece en =[Campo], este error se produce porque se espera que se ejecute un nombre de evento o macro al producirse el evento.
Ahora bien, es un formulario con código VBA, donde lo que está programado es lo siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Option Compare Database
Option Explicit
Private Sub btnEntrar_Click()
Me.txtUsuario.SetFocus
If IsNull(Me.txtUsuario) Then
MsgBox "Por favor, escriba su usuario...", vbInformation, "Usuario requerido"
Me.txtUsuario.SetFocus
ElseIf IsNull(Me.txtPassword) Then
MsgBox "Por favor, ingrese correctamente su contraseña...", vbInformation, "Contraseña requerida"
Me.txtPassword.SetFocus
Else
If (IsNull(DLookup("[Usuario]", "Usuarios", "[Usuario] ='" & Me.txtUsuario.Value & "' and [Pass] = '" & Me.txtPassword.Value & "'"))) Then
MsgBox "Usuario y/o contraseña incorrectos..."Else
UsuarioX = DLookup("[Usuario]", "Usuarios", "[Usuario] ='" & Me.txtUsuario.Value & "'")
DoCmd.Close acForm, "FInicioSesion"
DoCmd.OpenForm "FMenuCargo"
End If
End If
End Sub
Private Sub btnSalir_Click()
DoCmd.Close acForm, "FInicioSesion"
'Application.QuitEnd Sub
Agradezco mucho si alguien en este foro me puede ayudar.
Valora esta pregunta
0
