From 0bc003e2c4417ff465b45223063ecc1340a46b64 Mon Sep 17 00:00:00 2001
From: Antonio Gonzalez <jose_antony11@hotmail.com>
Date: Wed, 22 Apr 2020 12:21:22 -0700
Subject: [PATCH] =?UTF-8?q?retroalimentaci=C3=B3n?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 OI/CircularDetalle.aspx    | 58 ++++++++++++++++++++++++++++++++------
 OI/CircularDetalle.aspx.vb | 21 ++++++++------
 2 files changed, 63 insertions(+), 16 deletions(-)

diff --git a/OI/CircularDetalle.aspx b/OI/CircularDetalle.aspx
index b9eba7ae3..6d09a8b9e 100644
--- a/OI/CircularDetalle.aspx
+++ b/OI/CircularDetalle.aspx
@@ -14,7 +14,7 @@
     <asp:UpdatePanel runat="server" ID="UpAgregar">
         <ContentTemplate>
             <li>
-                <asp:LinkButton ID="LnkMandarCorreo" runat="server" Text="<i class='fa fa-envelope'></i> mandar correo"></asp:LinkButton>
+                <asp:LinkButton ID="LnkMandarCorreo" runat="server" Text="<i class='fa fa-envelope'></i> Enviar Correo"></asp:LinkButton>
             </li>
         </ContentTemplate>
     </asp:UpdatePanel>
@@ -58,7 +58,7 @@
                                 <textarea runat="server" id="TxtCorreo" class="form-control"></textarea>
                             </div>
                             <div class="col-md-1" style="width: 15%">
-                                <asp:LinkButton runat="server" ID="LbBuscar" >Buscar</asp:LinkButton>
+                                <asp:LinkButton runat="server" ID="LbBuscar" Style="color: #23527c;">Buscar</asp:LinkButton>
                             </div>
                         </div>
                         <br />
@@ -76,25 +76,67 @@
                                 <asp:Label runat="server" ID="LblCircular">Circular:</asp:Label>
                             </div>
                             <div class="col-md-1" style="width: 70%">
-                                <textarea runat="server" id="TxtCircular" class="form-control" style="height:150px"></textarea>
+                                <%--<textarea runat="server" id="TxtCircular" class="form-control" style="height: 150px"></textarea>--%>
+                                <asp:TextBox ID="TxtCircular" ClientIDMode="Static" runat="server" MaxLength="5000" TextMode="MultiLine" Height="200px" Width="100%"></asp:TextBox>
+                                <ajax:HtmlEditorExtender
+                                    ID="htmlEdDescripcion"
+                                    TargetControlID="TxtCircular"
+                                    DisplaySourceTab="True"
+                                    EnableSanitization="false"
+                                    runat="server">
+                                    <Toolbar>
+                                        <ajax:Undo />
+                                        <ajax:Redo />
+                                        <ajax:Bold />
+                                        <ajax:Italic />
+                                        <ajax:Underline />
+                                        <ajax:StrikeThrough />
+                                        <ajax:Subscript />
+                                        <ajax:Superscript />
+                                        <ajax:JustifyLeft />
+                                        <ajax:JustifyCenter />
+                                        <ajax:JustifyRight />
+                                        <ajax:JustifyFull />
+                                        <ajax:InsertOrderedList />
+                                        <ajax:InsertUnorderedList />
+                                        <ajax:CreateLink />
+                                        <ajax:UnLink />
+                                        <ajax:RemoveFormat />
+                                        <ajax:SelectAll />
+                                        <ajax:UnSelect />
+                                        <ajax:Delete />
+                                        <ajax:Cut />
+                                        <ajax:Copy />
+                                        <ajax:Paste />
+                                        <ajax:BackgroundColorSelector />
+                                        <ajax:ForeColorSelector />
+                                        <ajax:FontNameSelector />
+                                        <ajax:FontSizeSelector />
+                                        <ajax:Indent />
+                                        <ajax:Outdent />
+                                        <ajax:InsertHorizontalRule />
+                                        <ajax:HorizontalSeparator />
+                                        <%--<ajax:InsertImage />--%>
+                                    </Toolbar>
+                                </ajax:HtmlEditorExtender>
                             </div>
                         </div>
                         <br />
                         <div class="row">
-                            <div class="col-md-1" style="width:30%">
+                            <div class="col-md-1" style="width: 30%">
                                 <asp:Label runat="server" ID="LblAdjunto">Adjuntar archivo:</asp:Label>
                             </div>
-                            <div class="col-md-1" style="width:70%">
+                            <div class="col-md-1" style="width: 70%">
                                 <asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
                             </div>
                         </div>
                         <br />
                         <div id="archivosDiv" runat="server" class="row" visible="false">
