diff --git a/AIMMGM/PopRegistro.aspx.vb b/AIMMGM/PopRegistro.aspx.vb
index 73f170955..1ed9fc3f8 100644
--- a/AIMMGM/PopRegistro.aspx.vb
+++ b/AIMMGM/PopRegistro.aspx.vb
@@ -457,9 +457,9 @@ Partial Class AIMMGM_Registro
             Venta.Commit()
 
             Alert("<br>Su Registro se ha realizado correctamente.<br><br> Se le estará enviando al correo proporcionado la información necesaria para el acceso de su portal.<br><br>", TipoMensaje.MsgInformacion, "tb_remove();")
-            'EnviaNotificacion(TmpDT, "nunezothon@yahoo.com.mx") '"rene.molina@adsistemas.mx") '
+
             If TieneExcursion Then
-                EnviaNotificacion(TmpDT, "ppadilla@imdex-cascabel.com") '"rene.molina@adsistemas.mx") '
+                EnviaNotificacion(TmpDT, "ppadilla@imdex-cascabel.com")
             End If
             'ActivaPortal(CveCliente, TxtEmail.Text.Trim) '"rene.molina@adsistemas.mx") '
             'envio de correo a la persona que controla el area, Aristeo,.. .
diff --git a/App_Code/modExtensiones.vb b/App_Code/modExtensiones.vb
index f4a068120..3021adf2e 100644
--- a/App_Code/modExtensiones.vb
+++ b/App_Code/modExtensiones.vb
@@ -2955,7 +2955,7 @@ Namespace Extensiones
                 Dim ObjEmp As New ClsSisEmpresas
                 If ObjEmp.GetEmpresas(1, "-1", "-1", "-1", "-1") Then
 
-                    If ObjMail.SendMail(ObjEmp.Empresa, "rene.molina@adsistemas.mx", "Error del Sistema", Mensaje) Then
+                    If ObjMail.SendMail(ObjEmp.Empresa, "rene.molina@adssistemas.mx", "Error del Sistema", Mensaje) Then
 
                     End If