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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2020-07-02 19:53:50 -07:00
parent a59dca4cdb 837a7a51bb
commit 8d366f4eb0
9 changed files with 822 additions and 174 deletions
Download Patch File Download Diff File Expand all files Collapse all files

125
Sistemas/Empresa.aspx
View File

@@ -319,76 +319,63 @@
</div>
</div>
<div class="portlet-body">
<table border="0">
<tr>
<td>Archivo Key:</td>
<td>
<asp:TextBox ID="TxtArchivoKey" runat="server" MaxLength="115" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td colspan="2">
<asp:LinkButton ID="LnkArchivoKey" runat="server" class="Texto">Cargar Archivo Key</asp:LinkButton></td>
</tr>
<tr id="TrDescargaArchivoKey" runat="server" visible="false">
<td colspan="2">
<asp:UpdatePanel runat="server" ID="UpArchivoDescarga">
<ContentTemplate>
<asp:LinkButton ID="LbArchivoKeyDescarga" runat="server" CssClass="Texto">Descargar Archivo Key</asp:LinkButton>
<asp:UpdatePanel runat="server" ID="UpArchivoDescarga">
<ContentTemplate>
<table border="0">
<tr>
<td>Archivo Key:</td>
<td>
<asp:TextBox ID="TxtArchivoKey" runat="server" MaxLength="115" Width="200px"></asp:TextBox>
<%--<a id="LinkDescargaArchivoKey" target="_blank"></a>--%>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="LbArchivoKeyDescarga" />
</Triggers>
</asp:UpdatePanel>
</td>
</tr>
<tr>
<td>Archivo CER:</td>
<td>
<asp:TextBox ID="TxtArchivoCer" runat="server" MaxLength="115" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td colspan="2">
<asp:LinkButton ID="LnkArchivoCer" runat="server" class="Texto">Cargar Archivo CER</asp:LinkButton></td>
</tr>
<tr id="TrDescargaArchivoCer" runat="server" visible="false">
<td colspan="2">
<a id="LinkDescargaArchivoCer" target="_blank"></a>
<asp:LinkButton ID="LbArchivoCerDescarga" runat="server" CssClass="Texto">Descargar Archivo CER</asp:LinkButton>
</td>
</tr>
<tr>
<td>Archivo PFX:</td>
<td>
<asp:TextBox ID="TxtArchivoPfx" runat="server" MaxLength="115" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td colspan="2">
<asp:LinkButton ID="LnkArchivoPfx" runat="server" class="Texto">Cargar Archivo PFX</asp:LinkButton></td>
</tr>
<tr id="TrDescargaArchivoPfx" runat="server" visible="false">
<td colspan="2">
<a id="LinkDescargaArchivoPfx" target="_blank"></a>
<asp:LinkButton ID="LbArchivoPfxDescarga" runat="server" CssClass="Texto">Descargar Archivo PFX</asp:LinkButton>
</td>
</tr>
<tr>
<td>Contraseña Key: </td>
<td>
<asp:TextBox ID="TxtContraseñaKey" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Contraseña CIEC: </td>
<td>
<asp:TextBox ID="TxtCIEC" runat="server" MaxLength="50" Width="50px"></asp:TextBox></td>
</tr>
<tr id="TrRegistrarPAC3" runat="server">
<td colspan="2">
<asp:LinkButton ID="LnkRegistrarPAC3" runat="server" CssClass="Texto" OnClick="LnkRegistrarPAC3_Click">Registrar en ProFact</asp:LinkButton>
</td>
</tr>
</table>
</td>
<td>
<asp:LinkButton ID="LnkArchivoKey" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>" />
<asp:LinkButton ID="LbArchivoKeyDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/>
</td>
</tr>
<tr>
<td>Archivo CER:</td>
<td>
<asp:TextBox ID="TxtArchivoCer" runat="server" MaxLength="115" Width="200px"></asp:TextBox>
</td>
<td>
<asp:LinkButton ID="LnkArchivoCer" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>"/>
<asp:LinkButton ID="LbArchivoCerDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/>
</td>
</tr>
<tr>
<td>Archivo PFX:</td>
<td>
<asp:TextBox ID="TxtArchivoPfx" runat="server" MaxLength="115" Width="200px"></asp:TextBox>
</td>
<td>
<asp:LinkButton ID="LnkArchivoPfx" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i title='Subir Documento' class='fa fa-upload' title='Subir Documento' tooltip='Subir' ></i>"/>
<asp:LinkButton ID="LbArchivoPfxDescarga" runat="server" CssClass="btn btn-circle btn-sm blue" Text="<i title='Bajar Documento' class='fa fa-download' title='Bajar Documento' tooltip='Descargar'></i>" Visible="false"/>
</td>
</tr>
<tr>
<td>Contraseña Key: </td>
<td>
<asp:TextBox ID="TxtContraseñaKey" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Contraseña CIEC: </td>
<td>
<asp:TextBox ID="TxtCIEC" runat="server" MaxLength="50" Width="50px"></asp:TextBox></td>
</tr>
<tr id="TrRegistrarPAC3" runat="server">
<td colspan="2">
<asp:LinkButton ID="LnkRegistrarPAC3" runat="server" CssClass="Texto" OnClick="LnkRegistrarPAC3_Click">Registrar en ProFact</asp:LinkButton>
</td>
</tr>
</table>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="LbArchivoKeyDescarga" />
<asp:PostBackTrigger ControlID="LbArchivoCerDescarga" />
<asp:PostBackTrigger ControlID="LbArchivoPfxDescarga" />
</Triggers>
</asp:UpdatePanel>
</div>
</div>

48
Sistemas/Empresa.aspx.vb
View File

@@ -5,6 +5,7 @@ Imports System.Data
Imports Extensiones
Imports System.Runtime.InteropServices
Imports System.IO
Imports Microsoft.Reporting.WebForms
Partial Class Sistemas_Empresa
Inherits ClsPaginas
@@ -126,12 +127,13 @@ Partial Class Sistemas_Empresa
'Configuración de Modalidad Update
TxtTimbres.Enabled = False
TrDescargaArchivoCer.Visible = True
TrDescargaArchivoKey.Visible = True
TrDescargaArchivoPfx.Visible = True
TrDescargaBanner.Visible = True
LnkBanner.InnerText = "Reemplazar Banner"
LbArchivoKeyDescarga.Visible = True
LbArchivoCerDescarga.Visible = True
LbArchivoPfxDescarga.Visible = True
'If LnkArchivoKey.InnerText = "" Then
' LnkArchivoKey.InnerText = "Reemplazar Archivo Key"
'End If
@@ -404,7 +406,7 @@ Partial Class Sistemas_Empresa
LbBannerDescarga.OnClientClick = "javascript:AbrirVentana('/Cer/" & .ArchivoCer & "', 500, 500, 'N', 'ArchivoCer Empresa');"
Session("FileUpload") = .ArchivoCer
LbArchivoPfxDescarga.OnClientClick = "javascript:AbrirVentana('/Pfx/" & .ArchivoPfx & "', 500, 500, 'N', 'ArchivoPfx Empresa');"
'LbArchivoPfxDescarga.OnClientClick = "javascript:AbrirVentana('/Pfx/" & .ArchivoPfx & "', 500, 500, 'N', 'ArchivoPfx Empresa');"
Session("FileUpload") = .ArchivoPfx
End With
@@ -1680,15 +1682,39 @@ Partial Class Sistemas_Empresa
Catch ex As Exception
TieneError = True
End Try
Next
If Not TieneError Then
Next
If Not TieneError Then
Alert("Certificado cargado con exito")
RegistraScript(String.Format("$('#{0}').modal('hide');", "ModalArchvivo"))
End If
TxtCargaImg.getfiles().Archivos = Nothing
UpAddArchivo.Update()
End Sub
Protected Sub LbArchivoKeyDescarga_Download(sender As Object, e As EventArgs) Handles LbArchivoKeyDescarga.Click
Dim NombreArchivo As String = TxtArchivoKey.Text
DescargarArchivo(NombreArchivo)
End Sub
Protected Sub LbArchivoCerDescarga_Download(sender As Object, e As EventArgs) Handles LbArchivoCerDescarga.Click
Dim NombreArchivo As String = TxtArchivoCer.Text
DescargarArchivo(NombreArchivo)
End Sub
Protected Sub LbArchivoPfxDescarga_Download(sender As Object, e As EventArgs) Handles LbArchivoPfxDescarga.Click
End If
TxtCargaImg.getfiles().Archivos = Nothing
UpAddArchivo.Update()
End Sub
Dim NombreArchivo As String = TxtArchivoPfx.Text
DescargarArchivo(NombreArchivo)
End Sub
Private Sub DescargarArchivo(NombreArchivo As String)
Dim FilePath As String = String.Format("{0}Empresas\{1}\Certificados\{2}", ModExtensiones.DirectorioBaseEmpresas, CveEmpresa, NombreArchivo)
Dim byteArray As Byte() = File.ReadAllBytes(FilePath)
HttpContext.Current.Response.Clear()