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

3 BUG de envio de correos, historial de venta etiqueta en correos y texto adicional

Browse Source
This commit is contained in:
rakcsle
2025-01-30 00:25:33 -07:00
parent 1488e705f0
commit 5af96c5e5c
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Ventas/Ventas.aspx.vb
View File

@@ -41063,7 +41063,7 @@ Partial Class Ventas
ResultadoMail = 1 ResultadoMail = 1
TxtCCFactura.Text = "" TxtCCFactura.Text = ""
TxtBodyFactura.Text = "" TxtBodyFactura.Text = ""
RegistraScript("$('#ModalDivMail').modal('hide');") RegistraScript("$('#ModalDivMailFactura').modal('hide');")
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion) Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
Else Else
ResultadoMail = 3 ResultadoMail = 3
@@ -41095,7 +41095,7 @@ Partial Class Ventas
ResultadoMail = 1 ResultadoMail = 1
TxtCCFactura.Text = "" TxtCCFactura.Text = ""
TxtBodyFactura.Text = "" TxtBodyFactura.Text = ""
RegistraScript("$('#ModalDivMail').modal('hide');") RegistraScript("$('#ModalDivMailFactura').modal('hide');")
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion) Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
Else Else
ResultadoMail = 3 ResultadoMail = 3
@@ -41129,7 +41129,7 @@ Partial Class Ventas
If ObjMail.SendMail(UsuarioActual.Empresa, TxtParaMailFactura.Text.Trim, Asunto, Cuerpo, TxtCCFactura.Text.Trim, LSRutasMail) Then If ObjMail.SendMail(UsuarioActual.Empresa, TxtParaMailFactura.Text.Trim, Asunto, Cuerpo, TxtCCFactura.Text.Trim, LSRutasMail) Then
TxtCCFactura.Text = "" TxtCCFactura.Text = ""
RegistraScript("$('#ModalDivMail').modal('hide');") RegistraScript("$('#ModalDivMailFactura').modal('hide');")
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion) Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
End If End If
Else Else