-                            <div class="col-md-1" style="width:30%">
+                            <div class="col-md-1" style="width: 30%">
                                 <asp:Label runat="server" ID="Label1">Archivo cargado:</asp:Label>
                             </div>
-                            <div class="col-md-1" style="width:70%">
-                                <asp:HyperLink runat="server" ID="HkArchivo" ></asp:HyperLink>
+                            <div class="col-md-1" style="width: 70%">
+                                <asp:HyperLink runat="server" ID="HkArchivo" Style="color: #23527c;"></asp:HyperLink>
                             </div>
                         </div>
                         <br />
diff --git a/OI/CircularDetalle.aspx.vb b/OI/CircularDetalle.aspx.vb
index cf3327862..d5e97c8ab 100644
--- a/OI/CircularDetalle.aspx.vb
+++ b/OI/CircularDetalle.aspx.vb
@@ -58,11 +58,11 @@ Partial Class OI_CircularDetalle
                 TxtAsunto.Text = Circular.Item("Asunto")
                 TxtCorreo.Value = Circular.Item("CorreosInternos")
                 TxtCorreoAdicional.Value = Circular.Item("CorreosExternos")
-                TxtCircular.Value = Circular.Item("Circular")
+                TxtCircular.Text = Circular.Item("Circular")
 
                 If Circular.Item("ArchivoAdjunto") <> "" Then
                     archivosDiv.Visible = True
-                    HkArchivo.NavigateUrl = String.Format("{0}Empresas\{1}\Formatos\{2}", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveEmpresa, Circular.Item("ArchivoAdjunto"))
+                    HkArchivo.NavigateUrl = $"~/Empresas/{UsuarioActual.CveEmpresa}/Formatos/{Circular.Item("ArchivoAdjunto")}"
                     HkArchivo.Text = Circular.Item("ArchivoAdjunto")
                 End If
 
@@ -86,7 +86,7 @@ Partial Class OI_CircularDetalle
 
             Dim AdjuntoValidate As String = NombreArchivo().Split("-")(1)
 
-            If ObjOI.UpdateCircular(CveCircular, TxtAsunto.Text, TxtCircular.Value, TxtCorreo.Value, TxtCorreoAdicional.Value, AdjuntoValidate) Then
+            If ObjOI.UpdateCircular(CveCircular, TxtAsunto.Text, TxtCircular.Text, TxtCorreo.Value, TxtCorreoAdicional.Value, AdjuntoValidate) Then
                 GuardarArchivo(CveCircular)
                 Alert("Actualizado correctamente")
             End If
@@ -94,7 +94,7 @@ Partial Class OI_CircularDetalle
             Dim CorreoExtra As String = If(TxtCorreoAdicional.Value = "", "-1", TxtCorreoAdicional.Value)
 
             Dim AdjuntoValidate As String = NombreArchivo().Split("-")(1)
-            Dim CircularInsertado As Integer = ObjOI.AddCircular(TxtAsunto.Text, TxtCircular.Value, TxtCorreo.Value, Today.ToString, UsuarioActual.CveUsuario,
+            Dim CircularInsertado As Integer = ObjOI.AddCircular(TxtAsunto.Text, TxtCircular.Text, TxtCorreo.Value, Today.ToString, UsuarioActual.CveUsuario,
                                                                  UsuarioActual.CveEmpresa, CorreoExtra, AdjuntoValidate)
             If CircularInsertado > 0 Then
                 GuardarArchivo(CircularInsertado)
@@ -226,10 +226,15 @@ Partial Class OI_CircularDetalle
         Dim ArchivoBytes As Byte() = ArchivoBytesArrya(HkArchivo.Text)
 
         Dim Contador As Integer = 0
-        For Each Correo As String In correos
-            MandaCorreo(TxtAsunto.Text, Correo, If(Contador > 0, "", TxtCorreoAdicional.Value), TxtCircular.Value, ArchivoBytes, HkArchivo.Text)
-            Contador += 1
-        Next
+        Try
+            For Each Correo As String In correos
+                MandaCorreo(TxtAsunto.Text, Correo, If(Contador > 0, "", TxtCorreoAdicional.Value), TxtCircular.Text, ArchivoBytes, HkArchivo.Text)
+                Contador += 1
+            Next
+            Alert("El correo se envió correctamente")
+        Catch ex As Exception
+            Alert("Error al enviar correo", TipoMensaje.MsgError)
+        End Try
     End Sub
 
     Private Sub MandaCorreo(Asunto As String, Para As String, ArrayCC As String, body As String, ArchivoBinario As Byte(), NombreArchivo As String)