Registro de ingreso usuario por bitácora en access

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. OpenForm "MenuAdmini"
SQLdato = "INSERT INTO bitacora [(nombreUsuario)] Values (NameUno)"

Mi idea es que cuando el código valida el usuario que esta ingresando me gustaría guardar

El nombre del usuario que esta ingresando y yo pensé en generar un insert into pero no guarda cual sera el problema que no me guarda.

2

2 Respuestas

0 pts. Una forma de recordar quien eres es recordar quien son...

Teniendo en cuenta lo anterior encontré el procedimiento adecuado para que cuando
el usuario ingrese la tabla de bitácora almacene los datos la corrección es la siguiente:

  If userlevel = -1 Then
LogedUser = NameUno
DoCmd.Close acForm, "Logeo"
DoCmd.OpenForm "MenuAdmini"
StrSQL = "INSERT INTO bitacora (nombreUsuario) VALUES ('" & NameUno & "')"
DoCmd.SetWarnings False
DoCmd.RunSQL StrSQL
DoCmd.SetWarnings True

76.425 pts.

Esa era la solución

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas