dFacturas subir facturas fix no reemplazar pdf si ya existe

This commit is contained in:
Oscar Irigoyen
2025-06-04 17:12:44 -07:00
parent 79fdab0d73
commit 86aeee92b3
4 changed files with 209 additions and 9 deletions

View File

@@ -2690,6 +2690,7 @@ Partial Class AF_AF
Try
'Dim Para As String = "roberto.hernandez@exploracionesmineras.com"
Dim Para As String = "oscar.irigoyen@adssistemas.mx"
Dim Asunto As String = $"Registro de {If(Opcion = 1, "Alta de Activo Fijo", "Baja de ActivoFijo")}"
Dim Body As String = ""
@@ -2717,7 +2718,7 @@ Partial Class AF_AF
strBody.Append("<body>")
strBody.Append($"<h2>{If(Opcion = 1, "Alta de Activo Fijo", "Baja de Activo Fijo")}</h2>")
strBody.Append("<table>")
strBody.Append("<tr><th>Campo</th><th>Valor</th></tr>")
'strBody.Append("<tr><th>Campo</th><th>Valor</th></tr>")
strBody.Append($"<tr><td>Código</td><td>{Codigo}</td></tr>")
strBody.Append($"<tr><td>Descripción</td><td>{Descripcion}</td></tr>")
strBody.Append($"<tr><td>Proyecto</td><td>{Proyecto}</td></tr>")