AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-

Browse Source
This commit is contained in:
rrene
2024-05-01 16:34:13 -07:00
parent a4d826f01f
commit 8178bddc89
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
asmx/WSApp.asmx
View File

@@ -351,8 +351,9 @@ Public Class WSApp
End Function End Function
Private Sub EnviarCorreo(Correo As String, Factura As Modelos.Factura, Retorno As Modelos.Factura.MMensajeFactura, DireccionEnvio As String, UsuarioActual As Usuario) Private Sub EnviarCorreo(Correo As String, Factura As Modelos.Factura, Retorno As Modelos.Factura.MMensajeFactura, DireccionEnvio As String, UsuarioActual As Usuario)
Try Try
Dim Hilo As New System.Threading.Thread(Sub() EnviarCorreoFactura(Correo, Factura, Retorno, DireccionEnvio, UsuarioActual)) EnviarCorreoFactura(Correo, Factura, Retorno, DireccionEnvio, UsuarioActual)
Hilo.Start() 'Dim Hilo As New System.Threading.Thread(Sub() EnviarCorreoFactura(Correo, Factura, Retorno, DireccionEnvio, UsuarioActual))
'Hilo.Start()
Catch ex As Exception Catch ex As Exception
OnError("Ocurrió error al mandar el correo de facturación", ex) OnError("Ocurrió error al mandar el correo de facturación", ex)
End Try End Try