-- regenera usuario de la empresa
This commit is contained in:
@@ -26,6 +26,7 @@ Partial Class CatContrasenia
|
|||||||
'redirecciona, cuando es el primer cambio de contraseña
|
'redirecciona, cuando es el primer cambio de contraseña
|
||||||
UsuarioActual.Contraseña = TxtContrasenia1.Text
|
UsuarioActual.Contraseña = TxtContrasenia1.Text
|
||||||
Usuario.Commit()
|
Usuario.Commit()
|
||||||
|
GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing
|
||||||
Else
|
Else
|
||||||
Usuario.RollBack()
|
Usuario.RollBack()
|
||||||
Alert("Contraseña Incorrecta.", TipoMensaje.MsgAdvertencia)
|
Alert("Contraseña Incorrecta.", TipoMensaje.MsgAdvertencia)
|
||||||
|
|||||||
Reference in New Issue
Block a user