cambio para envío de correo

Bancos/ProveedoresAbonar.aspx

@@ -338,13 +338,8 @@
                              <asp:CheckBox Text=" No Validar ante SAT" ID="ChkNoValidaSAT" CssClass="md-checksd" runat="server" Checked="false" Visible="false" />
                             <asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
                             <asp:CheckBox Text="Descuento" ID="chkaplicaDescuento" CssClass="md-checksd" runat="server" Checked="false" OnCheckedChanged="chkaplicaDescuento_CheckedChanged" AutoPostBack="true" Visible="false" />
-
-
-                                <asp:Button ID="Button1" runat="server" Text="Valida"  OnClick="Button1_Click" Visible="false" />
-                        </td>
-
-                        
-
+                             
+                        </td> 
                         
                     </tr>
                 </table>

Bancos/ProveedoresAbonar.aspx.vb

@@ -317,9 +317,6 @@ Partial Class Bancos_ProveedoresAbonar
                 chkaplicaDescuento.Visible = True
             End If
 
-
-            tmpValida()
-
         End If
     End Sub
 
@@ -1389,31 +1386,26 @@ Partial Class Bancos_ProveedoresAbonar
             'Hilo.Start()
 
             If MostarAlert Then
-                Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
+                Alert("El correo se envió correctamente", TipoMensaje.ToastInformacion)
             End If
 
         Catch ex As Exception
-
             If MostarAlert Then
                 Alert("No se pudo enviar el correo electrónico.", TipoMensaje.MsgError)
             End If
-
-
         End Try
     End Sub
 
     Private Sub EnviarCorreoNotificacionHilo(CveIENotificar As Integer, CorreoNotificarA As String, CopiaPara As String, UsuarioActualNotificar As Usuario)
 
-
         Try
             Dim ObjBancos As New ClsBancos()
 
             If ObjBancos.NotificacionPago(CveIENotificar, CorreoNotificarA, CopiaPara, UsuarioActualNotificar) Then
-                Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
+                Alert("El correo se envió correctamente", TipoMensaje.ToastInformacion)
             Else
                 Alert("No se pudo enviar el correo electrónico.", TipoMensaje.MsgError)
             End If
-
             ObjBancos.Dispose()
         Catch ex As Exception
             GuardaLog("Error al enviar notificación de pago ProveedoresAbonar --> " & ex.StackTrace.ToString)
@@ -1715,9 +1707,5 @@ Partial Class Bancos_ProveedoresAbonar
         End If
     End Sub
 
-
-    Protected Sub Button1_Click(sender As Object, e As EventArgs)
-        tmpValida()
-    End Sub
 End Class