From 27ad6614a11ce1bc6f78811308cbda02cc826e4e Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 14 Dec 2023 17:53:52 -0700 Subject: [PATCH] -- regenera usuario de la empresa --- Sistemas/CatContrasenia.aspx.vb | 1 + 1 file changed, 1 insertion(+) diff --git a/Sistemas/CatContrasenia.aspx.vb b/Sistemas/CatContrasenia.aspx.vb index 3744aa611..56bbb5b85 100644 --- a/Sistemas/CatContrasenia.aspx.vb +++ b/Sistemas/CatContrasenia.aspx.vb @@ -26,6 +26,7 @@ Partial Class CatContrasenia 'redirecciona, cuando es el primer cambio de contraseña UsuarioActual.Contraseña = TxtContrasenia1.Text Usuario.Commit() + GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) = Nothing Else Usuario.RollBack() Alert("Contraseña Incorrecta.", TipoMensaje.MsgAdvertencia)