From 76c0c6bdcacbb7a05f782d7c742f5c82a5819893 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Thu, 4 Feb 2021 01:25:49 -0700 Subject: [PATCH] --- GPS/WizardDispositivos.aspx.cs | 10 ++++++++-- LogIn.aspx.vb | 7 +------ 2 files changed, 9 insertions(+), 8 deletions(-) diff --git a/GPS/WizardDispositivos.aspx.cs b/GPS/WizardDispositivos.aspx.cs index d82f32cbb..d5d2dcbf0 100644 --- a/GPS/WizardDispositivos.aspx.cs +++ b/GPS/WizardDispositivos.aspx.cs @@ -153,7 +153,7 @@ public partial class GPS_WizardDispositivos : ClsPaginas if (CveDispositivo < 0) { TabContainer.ActiveTabIndex = 0; - Alert("Debe guardar el dispositivo primero"); + Alert("Debe guardar el dispositivo primero",ModExtensiones.TipoMensaje.MsgAdvertencia ); } } @@ -376,7 +376,13 @@ public partial class GPS_WizardDispositivos : ClsPaginas CargaDatos(CveDispositivo); Updatos.Update(); string script = ""; - if (GPSNEW == 1) { TabContainer.ActiveTabIndex = 1; script = $"RegresaValor({CveDispositivo})"; } + if (GPSNEW == 1) { + TabContainer.ActiveTabIndex = 1; script = $"RegresaValor({CveDispositivo})"; + ClsSisMail correo = new ClsSisMail(); + Correo.SendMail(UsuarioActual.EmpresaNotificaciones, "paola@adssistemas.mx;Caudillo.90d@gmail.com", "Alta nuevo dispositivo", + $"se le informa la alta de un nuevo dispositivo en la empresa \"{UsuarioActual.Empresa.Empresa}\"\r\nIMEI : \"{IMEI}\"\r\nSerie : \"{Serie}\"\r\nModelo : \"{modelo}\""); + + } Alert("El dispositivo y sus configuraciones, se han guardado correctamente", ModExtensiones.TipoMensaje.MsgInformacion, script); if (TipoDispositivo == 2) diff --git a/LogIn.aspx.vb b/LogIn.aspx.vb index 7235394c6..e82ce6868 100644 --- a/LogIn.aspx.vb +++ b/LogIn.aspx.vb @@ -205,12 +205,7 @@ Partial Class LogIn ADSSessionConfig.sessionUser = Usuario ADSSessionConfig.sessionDpage = False ObjUsuario.Dispose() - If Usuario IsNot Nothing AndAlso ( - Usuario.CveRol = 1 OrElse ( - (isgps AndAlso (Usuario.CvePlataforma = 3 OrElse Usuario.CveRol = 1200)) OrElse - ((Not isgps) AndAlso (Usuario.CvePlataforma <> 3 AndAlso Usuario.CveRol <> 1200)) - ) - ) Then + If Usuario IsNot Nothing Then If Not Usuario.AutorizadoxIP OrElse (HddAdsCodex.Text.Length > 0 AndAlso Usuario.CodigoAutorizado = HddAdsCodex.Text) Then CreaObjetoEmpresa(Usuario)